[mbk2006]

تفضل اخي زيادة على الي وضعوة الاخوة مشكورين يعني زياده الخير خيرين

ضع هذا بالكلاس


Public Sub msg_err()

MsgBox("الإدخــــــــال إجــــــــباري", MsgBoxStyle.Exclamation + MsgBoxStyle.MsgBoxRight, "خطـأ")


End Sub



وهذا في الاستدعاء داخل البتون



If TxtStudentName.Text = "" Then

MyConn.msg_err()

TxtStudentName.Focus()
Exit Sub
End If