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

2024-12-31 11:39:04

推荐回答（4个）

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

回答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

回答3：

Loumou From 百度知道
请查收

回答4：

已发送请查收