Multipages


Posted by Cory on July 18, 2001 7:17 AM

I have a multipage with about 10 pages in it. Before changing to the second page, I want to make sure the user has entered all of the necessary information. How would I keep the user from changing the page if there're any blank textboxs' on the first one?

I was thinking something like:

Multipage_Change()
If Textbox1.Text = "" Then
MsgBox "You haven't entered your info in the " _
& "first box. Do so now..."
Page1.SetFocus
End If

but, I've tried it to no avail.
Any suggestions would be like gold right now.
Thank whole bunches,

Cory

Posted by Ivan F Moala on July 18, 2001 8:43 PM

Have a look @ the Multipage.Value

eg
Private Sub MultiPage1_Change()
If TextBox1.Text = "" Then
If MultiPage1.Value <> 0 Then
MsgBox "You haven't entered your info in the " _
& "first box. Do so now..."
MultiPage1.Value = 0
End If
End If

End Sub


Ivan



Posted by Cory on July 19, 2001 7:33 AM

Right on, Big Dog!! Thanks again, Ivan!!

Cory