上海东方渔人码头:VB高手请进

来源：百度文库 编辑：杭州交通信息网 时间：2024/05/01 20:18:33
怎样在文本框中通过点击按扭产生一个大于0小于1000的随机整数？将command1 click的程序代码写出。

Private Sub Command4_Click()
Label2.Caption = CInt(Rnd * 1000)
End Sub
VB6.0调试通过

Form1.Text1 = Int(1 + Rnd * 1000)

群里应该会有人能帮助你吧!!
计算机语言交流群：14940080，看简介答对问题就加，欢迎加入

Private Sub Command1_Click()
Text1.Text = Int(Rnd * 999 + 1)
End Sub

Private Sub Command1_Click()
me.text1 = CInt(Rnd * 1000)
End Sub

Private Sub Command1_Click()
Command1.Caption = Int(Rnd * 999 + 1)
End Sub
'Rnd 产生的是[0~1)之间的随机数

vb高手请进！！！！！！！！！！！！！！1 VB高手请进啊！ VB编程高手请进 VB高手请进 VB高手请进 VB高手请进 VB高手请进 vb高手请进来 vb高手请进 vb高手请进