Here is the code for disabling paste using right mouse click... I am sure the user can take care of insert like the way I took care of Ctrl + V
Code:Private Sub Text1_KeyPress(KeyAscii As Integer) '~~> Ensures numbers are not keyed it '~~> Also ensure the user is not able to paste number If KeyAscii > 47 And KeyAscii < 58 Or _ KeyAscii = 22 Then KeyAscii = 0 End Sub '~~> Disable paste using right click Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbRightButton Then Clipboard.Clear End If End Sub




Reply With Quote