1. 在立即窗口中执行代码
在立即窗口中键入一行或几行代码, 单击 “Enter” 键来执行代码。
在立即窗口输入语句: Debug.Print2∗9或Print2∗9, 则输出结果是18。
图9.43 立即窗口
若在立即窗口中输入几行代码, 每行以回车结束, 在最后一行回车时, 会出现结果, 如图9.44所示。
【说明】 立即窗口的代码是不能存储的。
2. 执行方法
在立即窗口执行代码的时候, 如果需要有关函数、 语句、 属性或方法的语法帮助, 则可选定关键字、 属性名或是方法名称, 然后按F1键。
使用立即窗口Debug.print输出命令可以输出结果。 但需要在单击运行按钮前打开 “立即窗口”, 即在 【视图】 菜单下, 单击 “立即窗口” 命令。 例如, 在模块中输入程序, 单击工具栏的运行按钮, 可在立即窗口中看到结果, 如图9.45所示。
图9.44 立即窗口执行程序
图9.45 打开立即窗口并输出结果
例29: 使用立即窗口计算工资税额。
Private Subsalary()
Dimsalary As Integer
salary=5400
Tax=IIf(salary<1000,0,IIf(salary<2000,salary∗0.05,IIf(salary<3000,salary∗0.1,IIf(salary<4000,salary∗0.15,salary∗0.2))))
Debug.Print Tax
End Sub
例30: 在立即窗口中输出9×9的乘法口诀表代码为:
Submultiplication()
st=""
Forx=1To9
Fory=1Tox
t=y&"×"&x&"="&x∗y&""
If Len(t)<7Thent=t&""
st=st&t
Next
st=st&vb Cr Lf
Next
Debug.Printst
End Sub
其程序结果如图9.46所示。
图9.46 打开立即窗口并输出九九乘法口诀表
免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。