依辰

首页 » VB语言 » 随机幸运数VB小程序源码

随机幸运数VB小程序

 

随机幸运数VB小程序

 

随机幸运数VB小程序

在所写数字的范围随机生成一个数

 

VB小程序源码如下:

Private Sub Command1_Click()
If Command1.Caption = "开始" Then
Timer1.Enabled = True
Command1.Caption = "停止"
Else
Command1.Caption = "开始"
Timer1.Enabled = False
End If
End Sub
Private Sub Timer1_Timer()
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Int(Rnd(b - a + 1) + a)
Label3.Caption = c
End Sub


文章如无特别注明均为原创! 作者: 中华软件库,依辰QQ:634800394 转载或复制请以 超链接形式 并注明出处 中华软件库-优质资源分享网
原文地址《 随机幸运数VB小程序源码》 发布于2019-11-15

评论

切换注册

登录

您也可以使用第三方帐号快捷登录

切换登录

注册