code test

VB Code:

For x = 1 to 20234 Then
Each "asdfasdf "
so 'asdf';
For each blah blah 'asdf asdf adsf
REM adsfadsf adsf asdf asdf
EndIf
End
blah
more blah

PHP Code:

---

For x = 1 to 20234 Then
Each "asdfasdf "
so 'asdf';
For each blah blah 'asdf asdf adsf
REM adsfadsf adsf asdf asdf
EndIf
End
blah
more blah 


---

VB Code:

For x = 1 to 20234 Then
Each "asdfasdf "
so 'asdf';
For each blah blah 'asdf asdf adsf
REM adsfadsf adsf asdf asdf
EndIf
End
blah
more blah

how now brown cow

vb Code:

Private Sub Command1_Click()
Dim str As String
 
str = "Hello Message"
MsgBox str
 
End Sub

Code:

---

       

vb Code:

       

Class form

    Private comboList As ArrayList = new ArrayList()

    private textList As ArrayList = New ArrayList()

       

    Public sub ComboBox1_Click()

          'At design time you can fill the Tag value of the control with the same number as the control one

          comboList.add(ComboBox1.Tag)

    End Sub

       

    public sub btn_case_search()

         For i As Integer to comboList.count-1

                Dim Field As ComboBox = Me.Controls("Field" & i)

         Next

    end sub

End class

---