-----------------------------------------------------------
New Message on BDOTNET
-----------------------------------------------------------
From: venkat_kl
Message 2 in Discussion
Hi I tried the same thing, since I do not have much time to dedicate on this
what ever I have done I just give it here, Please improve upon that Private
Sub TextBox1_MouseDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseDown
If TextBox1.SelectedText <> "" Then
Me.TextBox1.Cursor = Cursors.Hand
Clipboard.SetDataObject(TextBox1.SelectedText)
Else
Me.TextBox1.Cursor = Cursors.IBeam End If End Sub
Private Sub TextBox1_MouseMove(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseMove
If TextBox1.SelectedText <> "" Then
Me.TextBox1.Cursor = Cursors.Hand
Clipboard.SetDataObject(TextBox1.SelectedText)
Else
Me.TextBox1.Cursor = Cursors.IBeam
End If
End Sub whatever you select will be there in the clip board. go to the
position where ever you want , right click and paste in that position. bye
venkat_kl
-----------------------------------------------------------
To stop getting this e-mail, or change how often it arrives, go to your E-mail
Settings.
http://groups.msn.com/bdotnet/_emailsettings.msnw
Need help? If you've forgotten your password, please go to Passport Member
Services.
http://groups.msn.com/_passportredir.msnw?ppmprop=help
For other questions or feedback, go to our Contact Us page.
http://groups.msn.com/contact
If you do not want to receive future e-mail from this MSN group, or if you
received this message by mistake, please click the "Remove" link below. On the
pre-addressed e-mail message that opens, simply click "Send". Your e-mail
address will be deleted from this group's mailing list.
mailto:[EMAIL PROTECTED]
