各位,想请教一个关于判断文件是否打开的问题 怎么判断一个文件是否处于打开状态呢?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub Form_Load()Open App.Path & "\1.txt" For Output As #1Print #1, 1If Err.Number = 0 ThenMsgBox "文件已经打开"End IfClose #1End Sub 用VB怎样检测USB端口有没有链接到外部硬件设备? 急急急 求一个SQL语句 如何用sql统计排行(简单) 熟悉"组态王"的大侠们麻烦进来一下,谢谢 初学vb,请教一个简单问题,关于datagrid控件的(先谢了) ====VB操作XML,如何获取排序后的NodeList疑问==== set Collection对象=nothing会使Collection集合所包含的对象内存释放吗? 请问怎样加载一个系统Fonts中没有的字体? 如何给VB的按钮做个热键(不是&A的形式) 用datareport怎么做这样的报表? 请问:怎么控制摄像头的开始摄像,和停止摄像呢
Print #1, 1
If Err.Number = 0 Then
MsgBox "文件已经打开"
End If
Close #1
End Sub