vb填空题模拟考试系统，请求诸位大神了，帮帮忙吧，揭不开锅了。。。。。_百度知道
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。
vb填空题模拟考试系统，请求诸位大神了，帮帮忙吧，揭不开锅了。。。。。
如果太多，太复杂，只求vb程序，先感谢看过这个问题的人了。更加感谢能帮帮我的人。
一、课程设计时间学年第一学期，1~2周，共计2周。
二、课程设计内容用VB+Access组合编写程序，实现VB填空题的模拟考试：依据初始化数据(各题数量和分值，总分为...
我有更好的答案
java的话，还可以帮你弄下，实在没玩过VB，帮不了你了
同样谢谢你。
晕啊，不难做，但是内容不少，要花一些时间的。估计你不付费的话，只能等雷锋了。我评估一下这个工作量，不考虑界面美工的话，也得做3天左右（8小时工作制），包含调试通过啊。按日工资200元发布，可能有人愿意替你做。
只要vb程序即可。我只是学生而已，应付一下老师罢了。
加我Q吧，注明你名字，晚上回去我帮你写。
额，我怎么加你啊？
你不会看我ID吗？
好吧，我是新手。
为您推荐：
其他类似问题
您可能关注的内容
模拟考试的相关知识
换一换
回答问题，赢新手礼包小弟出一个题目，看看哪位程序设计大神会做，用VB6.0来解【华硕吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：408,630贴子：
小弟出一个题目，看看哪位程序设计大神会做，用VB6.0来解收藏
一、题目：随机选车牌二、目的与要求：1.目的：培养学生综合利用VisualBasic6.0语言进行程序设计的能力，主要培养学生使用系统提供的标准函数，熟练使用相关的控件和方法结合常用算法进行程序设计。2.基本要求：①要求用VisualBasic6.0提供的系统函数及常用控件，结合学习过的常用算法完成设计。②在设计程序的过程中，要求会使用按钮(commandbutton)、组合列表框(combo)，文本框(text)、标签(label)、框架(frame)、复选框(check)等基本控件的属性、方法和相关事件。③要求在程序中能够随机生成一个数字字符串。字符串的长度、对某些位的特殊要求（必须具备长度设置、最后一位是否可以为“4”、任一位是否可以为4、军用牌照、警用牌照这些最常见要求）可由用户设置，最终生成符合要求的机动车车牌号显示给用户。④要求保证每次单击选号按钮必能产生一个符合要求的号码，且不能重复（将每次选出的号码写入文本文件，产生新号时要和文件中已经存在的号码逐一比较，若重复，重新生成）。⑤程序界面美观，运行无差错，界面参考下图。?三、设计方法和基本原理：1.问题描述： 一般的机动车车牌号都是随机选择的，本程序模拟一个随机产生车牌号的系统。在随机前提下，能够满足用户的一定要求，例如前面提过的有可能是军用车牌必须用 甲、乙、丙…作为字头；警用车牌一般用&0&作为字头。2.问题的解决方案：根据问题描述，可以将问题解决分为以下几个方面：①使用工具箱中的基本控件开发用户界面。②使用随机函数产生随机数，将其转换为合适的类型，根据用户要求进行取舍，生成符合要求的车牌号。?③将生成的车牌号显示给用户。四、主要技术问题的描述：根据以上分析，可知将随机产生的数据转化为符合用户要求的数据为程序的关键，分析如下：随机数产生可用 Rnd()函数，可将生成的数据转换为字符串类型，以后可方便使用各种字符串操作函数。由于每次生成的数据可能不符合要求，为保证每次点击按纽都有数据产生，可通过循环算法来保证。
奇迹重生，重铸辉煌，新版魔剑士归来！海量钻石，众多好礼，你敢拿我就送！
登录百度帐号推荐应用10:37 提问
哪位大神可以帮我讲解一下这个vb程序啊 ，感激不尽
With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientPortrait
.TopMargin = InchesToPoints(0.8)
.BottomMargin = InchesToPoints(0.8)
.LeftMargin = InchesToPoints(0.8)
.RightMargin = InchesToPoints(0.8)
.Gutter = InchesToPoints(0)
.HeaderDistance = InchesToPoints(0.5)
.FooterDistance = InchesToPoints(0.5)
.PageWidth = InchesToPoints(8.5)
.PageHeight = InchesToPoints(11)
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
.SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False
.DifferentFirstPageHeaderFooter = False
.VerticalAlignment = wdAlignVerticalTop
.SuppressEndnotes = False
.MirrorMargins = False
.TwoPagesOnOne = False
.GutterPos = wdGutterPosLeft
Selection.Sections(1).Headers(1).PageNumbers.Add PageNumberAlignment:= _
wdAlignPageNumberRight, FirstPage:=True
Dim quote As String
Dim Keyword As String
Dim j As Integer
quote = """"
Dim found_key As Boolean
Dim startSearch As Long
Dim endSearch As Long
Open "C:\Users\shuqi\Desktop\新建文本文档.txt" For Input As #1
Set myRange = ActiveDocument.Content
Do While Not EOF(1) ' Loop until end of file.
Set myRange = ActiveDocument.Content
endSearch = myRange.End
Input #1, Keyword
With myRange.Find
.Text = Keyword
.Forward = True
.MatchWholeWord = True
.MatchCase = False
While myRange.Find.Execute
myRange.Collapse wdCollapseEnd
Set myIndexEntry = myRange.Fields.Add(myRange, Type:=wdFieldIndexEntry, _
Text:=quote & Keyword & quote)
startSearch = myRange.End
startSearch = startSearch + 7
Set myRange = ActiveDocument.Content
myRange.Start = startSearch
If startSearch = endSearch - 1 Then
GoTo skip_while
With myRange.Find
.Text = Keyword
.Forward = True
.MatchWholeWord = True
.MatchCase = False
' this code is because I had a loop here
If j = 300 Then
myRange.Bold = True
skip_while:
Close #1 ' Close file.
myRange.Start = 0
myRange.End = 0
With ActiveDocument
.Indexes.Add Range:=myRange, HeadingSeparator:= _
wdHeadingSeparatorNone, Type:=wdIndexIndent, RightAlignPageNumbers:= _
True, NumberOfColumns:=1, IndexLanguage:=wdEnglishUS
.Indexes(1).TabLeader = wdTabLeaderDots
按赞数排序
如果你的英语老师死得早，你也可以请教下英文词典。
开头几句给你翻译下，别的去请教你的英语老师：
With ActiveDocument.PageSetup 活动文档的页面设置
.LineNumbering.Active = False 行号的不要
.Orientation = wdOrientPortrait 纸张纵向
.TopMargin = InchesToPoints(0.8) 顶端边距
.BottomMargin = InchesToPoints(0.8) 底端边距
.LeftMargin = InchesToPoints(0.8) 左边距
.RightMargin = InchesToPoints(0.8) 右边距
.Gutter = InchesToPoints(0) 装订线
.HeaderDistance = InchesToPoints(0.5) 页眉距离
.FooterDistance = InchesToPoints(0.5) 页脚距离
.PageWidth = InchesToPoints(8.5) 纸张宽度
.PageHeight = InchesToPoints(11) 纸张高度
.FirstPageTray = wdPrinterDefaultBin 首页装纸盘
.OtherPagesTray = wdPrinterDefaultBin 其它页装纸盘（这里解释下，有时候我们封面比如说用牛皮纸，其他页用打印纸，那么这两个设置就很有用）
.SectionStart = wdSectionNewPage 选区开始
.OddAndEvenPagesHeaderFooter = False 单页和双页区分页眉页脚
呵呵，你要是经常和代码打交道的话，英语一般般，这些属性基本上一看就知道个大概。
要是想逐一弄懂都是什么意思，可以安装下面步骤：
录制一段宏（专录页面设置部分），随便设置几项内容，结束宏后查看代码然后逐一对应看是什么意思，
有不懂的属性直接在vba窗口内打开对象浏览器然后搜索相关的属性，看看是如何使用的。
Sub Macro1()
' Macro1 Macro
由 MicroDDD 录制
With ActiveDocument.Styles(wdStyleNormal).Font
If .NameFarEast = .NameAscii Then
.NameAscii = ""
.NameFarEast = ""
With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientLandscape
.TopMargin = CentimetersToPoints(3.17)
.BottomMargin = CentimetersToPoints(3.17)
.LeftMargin = CentimetersToPoints(2.54)
.RightMargin = CentimetersToPoints(2.54)
.Gutter = CentimetersToPoints(0)
.HeaderDistance = CentimetersToPoints(1.5)
.FooterDistance = CentimetersToPoints(1.75)
.PageWidth = CentimetersToPoints(29.7)
.PageHeight = CentimetersToPoints(21)
.FirstPageTray = wdPrinterAutomaticSheetFeed
.OtherPagesTray = wdPrinterAutomaticSheetFeed
.SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False
.DifferentFirstPageHeaderFooter = False
.VerticalAlignment = wdAlignVerticalTop
.SuppressEndnotes = False
.MirrorMargins = False
.TwoPagesOnOne = False
.BookFoldPrinting = False
.BookFoldRevPrinting = False
.BookFoldPrintingSheets = 1
.GutterPos = wdGutterPosLeft
.LayoutMode = wdLayoutModeLineGrid
呵呵，我的word技巧还有不少是我的英语老师教我的。
准确详细的回答，更有利于被提问者采纳，从而获得C币。复制、灌水、广告等回答会被删除，是时候展现真正的技术了！
其他相关推荐求VB大神解答一下，一个简单的程序【vb吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：105,800贴子：
求VB大神解答一下，一个简单的程序收藏
怎么写 使这个界面 用户可以输入名字分数等，点击提交可以显示提交成功并保存 然后全部保存后点击显示，在Label6 显示姓名 学号 和成绩总分~~~~求大神 急急急急！！！！！！！！！谢谢 在线等啊~~
vb 编程培训选择达内的理由1,企业级开发环境2,项目实战教学3,net课程可选4,金牌讲师授课5,周末/业余班任选.vb 编程培训首选达内--美国上市公司!
你这个储存数据功能要用到数据库或者直接以二进制文件形式保存（刚接触VB的建议用这个），到指定文件夹下次再次读取指定文件夹里的二进制文件到文本框，用丰富文本框很容易实现（百度查丰富文本框用法）
其他是基础，看看文本框，按钮控件，label控件的基本用法就会
去vb.net吧问吧，我忘了vb.net里的msgbox从哪里找了
登录百度帐号推荐应用2016年11月 VB大版内专家分月排行榜第二2016年1月 MS-SQL Server大版内专家分月排行榜第二2015年12月 MS-SQL Server大版内专家分月排行榜第二2015年11月 MS-SQL Server大版内专家分月排行榜第二2015年5月 MS-SQL Server大版内专家分月排行榜第二2015年4月 MS-SQL Server大版内专家分月排行榜第二2015年1月 VB大版内专家分月排行榜第二2015年1月 MS-SQL Server大版内专家分月排行榜第二2014年12月 VB大版内专家分月排行榜第二2014年11月 MS-SQL Server大版内专家分月排行榜第二2014年9月 MS-SQL Server大版内专家分月排行榜第二2013年8月 VB大版内专家分月排行榜第二2013年6月 VB大版内专家分月排行榜第二2013年5月 VB大版内专家分月排行榜第二2010年4月 VB大版内专家分月排行榜第二2010年3月 VB大版内专家分月排行榜第二2008年12月 VB大版内专家分月排行榜第二2008年8月 VB大版内专家分月排行榜第二2008年7月 VB大版内专家分月排行榜第二2007年11月 VB大版内专家分月排行榜第二
2017年1月 MS-SQL Server大版内专家分月排行榜第三2015年6月 MS-SQL Server大版内专家分月排行榜第三2015年3月 MS-SQL Server大版内专家分月排行榜第三2015年2月 MS-SQL Server大版内专家分月排行榜第三2014年12月 MS-SQL Server大版内专家分月排行榜第三2014年10月 VB大版内专家分月排行榜第三2014年10月 MS-SQL Server大版内专家分月排行榜第三2014年8月 MS-SQL Server大版内专家分月排行榜第三2013年9月 VB大版内专家分月排行榜第三2013年3月 VB大版内专家分月排行榜第三2012年5月 VB大版内专家分月排行榜第三2012年4月 VB大版内专家分月排行榜第三2010年10月 VB大版内专家分月排行榜第三2010年8月 VB大版内专家分月排行榜第三2010年7月 VB大版内专家分月排行榜第三2009年5月 VB大版内专家分月排行榜第三2008年9月 VB大版内专家分月排行榜第三2008年4月 VB大版内专家分月排行榜第三2008年2月 VB大版内专家分月排行榜第三
2017年11月 VB大版内专家分月排行榜第二2017年3月 VB大版内专家分月排行榜第二2016年12月 VB大版内专家分月排行榜第二2016年10月 VB大版内专家分月排行榜第二2013年11月 VB大版内专家分月排行榜第二
2016年3月 VB大版内专家分月排行榜第三2012年9月 VB大版内专家分月排行榜第三
2016年11月 VB大版内专家分月排行榜第二2016年1月 MS-SQL Server大版内专家分月排行榜第二2015年12月 MS-SQL Server大版内专家分月排行榜第二2015年11月 MS-SQL Server大版内专家分月排行榜第二2015年5月 MS-SQL Server大版内专家分月排行榜第二2015年4月 MS-SQL Server大版内专家分月排行榜第二2015年1月 VB大版内专家分月排行榜第二2015年1月 MS-SQL Server大版内专家分月排行榜第二2014年12月 VB大版内专家分月排行榜第二2014年11月 MS-SQL Server大版内专家分月排行榜第二2014年9月 MS-SQL Server大版内专家分月排行榜第二2013年8月 VB大版内专家分月排行榜第二2013年6月 VB大版内专家分月排行榜第二2013年5月 VB大版内专家分月排行榜第二2010年4月 VB大版内专家分月排行榜第二2010年3月 VB大版内专家分月排行榜第二2008年12月 VB大版内专家分月排行榜第二2008年8月 VB大版内专家分月排行榜第二2008年7月 VB大版内专家分月排行榜第二2007年11月 VB大版内专家分月排行榜第二
2017年1月 MS-SQL Server大版内专家分月排行榜第三2015年6月 MS-SQL Server大版内专家分月排行榜第三2015年3月 MS-SQL Server大版内专家分月排行榜第三2015年2月 MS-SQL Server大版内专家分月排行榜第三2014年12月 MS-SQL Server大版内专家分月排行榜第三2014年10月 VB大版内专家分月排行榜第三2014年10月 MS-SQL Server大版内专家分月排行榜第三2014年8月 MS-SQL Server大版内专家分月排行榜第三2013年9月 VB大版内专家分月排行榜第三2013年3月 VB大版内专家分月排行榜第三2012年5月 VB大版内专家分月排行榜第三2012年4月 VB大版内专家分月排行榜第三2010年10月 VB大版内专家分月排行榜第三2010年8月 VB大版内专家分月排行榜第三2010年7月 VB大版内专家分月排行榜第三2009年5月 VB大版内专家分月排行榜第三2008年9月 VB大版内专家分月排行榜第三2008年4月 VB大版内专家分月排行榜第三2008年2月 VB大版内专家分月排行榜第三
匿名用户不能发表回复！|
每天回帖即可获得10分可用分！小技巧：
你还可以输入10000个字符
(Ctrl+Enter)
请遵守CSDN，不得违反国家法律法规。
转载文章请注明出自“CSDN（www.csdn.net）”。如是商业用途请联系原作者。}