Membuat Segitiga Angka Siku-Siku Di Vb.net

Membuat Segitiga Angka Siku-Siku Di Vb.net 

Program Algoritma kali ini kita akan menampilkan segitiga siku-siku dengan angka,tampilannya jadi seperti ini :

kamu hanya membutuhkan label untuk menampilkannya,dan mengunakan for - next untuk algoritmanya,langsung saja kita tempelkan label1.text dan beri nama "txt_hasil.Text " dan double klik,sekarang tempel kode nya di Load_form :

 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim i, j As Integer        

txt_hasil.Text = ""

        For i = 1 To 10

            For j = 1 To i

                txt_hasil.Text &= j & " "

            Next

            txt_hasil.Text &= vbNewLine

        Next

    End Sub 

Oke,Sekian dan semoga bermanfaat.