VB中如何设置Text2.Text = 任何数字

来源：百度知道 编辑：UC知道 时间：2024/06/16 05:05:09
Private Sub Form_Load()
SkinH_Attach
Text1.Text = "0"
Text2.Text = "5"
WebBrowser1.navigate ("http://xxx.xxx.xx")
End Sub

如何设置Text2.Text = "5" 为任何数字呢?而不是5

Randomize
Text2.Text = 100000*Rnd()

随机数RAD()

RAD生成的随机数小于1

在使用随机数之前，使用Randomize进行初始化

为了语言严谨，使用STR()函数，进行数值与字符转换
Randomize
Text2.Text =STR(RAD())