网吧可以包间吗:VB 高手请进

来源：百度文库 编辑：高校问答 时间：2024/05/04 12:45:54
一般的安装程序都能新建文件夹，请问代码应该怎样写？
open "c:/wenjian.txt" for append as #1 可以在c盘建立一个叫wenjian的文本文件，请问如果建文件夹怎么写代码？

Private sub Command1_click
If Dir(App.Path & "\新建文件夹", vbDirectory) <> "" Then
MsgBox "目录已存在"
else
MkDir (App.Path & "\新建文件夹")
end if
exit sub

vb高手请进！！！！！！！！！！！！！！1 VB高手请进啊！ VB编程高手请进 VB高手请进 VB高手请进 VB高手请进 VB高手请进 vb高手请进来 vb高手请进 vb高手请进