SendKeysorSendMessage WM_SETTEXTorUse Clipboard and SendMessage WM_COPY

解决方案 »

  1.   

    我很笨的能不能说的简单点.用ole 或者dde能不能实现呀
      

  2.   

    我来帮你实现一下:
    Private Sub Command1_Click()
        Shell "notepad.exe", vbNormalFocus
        VB.Clipboard.Clear
        VB.Clipboard.SetText Text1.Text
        SendKeys "^{V}"
    End Sub
      

  3.   

    to niqiu(hunter) 
    不行呀.只能实现打开notepad 麻烦你在说清楚点好吗
      

  4.   

    界面上放TextBox,CommandButton控件,Name=Text1,name=command1
    程序运行后在文本框里输入数据,点Command1
    我的操作系统:XP