22问答网
所有问题
关于VB的编程题。。。如何在Text1随机产生"+"、"-"、"*"、"/"四种符号,用什么函数? 谢谢啦
如题所述
举报该问题
推荐答案 2011-05-25
把这几个符号先存到数组里 用随机函数
Private Sub Form_Load()
Dim S(1 To 4) As String
Dim a As Integer
Randomize
S(1) = "+": S(2) = "-": S(3) = "*": S(4) = "/"
a = Rnd() * 3
Text1.Text = S(a)
End Sub
温馨提示:答案为网友推荐,仅供参考
当前网址:
http://22.wendadaohang.com/zd/f6fCX2XII.html
其他回答
第1个回答 2011-05-25
就是编写一个函数自动生成字符串,把这些字符分别放在数组里面用rnd函数随机生成相应的数组序号调用,再把这些加起来就行了,长度的话看你是要多长的,也可以用rnd来一个不定长的for循环
第2个回答 2011-05-25
随机数 用 rnd
不过,你这个可以用 数组,保存这4个符号
也可以 用 字符串
几种方法,呵呵
相似回答
vb
编写一个能
随机
出题的100以内的加减乘除口算运算器,可以选择加减、乘 ...
答:
If Val(
Text1
.Text) = Val(Label1.Caption) + Val(Label2.Caption) Then MsgBox "回答正确", 1 + 48, "答案"Else MsgBox "回答错误", 1 + 48, "答案"End If Text1.Text = ""End If If Label3.Caption = "-" Then If Val(Text1.Text) = Val(Label1.Caption) - Val(Label2....
VB
自动生成1-100
的随机
数
答:
你这个程序能够运行。既能让
1
-100各个数字按随机顺序排列,也能把这个序列的各个数字保存到文件中。只是,这个方法效率太低,应该用更好的算法提高效率。有什么问题请留言。
大家正在搜