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