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