VB的case语句关于option的问题

2024-12-28 22:00:17
推荐回答(3个)
回答1:

第一个【】应该是request.form("OptionValue")或者request.QueryString("OptionValue")如果你上面表单里单选按钮里name为OptionValue的话;
第二个【】应该是request.form("submit")="cammand1"或者request.QueryString("submit")="cammand1",如果你上面表单里提交按钮里name为cammand1的话。

回答2:

代码经过整理后如下.
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控件进行 加减乘除 选项

回答3:

有点不明白,主要是在case option 上,正常来说select case 后面是一个变量,下面的case语句按变量值进行计算。