Private Sub Command2_Click() a = Val(Text1.Text) b = Val(Text3.Text) Select Case Text2.Text Case "+" c = a + b: Text5.Text = Str$(c) Case "-" c = a - b: Text5.Text = Str$(c) Case "*" c = a * b: Text5.Text = Str$(c) Case "/" c = a / b: Text5.Text = Str$(c) Case Else Print "运算符错!": Text5.Text = "" End Select End Sub 我很想知道VB中Str$(c)代表的是什么意思.还有,运算符错为什么不能显示在text5内啊?希望高手教教我..初学,很多东西不懂.
3 回答
SMILET
TA贡献1796条经验 获得超4个赞
在Visual Basic 6.0 中,某些函数有两个版本,一个返回 String 值,一个返回 Variant 值。这些函数对通过美元符号 ($) 后缀来与 String 版本区分开来。
白衣非少年
TA贡献1155条经验 获得超0个赞
text5.text=Str$(c)指定把数字c转换为字符串并赋给text5.text
要显示在text5内可以用以下这个程序:
Private Sub Command2_Click()
a = Val(Text1.Text)
b = Val(Text3.Text)
Select Case Text2.Text
Case "+"
c = a + b: Text5.Text = Str$(c)
Case "-"
c = a - b: Text5.Text = Str$(c)
Case "*"
c = a * b: Text5.Text = Str$(c)
Case "/"
c = a / b: Text5.Text = c
Case Else
Text5.Text = "运算符错!"
End Select
End Sub
慕桂英546537
TA贡献1848条经验 获得超10个赞
问题一:
Str$(c)
意思是,将变量c的值转换成字符串;
问题二:
Case Else
Print "运算符错!": Text5.Text = ""
规定了,如果运算符错误时,在窗体上显示“运算符错!”,并且令text5内容为空。
添加回答
举报
0/150
提交
取消