myscript.vbs

来自「这是一个数字图像处理的matlab仿真程序」· VBS 代码 · 共 17 行

Dim MyVar, Input 
MyVar = 0
MyVar = MyVar + 1
MyVar = MyVar + 1
MyVar = MyVar + 1
MyVar = MyVar + 1
MyVar = MsgBox ("MyVar is now " & MyVar, 65, "pssssssssst......")
Application.SetText = "Now you can set the text HERE by script alone."
Input = InputBox("Enter your name") 
DO
    Application.SetText = "You entered: " & CHR(13) & CHR(10) & Input
    Input = InputBox("Now enter something else:") 
    IF Input = "" Then Exit Do
LOOP