Monday, 13 November 2017

Show multiplication of number in tabular format


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 Class

https://www.youtube.com/channel/UCKLRUr6U5OFeu7FLOpQ-FSw/videos

0 comments

Post a Comment