G
Guest
I have the following on a form in Access 97 and get a compile error but it
works in Access 2000. Can someone help me and tell me what might be wrong? I
do have text box on the form for Type Of Request. This is an option group
which converts the numbers to text.
Private Sub Form_Current()
Select Case TYPE_OF_REQUEST.Value
Case "PROSPECT SURVEY"
TYPE_OF_REQUEST.Value = 1
Case "INITIAL ACCOUNT EVALUATION"
TYPE_OF_REQUEST.Value = 2
Case "UPDATE SURVEY/PRE-RENEWAL"
TYPE_OF_REQUEST.Value = 3
Case "ONE SHOT SURVEY"
TYPE_OF_REQUEST.Value = 4
Case "ERGONOMIC SURVEY"
TYPE_OF_REQUEST.Value = 5
Case Else
TYPE_OF_REQUEST.Value = Null
End Select
End Sub
Private Sub Frame157_AfterUpdate()
Select Case TYPE_OF_REQUEST.Value
Case 1
TYPE_OF_REQUEST.Value = "PROSPECT SURVEY"
Case 2
TYPE_OF_REQUEST.Value = "INITIAL ACCOUNT EVALUATION"
Case 3
TYPE_OF_REQUEST.Value = "UPDATE SURVEY/PRE-RENEWAL"
Case 4
TYPE_OF_REQUEST.Value = "ONE SHOT SURVEY"
Case 5
TYPE_OF_REQUEST.Value = "ERGONOMIC SURVEY"
End Select
End Sub
works in Access 2000. Can someone help me and tell me what might be wrong? I
do have text box on the form for Type Of Request. This is an option group
which converts the numbers to text.
Private Sub Form_Current()
Select Case TYPE_OF_REQUEST.Value
Case "PROSPECT SURVEY"
TYPE_OF_REQUEST.Value = 1
Case "INITIAL ACCOUNT EVALUATION"
TYPE_OF_REQUEST.Value = 2
Case "UPDATE SURVEY/PRE-RENEWAL"
TYPE_OF_REQUEST.Value = 3
Case "ONE SHOT SURVEY"
TYPE_OF_REQUEST.Value = 4
Case "ERGONOMIC SURVEY"
TYPE_OF_REQUEST.Value = 5
Case Else
TYPE_OF_REQUEST.Value = Null
End Select
End Sub
Private Sub Frame157_AfterUpdate()
Select Case TYPE_OF_REQUEST.Value
Case 1
TYPE_OF_REQUEST.Value = "PROSPECT SURVEY"
Case 2
TYPE_OF_REQUEST.Value = "INITIAL ACCOUNT EVALUATION"
Case 3
TYPE_OF_REQUEST.Value = "UPDATE SURVEY/PRE-RENEWAL"
Case 4
TYPE_OF_REQUEST.Value = "ONE SHOT SURVEY"
Case 5
TYPE_OF_REQUEST.Value = "ERGONOMIC SURVEY"
End Select
End Sub