Belajar Looping di Visual Basic

Selasa, 10 April 2012
Belajar looping di visual basic
Secara sederhana looping diartikan sebagai proses berulang terhadap statement maupun serangkaian statement lebih dari satu kali.




dan inilah gambar dari program looping yang saya buat



dan beginilah coding nya

Private Sub Command1_Click()
Dim a(1 To 5) As Integer
Dim Jumlah As Double
Dim Rataan As Integer

For i = 1 To 5
    a(i) = Val(Text1(i).Text)
Next i

For i = 1 To 5
    Jumlah = Jumlah + a(i)
Next i

Rataan = Jumlah / 5

Text2.Text = Jumlah
Text3.Text = Rataan

End Sub

jika anda kurang mengerti, maka tanyakan lah kepada ahlinya

Tidak ada komentar:

Posting Komentar

result