VB中随机产生一个汽车牌号,由六个字符组成,其中首字符为大写字母,后面是5个数字.据字母判断种类字母B表示出租车,G表示郊区车,O表示警车,A、C、E、F、H、J、K表示普通车,其他字母组成的车
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/12 16:58:44
VB中随机产生一个汽车牌号,由六个字符组成,其中首字符为大写字母,后面是5个数字.据字母判断种类
字母B表示出租车,G表示郊区车,O表示警车,A、C、E、F、H、J、K表示普通车,其他字母组成的车牌号不存在.
Chr(Int(Rnd * 26 + 65)) & (Int(Rnd * (100000) + 0))字符表示
求代码
运行结果如下图
Private Sub Command1_Click()
a = Chr(Int(Rnd * 26 + 65))
str1 = a & (Int(Rnd * (100000) + 0))
Select Case a
Case "B"
str2 = "是出租车"
Case "G"
str2 = "是郊区车"
Case "O"
str2 = "是警车"
Case "A"
str2 = "是普通车"
Case "C"
str2 = "是普通车"
Case "E"
str2 = "是普通车"
Case "F"
str2 = "是普通车"
Case "H"
str2 = "是普通车"
Case "J"
str2 = "是普通车"
Case "K"
str2 = "是普通车"
Case Else
str2 = "没有这个车牌"
End Select
Print str1 & str2
End Sub
Chr(Int(Rnd * 26 + 65))产生车牌的首字母,所以可以通过判断Chr(Int(Rnd * 26 + 65))的值来确定车型.
输出由两部分组成:车牌号(str1)+判断结果(str2),所以,在判断语句的内部给结果赋值(即str2),最后,输出结果即可!
VB中随机产生一个汽车牌号,由六个字符组成,其中首字符为大写字母,后面是5个数字.据字母判断种类字母B表示出租车,G表示郊区车,O表示警车,A、C、E、F、H、J、K表示普通车,其他字母组成的车
vb语言随机数问题vb语言中如何编程实现从7,8 ,54,69,12,32这组数字中随机产生一个数字
vb中如何用随机方式产生一个今天的时间
VB随机产生一个英文字母程序怎么编啊?
随机产生一个四位数的VB编码 谢谢了
VB中用随机函数产生一个两位的随机正整数的公式是什么?
Vb随机生成长度为[20个大写英文字母、数字]的组合,每五个加一个连字符如何写
VB程序设计随机产生一个四位数,将其各位上的数字安逆顺序重新组成一个正整数,由ms
在VB中单击菜单产生随机产生10个大写字母
VB随机产生3位数的代码
VB语言中,在固定的10个数中随机产生3个数,怎么编
matlab中怎么产生一个随机矩阵
vb编程:随机产生10个0~100之间整数放到一个数组中,单击窗体,在窗体上显示这10个数以及10个数中的最小值
要随机产生一个两位正整数,其VB表达式该怎样写
在VB中随机产生(a,b]范围内整数的公式是什么
VB中如何随机产生10个两位整数并求它们的平均值
如何用VB产生随机的3,5,8,在这三个数中变化
vb中怎么随机产生3个整数,整数范围不定