Ejemplos: VIsual Basic

Tabla de multiplucar de 1 en un listbox
Dim x As Integer
For x = 1 To 15
ListBox1.Items.Add(5 & "*" & x & "=" & 5 * x)
Next x

Adicionar números en un listbox de 10 a 0 de dos en dos
Dim x As Integer
For x = 10 To 0 Step -2
ListBox1.Items.Add(x)
Next x

Factorial de un número
Dim a, b As Integer
b = 1
For a = 1 To Val(textbox1.text)
b = b * a
Next a
label1.text = b

Acceso a un valor de un vector
Dim letras As String() = {"a", "b", "c", "d", "e"}
Dim Letra As String
Dim x As Integer
For x = 1 To 5
Label1.Text = letras(TextBox1.Text)
Next

Textos por espejos o invertidos
Dim a As Integer
Dim b As String
For a = Len(TextBox1.Text) To 1 Step -1
b = b & Mid(TextBox1.Text, a, 1)
Next a
Label1.Text = b