当前位置:首页 » 文件管理 » vb6读写文件夹

vb6读写文件夹

发布时间: 2023-03-20 22:45:10

A. VB6文件读写

PrivateSubcommand1_click()
IfDir(App.Path&"int1.txt")=""Then
MkDirApp.Path&"int"
End
Else
OpenApp.Path&"int1.txt"ForInputAs源拆腔#1
LineInput#1,textline
Close#1
EndIf
Iftextline="OK"ThenForm2.Show
EndSub

要求御腊窗体1上要有一个雹衫按钮 并创建窗体2 代码要先编译后运行

热点内容
如何通过服务器id找到主人 发布:2025-05-17 06:12:11 浏览:36
ug编程吧 发布:2025-05-17 06:07:45 浏览:71
sql临时表和表变量 发布:2025-05-17 06:02:38 浏览:723
苹果如何用安卓无线耳机 发布:2025-05-17 06:01:53 浏览:821
sqlserver表关系 发布:2025-05-17 06:01:02 浏览:996
2017途观配置什么音响 发布:2025-05-17 05:53:50 浏览:843
64位安装sql2000 发布:2025-05-17 05:33:17 浏览:845
安卓手机屏幕仪哪个好 发布:2025-05-17 05:33:16 浏览:592
加密的备忘录 发布:2025-05-17 05:32:30 浏览:743
企业应用锁初始密码多少 发布:2025-05-17 05:26:04 浏览:834