怎么设计一个VB随机数，要9位随机数，其中要包括0到9十个数字和26个大写的英文字母，急求代码！！
答案:1 悬赏:40 手机版
解决时间 2021-03-22 05:25
- 提问者网友：趣果有间
- 2021-03-21 10:55
怎么设计一个VB随机数，要9位随机数，其中要包括0到9十个数字和26个大写的英文字母，急求代码！！
最佳答案
- 五星知识达人网友：往事埋风中
- 2021-03-21 12:19
Private Sub Command1_Click()
Dim str_1 As String, MyValue As Integer
str_1 = ""
For n = 1 To 9
Randomize
MyValue = Int((36 * Rnd) + 48)
If MyValue > 57 Then MyValue = MyValue + 7
str_1 = str_1 & Chr(MyValue)
Next
Text1.Text = str_1
End Sub
Dim str_1 As String, MyValue As Integer
str_1 = ""
For n = 1 To 9
Randomize
MyValue = Int((36 * Rnd) + 48)
If MyValue > 57 Then MyValue = MyValue + 7
str_1 = str_1 & Chr(MyValue)
Next
Text1.Text = str_1
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯