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

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

怎么设计一个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