-----------------------------------------------------------

New Message on BDOTNET

-----------------------------------------------------------
From: NetPointer
Message 2 in Discussion

 
in a KeyDown of a grid trap the control C and Control V.... 
'Copy. 
Clipboard.SetDataObject(grdXXX.Clip) 
'Paste 
If paste Then
' see of there's text in the clipboard
Dim data As IDataObject = Clipboard.GetDataObject()
If data.GetDataPresent(DataFormats.Text) Then
' there is, so paste it
With grdXXX
.Select(.Row, 1, .Rows.Count - 1, .Cols.Count - 1, False)
.Clip = CType(data.GetData(DataFormats.Text), String)
.Select(.Row, 1)
End With
End If
End If 
Regards.

-----------------------------------------------------------

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]

Reply via email to