第一个【】应该是request.form("OptionValue")或者request.QueryString("OptionValue")如果你上面表单里单选按钮里name为OptionValue的话;
第二个【】应该是request.form("submit")="cammand1"或者request.QueryString("submit")="cammand1",如果你上面表单里提交按钮里name为cammand1的话。
代码经过整理后如下.
Option Explicit
Private Sub Command1_Click()
Dim a As Single, b As Single, t As Single, s As String
a = Val(Text1.Text)
b = Val(Text2.Text)
Select Case【?】
Case Option1.Values = "+"t = a + b
Case Option2.Values = "-"t = a - b
Case Option3.Values = "*"t = a * b
Case Option4.Values = "/"
If b <> 0 Then
t = a / b
Else
MsgBox "除数为0"
Text2.Text = ""
Text2.SetFocus
End If
End Select
If 【?】 Then Text3.Text = a & s & b & "=" & t
End Sub
Private Sub Form_Load()
Option1.Value = True
End Sub
这道考试题我看不懂应该填什么.这应该是VB做计算器中的代码,这道题出的!!!!
用户输入两个数字.在单选按钮中进行 加减乘除 选项后进行 加减乘除 判断并得到结果输出在text3 文本框中
.怎么能用option控件进行 加减乘除 选项
有点不明白,主要是在case option 上,正常来说select case 后面是一个变量,下面的case语句按变量值进行计算。