2020年5月17日 星期日

vb.net ListBox 沒有選擇的話則跳出 [Listbox unselect exit sub] 

1
2
3
4
5
6
7
8
9
    Private Sub lstLista_MouseClick(sender As Object, e As MouseEventArgs) Handles lstLista.MouseClick

        If lstLista.SelectedItem IsNot Nothing AndAlso lstLista.SelectedItem.ToString() <> "" Then

            lblDate.Text = lstLista.SelectedItem.ToString

        End If

    End Sub
於
標籤： , , , ,

沒有留言:

張貼留言

訂閱： 張貼留言 (Atom)