vb打开桌面的123.txt

jinyang2016 2016-03-19 04:49:39
vb怎样打开桌面的123.txt,前辈们,求教
...全文
1837 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
一笑拔剑 2016-03-20
  • 打赏
  • 举报
回复 1
首先在工程的引用中选中Windows Scripting Host Object Model button代码里这么写


Dim desk As New WshShell
s=desk.SpecialFolders("desktop")
Open s&"\123.txt" For Input As #1
Input #1, 你要输入txt的内容
Close #1
这样就可以了
ZHRXJR 2016-03-19
  • 打赏
  • 举报
回复 1
Private Sub Command1_Click()
AA = "123456"
Open "C:\Users\Administrator\Desktop\123.txt" For Output As #1
Write #1, AA
Close #1
'在桌面创建123.txt文件,C:\Users\Administrator\Desktop\是W7的桌面路径,如果文件不存在,Output方法可以创建文件
End Sub

Private Sub Command2_Click()
Open "C:\Users\Administrator\Desktop\123.txt" For Input As #1
Input #1, BB
Close #1
'Input方法是读取文件内容
End Sub

741

社区成员

发帖
与我相关
我的任务
社区描述
VB 版八卦、闲侃,联络感情地盘,禁广告帖、作业帖
社区管理员
  • 非技术类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧