' *************因为你没运行Getall ,取消上面三行,增加下面一行,即可。
Getall
' *************
Sub Getall
MsgBox "Sum is :"&IngFirstNumber*IngSencondNumber*IngThirdNumber
End Sub
Function IngSencondNumber
IngSencondNumber = InputBox ("Entry your number2:")
End Function
Function IngThirdNumber
IngThirdNumber = InputBox ("Entry your number3:")
End Function
Function IngFirstNumber
IngFirstNumber = InputBox ("Entry your number1:")
End Function
1、首先打开我的电脑,进入C盘。
2、然后打开C盘中的ProgramData文件夹,在ProgramData文件夹中找到Microsoft文件夹。
3、然后打开Windows文件夹中的[开始]菜单文件夹,找到其中的程序文件夹。
4、然后将vbs文件复制到程序文件夹的StartUp文件夹下。
5、复制完后如图所示,重新启动电脑即可开机打开该vbs文件。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)