VB中随机产生一个汽车牌号,由六个字符组成,其中首字符为大写字母,后面是5个数字.据字母判断种类
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/05/02 12:48:25
VB中随机产生一个汽车牌号,由六个字符组成,其中首字符为大写字母,后面是5个数字.据字母判断种类
字母B表示出租车,G表示郊区车,O表示警车,A、C、E、F、H、J、K表示普通车,其他字母组成的车牌号不存在.
Chr(Int(Rnd * 26 + 65)) & (Int(Rnd * (100000) + 0))字符表示
求代码
运行结果如下图
字母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),最后,输出结果即可!
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个数字.据字母判断种类
vb 变量C为文本框输入的一个字符,判断该字符是大小写字母、数字还是其他变量,必须用到下面的程序代码
VB编程 输入一字符,判断其是否是字母,若是字母,再判断是“大写字母”还是“小写字母”
一城市的车牌号由4个数字和1个大写字母组成,其中第二个为英语字母,(1)最后两个数字都是8的概率;(2)恰有三个数字是8
Vb随机生成长度为[20个大写英文字母、数字]的组合,每五个加一个连字符如何写
五个字符 由字母和0-9数字组成 其中至少一个为数字 有多少种情况 最好能给我列出排列组合的公式
上海的汽车牌照有两种:一种自左至右由两个英文大写字母和4个数字组成;另一种自左至右由一个英文大写字母和5个数字组成,据此
(注册用户名)以字母开头,长度为5-20个字符,由英文字母(不区分大小写),数字(0-9),下划线,连字符号组成.
vb随机产生10个两位数随机正整数,求其中素数之和(用过程实现判断一个数是否是素数)
vb中如何随机产生任意字母?
一个车牌号码由4个数字和一个大写英文字母组成.其中第二个为英语字母,
VB中如何写个函数判断数字与字母