' If we have textbox named Txt1 and a button named CmdPasGo in a form
' Command below will replace text inside textbox with text from clipboard
Private Sub CmdPasGo_Click()
Txt1.SelStart = 0
Txt1.SelLength = Len(Txt1.Text)
Txt1.Paste
End Sub
' Command below will replace text inside textbox with text from clipboard
Private Sub CmdPasGo_Click()
Txt1.SelStart = 0
Txt1.SelLength = Len(Txt1.Text)
Txt1.Paste
End Sub
Views 790
Downloads 299
CodeID
DB ID