Question

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

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

Answer 1

• 复制到剪切板的主要代码：

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()

Answer 2

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

Answer 3

Loumou From 百度知道
请查收

Answer 4

已发送 请查收