Visual Basic Programozás, segítsetek nekem
-
#106
Köszi. Így sikerült, kiiktatnom a betük bekopizását, de csak a ctrl+v műveletre, az egér jobb klikk és paste, még mindig enged karaktereket. Lehet, hogy jobban járnék, ha csak egyszerűen a szövegdoboz tartalmát ellenőrizném a művelet elött, vagy van valami mődszer, hogy a jobbklikkes copyt is felügyelni tudjam?
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
a = Clipboard.GetText
b = IsNumeric(Clipboard.GetText)
If KeyCode = vbKeyControl Then
If Not (IsNumeric(Clipboard.GetText)) Then
Clipboard.Clear
End If
End If
End Sub