我想用VB编一个小软件,要调用系统计算器?

来源:百度知道 编辑:UC知道 时间:2024/06/05 09:03:42
Private Sub calculator_Click()
Shell "calc.exe", 3
End Sub
这句虽然可以调用成功,但是考虑到系统计算器如不果存的话就会产生一个错误,导致程序出错,

那么怎样改成:计算器存在则调用,不存在则不执行任何操作????
在下菜鸟~~~~~~~~~~~

Private Sub calculator_Click()
On error Resume Next
Shell "calc.exe", 3
End Sub

我没有学过VB,但我想 你可以用
IF exits calc.exe 。。。then msgbox(0,“0”,“系统没有 计算器”)
else
shell cal.exe