[Visual Basic]
Private Sub Button5_Click( _ 
   ByVal sender As Object, _ 
   ByVal e As EventArgs _ 
)

Parameter

sender

e

Quellcode

[Visual Basic]
    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) 
        ' Display in a message box all the items that are checked. 
        Dim indexChecked As Integer 
        Dim itemChecked As Object 
        Const quote As String = """" 
 
 
        ' First show the index and check state of all selected items. 
        For Each indexChecked In lboxInstalliertals.CheckedIndices 
            ' The indexChecked variable contains the index of the item. 
            MessageBox.Show("Index#: " + indexChecked.ToString() + ", is checked. Checked state is:" + _ 
                            lboxInstalliertals.GetItemCheckState(indexChecked).ToString() + ".") 
        Next 
 
        ' Next show the object title and check state for each item selected. 
        For Each itemChecked In lboxInstalliertals.CheckedItems 
 
            ' Use the IndexOf method to get the index of an item. 
            MessageBox.Show("Item with title: " + quote + itemChecked.ToString() + quote + _ 
                            ", is checked. Checked state is: " + _ 
                            lboxInstalliertals.GetItemCheckState(lboxInstalliertals.Items.IndexOf(itemChecked)).ToString() + ".") 
        Next 
 
        For Each GG As System.Data.DataRowView In Me.lboxInstalliertals.CheckedItems 
            MsgBox("hALLO") 
 
        Next 
 
    End Sub

Forderungen

Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition

Siehe auch

frmApplikation