'DATAGRIDVIEW UPPERCASE
Private Sub DGVUpperCase(sender As Object, e As KeyPressEventArgs)
e.KeyChar = Char.ToUpper(e.KeyChar)
End Sub
Private Sub DgvDoc_EditingControlShowing(sender As Object, e As DataGridViewEditingControlShowingEventArgs) _
Handles DgvDoc.EditingControlShowing
AddHandler e.Control.KeyPress, AddressOf DGVUpperCase
End Sub
Comments
Post a Comment