VB 检测文件是否存在.rar
VB检测文件是否存在,操作时请输入文件所在路径及文件名:单击操作按钮后,将执行以下的代码: PrivateSubCommand1_Click() X%=jc%(Text1.Text)'调用自定义函数返回检测结果 IfX%=TrueThen'判断检测结果 Label2.Caption="此文件确实存在。"'显示检测结果 Else Label2.Caption="此文件不存在." EndIf EndSub Functionjc%(filename$)'自定义函数检测是否存在指定文件
用户评论