怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/21 20:03:37
怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,怎么设计一个VB随机数,要9

怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,
怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,

怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,
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