Form1.vb
Public Class NumberTabularFormate
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i, j, k, l, r As Integer
Dim str As String
i = Convert.ToInt32(TextBox1.Text)
j = Convert.ToInt32(TextBox2.Text)
ListBox1.Items.Clear()
For k = 1 To 10
str = ""
For l = i To j
r = k * l
str = str + r.ToString() &
vbTab
Next
ListBox1.Items.Add(str)
Next
End Sub
End Classhttps://www.youtube.com/channel/UCKLRUr6U5OFeu7FLOpQ-FSw/videos
0 comments
Post a Comment