Intymny Okręt podwodny lstUserName_SelectedIndexChanged (ByVal nadawca Jako System.Object, ByVal e Jako System.EventArgs) Rękojeść lstUserName.SelectedIndexChanged
Ciemnawy selectrow Jako DataRow
Próba
Jeżeli _loaded = (1) Wtedy
selectrow = Ds.User.Select ("UserID =" & CInt (lstUserName.SelectedValue))((0))
cbAccessLevel.SelectedValue = selectrow. Rzecz ("Kolumna") '--Powiększenie być dokąd ono powiększenie
MessageBox.Show (selectrow. Rzecz ("Kolumna") .ToString)
Kończyć Jeżeli
Łapać ex Jako Wyjątek
MsgBox (msgBox. Wiadomość)
MsgBox (lstUser.SelectedIndex.ToString + "i" + lstUserName.SelectedIndex.ToString)
Końcówka Próba
Końcówka Sub |