 |
 |
 |
 |
 |
 |
 |
 |
Private
Sub btnSubmit_Click(ByVal sender As System.Object, _
|
ByVal e As
System.EventArgs) _
|
|
|
Handles btnSubmit.Click
|
|
‘Called if the form passes client-side
validation
|
|
If Me.IsValid Then
|
|
lblMessage.Text = “Add to the
database:<br />" & _
|
|
|
txtFirst.Text &
" " & txtMI.Text & _
|
|
" " &
txtLast.Text & "..."
|
|
End If
|
|
End Sub
|
|