dpark
01-04-2007, 08:21 PM
I have a textbox and i want to be able to paste, copy, and cut text into and from this textbox. I know it should use the basic mouse down and mouse up commands but i dont have a clue how to add these three options.
So far all i have is what you see below. It will show the button clicked in textbox2 and clear textbox2 when i right click in textbox1. Any help would be appreciated Thanks.
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then
TextBox2.Text = Button
Else
End If
End Sub
Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox2.Text = ""
End Sub
So far all i have is what you see below. It will show the button clicked in textbox2 and clear textbox2 when i right click in textbox1. Any help would be appreciated Thanks.
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then
TextBox2.Text = Button
Else
End If
End Sub
Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox2.Text = ""
End Sub