VB将指定文本文件复制到剪贴板

用VB写一个小程序,当前目录下有一个文本文件 cpu.txt,我需要用vb做一个程序,一双击这个程序,就将cpu.txt 里面的内容复制到剪贴板,我到其他地方直接ctrl+v 就能粘贴出来。这个VB小程序不需要任何显示界面,双击运行----复制cpu.txt 内容到剪贴板---结束,完全后台操作
cpu.txt 在当前目录下。文本里面只有一行内容如:ADCDEFGASDF
我不会VB,请直接弄成EXE文件,发到 achao07@qq.com 谢谢了

Clipboard.SetText str


示例(示例文件1.txt):

    Open "c:\1.txt" For Input As #1
    Clipboard.Clear
    Clipboard.SetText Input(LOF(1), 1)
    Close #1

其中的

Clipboard.Clear

表示清空剪切板(推荐清空一次)


如果是使用相对路径的,"c:\1.txt"改为

App.Path & "\1.txt"


    读取剪切板主要代码:

s = Clipboard.GetText()

温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-01-11
exe我已发
Private Sub Form_Load()
Open App.Path & "\cpu.txt" For Input As #1
Line Input #1, a
Clipboard.Clear
Clipboard.SetText a
Close
End
End Sub本回答被提问者采纳
第2个回答  2011-01-11
Loumou From 百度知道
请查收
第3个回答  2011-01-11
已发送 请查收

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网