VB+ SQL

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a As Integer = Val(TextBox1.Text)
Dim b As Integer = Val(TextBox2.Text)
Dim i, j As Integer
Dim s As String
If a > b Or a = b Then
For j = 1 To 9
For i = a To b Step -1
s = s & i & "*" & j & "=" & i * j & " "
Next
ListBox1.Items.Add(s)
s = ""
Next
Else
For j = 1 To 9
For i = a To b
s = s & i & "*" & j & "=" & i * j & " "
Next
ListBox1.Items.Add(s)
s = ""
Next
End If
End Sub
End Class