是这样的,我以前是学C的,现在刚学VB,想写个东西来模拟彩票机,
1。我要让数字(string类型的,一共33个)显示在文本框里
2。我要有一个按扭,按了第一次以后文本框里的数字开始跳动(先随机选出来,然后再出现在文本框里),然后按第二次的时候就停下!
因为以前学C的,所以函数调用的时候老是写不对,现在求各位老大帮忙,最好能QQ!
本人的QQ是:165639085(以前认识我的人不要加我,我怕丢人!谢谢包涵!)
谢谢!!
1。我要让数字(string类型的,一共33个)显示在文本框里
2。我要有一个按扭,按了第一次以后文本框里的数字开始跳动(先随机选出来,然后再出现在文本框里),然后按第二次的时候就停下!
因为以前学C的,所以函数调用的时候老是写不对,现在求各位老大帮忙,最好能QQ!
本人的QQ是:165639085(以前认识我的人不要加我,我怕丢人!谢谢包涵!)
谢谢!!
解决方案 »
- 问两个问题,请大家帮忙解释下!!
- 求大侠帮忙啊!!!ACCESS2010掉用SQLsever服务器上SSIS包
- 100分解决关于用datagrid 更新的问题
- 如何用ADO打开代密码的低版本的ACCESS库。(2.0版本的)
- 请问当创建完了一个与窗口兼容的DC之后,如何把一个位图放进这个DC中?不用Bitblt!谢谢!真没办法
- 求最优的SQL语句写法。(望指教)
- 问几个问题,先来先得分(三)。
- 在VB中如何用指定的颜色填充一个多边形区域
- 如何读取text控件中光标所在的位置
- vb做出来的软件在有的电脑上运行显示错误
- 如何访问WEB(HTML)页中的数据?
- 请问怎样通过桌面快捷方式得到程序的安装路径
If Timer1.Enabled = True Then
Timer1.Enabled = False
Else
Timer1.Enabled = True
End If
End Sub'设置运算时间间隔
Private Sub Form_Load()
Timer1.Interval = 50
End Sub
'在timer事件中写入
Private Sub Timer1_Timer()
Dim i As Integer
i = Rnd() * 32 + 1
Text1.Text = i
End Sub
Private Sub Command1_Click()
Timer1.Enabled = Not Timer1.Enabled
End Sub
我也能把我写的给你们看~