Dalam Postingan saya kali ini adalah membahas bagaimana cara membuat program looping yang akan hasilnya berbentuk Piramida melalui VB.Net 2008
Rancanglah Form atau tampilan seperti gambar dibawah ini :
Properties
Listing Programnnya
Public Class Form3
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Proses.Click
Dim y, q, z As Byte
y = 1
q = Val(Nilai.Text)
Hasil.Clear()
Do While y <= q
z = 1
Do While z <= y
Hasil.Text = Hasil.Text & " " & z
z += 1
Loop
Hasil.Text = Hasil.Text & vbCrLf
y += 1
Loop
End Sub
End Class
Hasilnnya seperti gambar dibawah ini:
………Selamat Mengerjakan……….