Minggu, 27 Maret 2011

Perbedaan Dalam Penggunaan Object

Public Class Form1

    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If e.KeyChar = Chr(13) Then
            ComboBox1.Items.Add(TextBox1.Text)
        End If
    End Sub

   
Dari program tersebut maka kita dapat melihat perbedaannya,ComboBox hanya dapat atau hanya untuk menampilkan satu persatu kata yang telah di input sebelumnya . namun ListBox dapat menampilkan semua kata yang di input sebelumnya.

Untuk Pengulangan Looping ,berikut programnya :

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim i As Integer
        ListBox1.Items.Clear()
        For i = 1 To Val(TextBox2.Text)
            ListBox1.Items.Add(i)
        Next
    End Sub

    Private Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim j, u As Integer
        u = 5

        For j = 0 To Val(TextBox2.Text)

        Next
        If j Mod u = 0 Then
            ListBox1.Items.Add(j)
            u = j

        End If

    End Sub

End Class


Tidak ada komentar:

Posting Komentar