Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Private Sub CommandButton1_Click()
Dim cCont As Control
For Each cCont In Me.Controls
'DO STUFF HERE
Next cCont
End Sub
Private Sub CommandButton1_Click()
Dim cCont As Control
For Each cCont In Me.Controls
If TypeName(cCont) = "TextBox" Then
'DO STUFF HERE
End If
Next cCont
End Sub
Private Sub CommandButton1_Click()
Dim cCont As Control
For Each cCont In Me.MultiPage1.Pages(0).Controls
If TypeName(cCont) = "TextBox" Then
'DO STUFF HERE
End If
Next cCont
End Sub
Private Sub CommandButton1_Click()
Dim pPage As Page, cCont As Control
For Each pPage In Me.MultiPage1.Pages
For Each cCont In pPage.Controls
If TypeName(cCont) = "ComboBox" Then
'DO STUFF HERE
End If
Next cCont
Next pPage
End Sub