Visual Basic

Dim asdf As New System.Text.StringBuilder
asdf.AppendLine("this is a test")
asdf.Replace(" ", String.Empty)
MsgBox(asdf.ToString)

Mycroft Holmes wrote:

Dim oTB as new textbox("textboxname")

Dim oTB As New TextBox
        For a = 1 To INumOfBox2
            oTB.Name = "TextBox"
            oTB.Name = oTB.Name & Str(a)
            oTB.Visible = True

        Next

Dalek Dave wrote:

Dim oTB As New TextBox

Dim oCtrl As Control = Me.cboList
Dim iLimit As Int16
iLimit = CInt(cboList.Text)
For i = 1 To iLimit
    oCtrl = Me.GetNextControl(oCtrl, True)
Next
If Not IsNothing(oCtrl) Then
    oCtrl.Text = iLimit
End If

Dim Const TextBoxes() as TextBox = _
   {TextBox1, TextBox2, TextBox3, TextBox4, TextBox5, TextBox6, TextBox7}

for i=1 to numberselected
textbox(i).visible = trun
next i

Function FunctionName(Prefix As String) As String

Do something here to generate/define/call the variable

End Function 

Range("A1").Select
Offset(0,1).Select

For Each oControl As Control In fraOffsets.Controls
    With oControl
        If TypeOf oControl Is TextBox Then
        	'Do work here....
        End If
    End With
Next