
modal form wont display records
Can anyone tell me why my modal form isnt displaying data?
Public frm As Form 'Module Level Variable
Function CreateTempForm() As Boolean
Dim x As Integer
Set frm = CreateForm
With frm
.AutoCenter = True
.Caption = "Do Manuals"
.DividingLines = False
.RecordSelectors = False
.NavigationButtons = False
.RecordSource = "SELECT CSZ FROM [Santarosa Traffic2] WHERE wTemp =
0;"
.Module.AddFromFile "C:\Working\Access\FormCSZ_CloseEvent.txt"
Set ctl = CreateControl(.Name, acTextBox, acDetail, , "CSZ", 0.1,
0.1, 3888)
strName = .Name
DoCmd.Close acForm, frm.Name, acSaveYes
DoCmd.OpenForm strName, acFormDS, , , acFormEdit, acDialog
End With
End Function
When run, the form opens modally, but all i can see is a little, barely
visible (what seems to be a part of the form's title bar) image. When I
click on the image I either get the option to Move or Close from a list, OR
the form closes. What do i need to do to get it open so i can see the
records. I am sure the recordSource property should return data.