1. I have a field called NumOfApp in the main form and will be automatically field in, depending on how many applicants there are in the sub form. I had 3 records in the sub form and it was working fine, until I went to the table and deleted one record, compact and repaired it, but NumOf App still shows 3, where as in the sub form it shows 2 records (1of 2, 2 of 2). This is the code I had, please comment:

Private Sub txtCount_Change()
Forms![Applicant]![NumOfApp].Value = txtCount.Value
End Sub

2. I was trying to design a query based report to indicate the member of applicants whose case are denied each month and what % are denied within 10 business days and average # of days. How do I go about designing the crosstab query?