1 Apa yang kalian
ketahui tentang perulangan VB.net?
jawab : Statement perulangan di dalam pemrograman sangat di perlukan untuk mengulang perntah-perintah yang sama bebrapa kali dalam satu program. Pengulangan proses pada pemrograman Visual Basic disediakan dalam 5 statement
a. Do while/loop
b. Do until/loop
c. Do loop/while
d. Do loop/until
e. For next
jawab : Statement perulangan di dalam pemrograman sangat di perlukan untuk mengulang perntah-perintah yang sama bebrapa kali dalam satu program. Pengulangan proses pada pemrograman Visual Basic disediakan dalam 5 statement
a. Do while/loop
b. Do until/loop
c. Do loop/while
d. Do loop/until
e. For next
2 Contoh program
sederhana perulangan pada VB.net?
jawab: For i = 1 To 10
ListBox1.Items.Add(i)
Next
For i = 10 To 1 Step -1
ListBox2.Items.Add(i)
Next
j = 1
While j <= 10
ComboBox1.Items.Add(j)
j += 1
End While
j = 10
Do Until j < 1
ListBox3.Items.Add(j & " BD")
j -= 2
Loop
j = 1
Do While j < 10
TextBox1.Text = TextBox1.Text & j & " BD" & vbCrLf
j += 2
Loop
End Sub
End Class
jawab: For i = 1 To 10
ListBox1.Items.Add(i)
Next
For i = 10 To 1 Step -1
ListBox2.Items.Add(i)
Next
j = 1
While j <= 10
ComboBox1.Items.Add(j)
j += 1
End While
j = 10
Do Until j < 1
ListBox3.Items.Add(j & " BD")
j -= 2
Loop
j = 1
Do While j < 10
TextBox1.Text = TextBox1.Text & j & " BD" & vbCrLf
j += 2
Loop
End Sub
End Class
Bentuk umum pada VB.net?
jawab: 1: Public Class Form1
jawab: 1: Public Class Form1
2: Private Sub
Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
3: Dim var As Integer
4: Dim startVal As Integer
5: Dim endVal As Integer
6:
startVal = 1
7: endVal = 5
8: For var = startVal To endVal
9: MsgBox("Message Box Shows " var " Times ")
10: If var = 3 Then
11: Exit For
12: End If
13: Next var
14: End Sub
15: End Class
Tidak ada komentar:
Posting Komentar