aminvb
یک شنبه 15 آذر 1388, 09:38 صبح
سلام من داخل رویداد TextBox1_LostFocus کد زیر رو نوشتم که اگه کد تکرار بود بعد از برداشتن موس از روی تکس باکسم پیغام بده اما این اتفاق نمی افته مشکل کجاست؟:گیج:
Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
If TextBox1.Text.Length > 0 Then
dv.RowFilter = "cod='" & TextBox1.Text & "'"
If dv.Count > 0 Then
If MsgBox("آيا مايايد اطلاعات نمايش داده شوند؟", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "") = MsgBoxResult.Yes Then
TextBox2.Text = dv.Item(0).Item(1)
End If
End If
End If
End Sub
Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
If TextBox1.Text.Length > 0 Then
dv.RowFilter = "cod='" & TextBox1.Text & "'"
If dv.Count > 0 Then
If MsgBox("آيا مايايد اطلاعات نمايش داده شوند؟", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "") = MsgBoxResult.Yes Then
TextBox2.Text = dv.Item(0).Item(1)
End If
End If
End If
End Sub