31-03-14, 07:08 PM
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
btnSaveInfo.Enabled = False
btnSaveAll.Enabled = False
End Sub
Private Sub txtCRN_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtCRN.TextChanged
If txtCRN.Text = "" Then
btnSaveAll.Enabled = False
Else
btnSaveAll.Enabled = True
End If
End Sub
Private Sub txtBarwahNo_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtBarwahNo.TextChanged
If txtBarwahNo.Text = "" Then
btnSaveInfo.Enabled = False
Else
btnSaveInfo.Enabled = True
End If
End Sub
