vb中如何随机选取车牌号 - VB / 控件
①要求用VisualBasic6.0提供的系统函数及常用控件,结合学习过的常用算法完成设计。
②在设计程序的过程中,要求会使用按钮(commandbutton)、组合列表框(combo),文本框(text)、标签(label)、框架(frame)、复选框(check)等基本控件的属性、方法和相关事件。
③要求在程序中能够随机生成一个数字字符串。字符串的长度、对某些位的特殊要求(必须具备长度设置、最后一位是否可以为“4”、任一位是否可以为4、军用牌照、警用牌照这些最常见要求)可由用户设置,最终生成符合要求的机动车车牌号显示给用户。
④要求使用循环算法保证每次单击选号按钮必能产生一个符合要求的号码。
你到底想问什么?不会是上面的全不懂吧?
这个人好像没有学过VB。①②完全是vb基础,一个程序需要这么多东西吗?
这是道作业题
嗯 是道作业题,就是没啥思路 !!
希望大家指导一下 ,我刚学VB没多少日子,基本上还没咋入门呢!!
Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then 'ASCII码中enter键值为13,意为按了enter键
Combo1.AddItem Combo1.Text, 0 '接收输入的号码
Combo1.SelStart = 0 '设置起始组合框的位置
Combo1.SelLength = Len(Combo1.Text) '设置组合框的长度
End If
If KeyAscii = 27 Then 'ASCII码中escape键值为27
If Combo1.ListIndex <> -1 Then
Combo1.RemoveItem Combo1.ListIndex '移去选项
End If
End If
End Sub
Private
相关问答:
在vb中如何读取Word内容(包含表格,图片,等)
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
我想把word另存为xml之后,用vb读取这个xml的内容,请问如何实现?
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......
有两个问题
第一个问题:
网页源码
<td><select name="question" onchange="showcustomquest(this.value)" tabindex="4"><option value="0">无安全问 ......