VBA条件语句：运算结果判断

在VBA可以用 if 语句实现对结果的判断：

   1、利用普通文本框输入题目
   2、放置一个控件工具箱中的文本框（默认名字应当为TextBox1
   3、放置一个控件工具箱中的按钮，用来单击判断
   4、双击按钮输入以下代码：

1. Private Sub CommandButton1_Click()
   
2. <b>If Val(TextBox1.Text) = 17 Then
   
3. MsgBox ("good")
   
4. Else
   
5. MsgBox ("think again")
   
6. End If</b>
   
7. End Sub
   

复制代码

VAL()是将文本值转为数值，不转换也可以得到结果，但如果数参与运算，建议大家转换。
示例下载： vba计算结果判断@教育技术论坛.rar (30.65 KB, 下载次数: 107)

2014-9-29 06:32 上传

点击文件名下载附件

来自群组: PPT高效制作

ppt vba常用到。