Visual Basic

Dim mdiClient As MDIClient
For Each ctrl As Control In Me.Controls
    If TypeOf ctrl Is MDIClient Then
        mdiClient = ctrl
        Exit For
    End If
Next
If mdiClient Is Nothing Then
    Throw New Exception("MDIClient control not found!")
End If

dim txt as Syetm.Windows.Forms.Textbox<br />
For each txt in pnlTextBoxes.controls<br />
SomeThing=txt.AnyPropery<br />
Next

strSql = "CREATE TABLE test1 (" & _
         "id INTEGER IDENTITY NOT NULL, " & _
         "CONSTRAINT PrimaryKey PRIMARY KEY (id))"
conn.Execute strSql, , adCmdText + adExecuteNoRecords

CREATE TABLE tableName (
    fieldName AUTOINCREMENT(seedValue, incrementValue) CONSTRAINT constraintName PRIMARY KEY,
    fieldName TEXT(10)));