算法与程序设计VB试题与答案09

合集下载

vb程序设计题及答案

vb程序设计题及答案【篇一：vb程序设计试题及答案】txt>一、单选题1. visual basic是一种面向对象的可视化程序设计语言，采取了 a的编程机制。

(a) 事件驱动 (b) 按过程顺序执行(c) 从主程序开始执行 (d) 按模块顺序执行2. 若要使标签控件显示时不覆盖其背景内容，要对d 属性进行设置。

(a) backcolor (b) borderstyle(c) forecolor (d) backstyle3. 在visual basic中最基本的对象是c，它是应用程序的基石，是其他控件的容器。

(a) 文本框 (b) 命令按钮(c) 窗体 (d) 标签4. 要判断在文本框是否按下enter键，应在文本框的 d 事件中判断。

(a) change (b)keydown(c) click (d)keypress5. 数学表达式3≤xl0在vb中的逻辑表达式为 d 。

(a) 3=x10(b) 3=x and x10(c) x=3 or x10 (d) x=3 and x106. rnd函数不可能为下列 b值。

(a) 0 (b) 1(c) 0.1234 (d) 0.00057. 赋值语句:a=123+mid(123456，3，2)执行后，a变量中的值是d。

(a) 12334(b) 123 (c) 12334 (d) 1578. 对于语句if x=l then y=l，下列说法正确的是 c 。

(a) x=l和y=l均为赋值语句(b) x=l和y=l均为关系表达式(c) x=l为关系表达式，y=l为赋值语句(d) x=l为赋值语句，y=l为关系表达式9. 下面程序段表示求两个数中的大数， d 不正确。

(a) max=iif(xy，x，y) (b) if xy then max=x else max=y(c) max=x (d) ify=x then max=yif y=x then max=y max=x10.当在文本框中输入“abcd”4个字符时，窗体上显示的是c。

vb试题及答案(共10篇)

vb试题及答案（共10篇）篇1：计算机vb试题及答案计算机vb试题及答案(1)下面叙述正确的是(C)A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上三种描述都不对(2)以下数据结构中不属于线性数据结构的是(C)A.队列B.线性表C.二叉树D.栈(3)在一棵二叉树上第5层的结点数最多是(B)注：由公式2k-1得A.8B.16C.32D.15(4)下面描述中，符合结构化程序设计风格的是(A)A.使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑B.模块只有一个入口，可以有多个出口C.注重提高程序的执行效率D.不使用goto语句(5)下面概念中，不属于面向对象方法的是(D)A.对象B.继承C.类D.过程调用(6)在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是(B)A.可行性分析B.需求分析C.详细设计D.程序编码(7)在软件开发中，下面任务不属于设计阶段的是(D)A.数据结构设计B.给出系统模块结构C.定义模块算法D.定义需求并建立系统模型(8)数据库系统的核心是(B)A.数据模型B.数据库管理系统C.软件工具D.数据库(9)下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10)下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式B.外模式C.概念模式D.逻辑模式(11)算法的时间复杂度是指(C)A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数(12)算法的空间复杂度是指(D)A.算法程序的长度B.算法程序中的指令条数C.算法程序所占的存储空间D.算法执行过程中所需要的存储空间(13)设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B)注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A.349B.350C.255D.351(14)结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15)在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)注：即第一个阶段A.概要设计B.详细设计C.可行性分析D.需求分析(16)数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。

vb程序设计试题及答案

vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. SetD. All of the above答案：A3. 在VB中，下列哪个选项是正确的循环语句？A. ForB. DoC. WhileD. All of the above答案：D4. VB中用于打开文件的函数是？A. OpenB. CloseC. WriteD. Read答案：A5. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. Select CaseC. Do WhileD. All of the above答案：A6. VB中用于创建新窗体的语句是？A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案：A7. VB中用于声明常量的关键字是？A. ConstB. DimC. StaticD. Option答案：A8. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案：A9. VB中用于结束程序的语句是？A. EndB. ExitC. CloseD. All of the above答案：B10. VB中用于捕获异常的语句是？A. Try...CatchB. On ErrorC. CatchD. All of the above答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个名为myVar的变量，其类型为字符串，应该使用语句________。

答案：Dim myVar As String2. VB中，用于定义一个名为myFunction的函数，返回值为整数，应该使用语句________。

《算法与程序设计》模块练习题-VB语言.

《算法与程序设计》模块练习题-VB语言一、单选题（每题1分）：1．计算机程序的三种结构是顺序结构、、选择结构。

A．模块结构B．循环结构C．多重循环结构D．块IF结构2．在VB应用程序设计中，通常应对编写程序代码。

A．所有对象B．窗体C．Timer D．有事件的对象3．在VB程序设计中，是指用户操作引发或由系统引发，能被对象所识别并做出响应的动作。

A．任务B．事件C．控件D．过程4．在面向对象程序设计中，用来描述对象的特征信息。

A．事件B．方法C．代码D．属性5．在VB系统中，一个对象具有的内部函数或过程，称之为该对象的。

A．代码B．属性C．方法D．事件6．算法是。

A．计算方法B．计算公式C．对解决问题的方法和步骤的描述7．在VB编程中，如果需要返回鼠标的当前位置时，应该使用事件。

A．Click B．Change C．MouseDown D．KeyPress8．在VB应用程序设计中，如果想让Timer控件每秒钟响应一次，应该将其Inerval属性设置为。

A．1 B．60C．100 D．10009．下列过程中，是程序开始运行时，窗体一加载就运行的程序段。

A．Form_Load B．Form_ClickC．Form_MouseDown D．Form_KeyPress10．下列句子中，不是赋值语句。

A．A=”123” +”456”B．Label1.Captin=”你好！”C．r=Val(Text1.Text) D．x+1=y11．的Visual Basic表达式是。

A．(-b+b^2-4ac)/2a B．(-b+sqr(b^2-4*a*c))/(2*a)C．(-b+sqr(b^2-4ac))/(2a) D．(-b+sqr(b^2-4ac))/2a12．生成一个1~6的随机整数的表达式是。

A．Rnd * 6+ 1 B．Fix (Rnd * 6 ) + 1C．Fix (Rnd * 5 ) - 1 D．Fix (Rnd * 5 )13．在VB中，窗口坐标系的原点在，x轴向右为正，y轴向下为正。

09信息技术水平测试第一次模拟试题(vb)

省句中信息技术水平测试第一次模拟试题(算法与程序设计)单选题（每题1分）1、下列有关信息技术的描述，正确的是( )。

A、在人类历史上发生过五次信息技术革命，第五次信息技术革命是计算机的普及应用及其与现代通信技术的结合B、随着信息技术的发展，近期内电子出版物会完全取代纸质出版物C、信息技术是计算机技术和网络技术的简称D、英文的使用是信息技术的一次革命2、飞行员学校采用计算机模拟驾驶飞机训练系统对学员进行培训，这主要采用了( )A、图形识别技术B、身份认证技术C、分布处理技术D、虚拟现实技术3、下列活动不适合用信息技术手段解决的有( )。

A．获得2008年北京奥运会的相关资料B．对一幅老照片进行修复C．做制取气体的化学实验D．管理自己的财务4、某同学在"www. "的搜索栏输入"高二物理试题"，然后单击"搜索"按钮，请问他的这种信息资源检索是属于( ) A、分类搜索B、全文搜索C、多媒体信息检索D、专业垂直搜索5、使用全文搜索引擎(如Google)进行搜索时，关键词"综合性大学 -上海"表示( )。

A、上海的综合性大学B、上海的非综合性大学C、不包含"上海"二字但包含"综合性大学"的网页D、上海和综合性大学6、要尽可能多地查询到有关科技、科普方面的网址，应在关键词栏中输入（）A. 科技科普B. 科技AND科普C. 科技OR科普D. 科普科技7、下列说法正确的是（）A、搜索引擎按其工作方式可划分为全文搜索引擎和目录索引类搜索引擎B、搜索引擎按其工作方式可划分为目录索引类搜索引擎与分类式搜索引擎C、全文搜索方式又被称为分类搜索D、目录索引类搜索引擎的使用方法称为“关键词查询”8、可以方便的检索多个搜索引擎，扩大检索范围，同时检索多个数据库的搜索引擎属于( )A、元搜索B、全文搜索C、垂直搜索D、目录索引类搜索9、为了使计算机输出“狂草”字体的汉字，你认为应该做的编码工作是（）A、汉字的输入码B、狂草内码C、狂草外码D、狂草字型码10、汉字的输出码可以用点阵方式来表示，目前汉字在显示器上显示的就是点阵汉字。

VB程序设计第九章课后习题答案

第九章课后习题答案一、选择题二、填空题1、2—下拉式列表框Style 22、文本框列表框3、Inteval 5004、Scroll5、List 0 Clear6、没有方法，也没有外观四、设计题1、Private Sub Option1_Click()Text1.FontSize = 10End SubPrivate Sub Option2_Click()Text1.FontSize = 12End SubPrivate Sub Option3_Click()Text1.FontSize = 14End SubPrivate Sub Option4_Click()Text1.ForeColor = RGB(255, 0, 0)End SubPrivate Sub Option5_Click()Text1.ForeColor = RGB(0, 255, 0)End SubPrivate Sub Option6_Click()Text1.ForeColor = RGB(0, 0, 255)End Sub2、Private Sub Combo1_Click()Select Case Combo1.ListIndexCase 0Text1.FontSize = 10Case 1Text1.FontSize = 14Case 2Text1.FontSize = 18Case 3Text1.FontSize = Val(Combo1.Text) End SelectEnd SubPrivate Sub Combo2_Click()Select Case Combo2.ListIndexCase 0Text1.ForeColor = RGB(255, 0, 0) Case 1Text1.ForeColor = RGB(0, 255, 0) Case 2Text1.ForeColor = RGB(0, 0, 255) End SelectEnd SubPrivate Sub Form_Load()ShowCombo1.Text = "字体"Combo1.AddItem "10"Combo1.AddItem "14"Combo1.AddItem "18"Combo1.AddItem "22"Combo2.Text = "颜色"Combo2.AddItem "红色"Combo2.AddItem "绿色"Combo2.AddItem "蓝色"End Sub3、Private Sub Option1_Click(Index As Integer)Select Case Option1(Index).IndexCase 0label1.Left = 0Case 1label1.Left = (Me.ScaleWidth - label1.Width) / 2Case 2label1.Left = Me.ScaleWidth - label1.WidthEnd SelectEnd Sub4、Private Sub Command1_Click()If Option1.Value = True ThenText2 = Text1 - 100ElseText2 = Text1 - 105End IfEnd Sub5、Private Sub Command1_Click()s = 0If Option1.Value = True Thens = Val(Text1)ElseIf Option2.Value = True Thens = Val(Text1) * 1.2Elses = Val(Text1) * 1.4End IfIf Check1.Value = 0 And Check2.Value = 1 Thens = s / 4ElseIf Check1.Value = 1 Thens = s * 1.3End IfLabel2.Caption = "总学时：" & sEnd Sub6、Private Sub command1_Click()Form2.ShowForm2.ClsForm2.Print "您点中了以下"; Form1.List2.ListCount; "个菜：" For i = 0 To Form1.List2.ListCount - 1Form2.Print Form1.List2.List(i)NextEnd SubPrivate Sub Command2_Click()List2.RemoveItem List2.ListIndexEnd SubPrivate Sub Command3_Click()List2.ClearEnd SubPrivate Sub Command4_Click()EndEnd SubPrivate Sub Form_Load()List1.AddItem "鱼香肉丝"List1.AddItem "麻婆豆腐"List1.AddItem "京酱肉丝"List1.AddItem "水煮肉片"List1.AddItem "宫保鸡丁"List1.AddItem "酸菜鱼"End SubPrivate Sub List1_DblClick()For i = 0 To List2.ListCount - 1If List2.List(i) = List1.Text Then Exit ForNext iIf i = List2.ListCount ThenList2.AddItem List1.TextEnd IfEnd Sub7、Private Sub Combo2_Click()Select Case Val(Combo2.Text)Case 1, 3, 5, 7, 8, 10, 12t = 31Case 4, 6, 9, 11t = 30Case 2If Combo1.Text Mod 4 = 0 And Combo1.Text Mod 100 <> 0 Or Combo1.Text Mod 400 = 0 Thent = 29Elset = 28End IfEnd SelectCombo3.ClearCombo3.Text = "日数"For i = 1 To tCombo3.AddItem Str(i)NextEnd SubPrivate Sub Form_Load()Combo1.Text = "年份"For i = 1995 To 2050Combo1.AddItem Str(i)NextCombo2.Text = "月份"For i = 1 To 12Combo2.AddItem Str(i)NextCombo3.Text = "日数"For i = 1 To 31Combo3.AddItem Str(i)NextEnd Sub8、Private Sub HScroll1_Change()Label4.Caption = HScroll1.ValueMe.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value) End SubPrivate Sub HScroll2_Change()Label5.Caption = HScroll2.ValueMe.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value) End SubPrivate Sub HScroll3_Change()Label6.Caption = HScroll3.ValueMe.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value) End Sub9、Private Sub Form_Load()Image1.Picture = LoadPicture("E:\ghy\万里图片\4.jpg")End SubPrivate Sub Form_Resize()Image1.Width = Me.WidthImage1.Height = Me.HeightEnd Subv10、Dim sPrivate Sub Form_Load()Label1.Caption = "程序已经运行了：0秒"Timer1.Interval = 1000Timer1.Enabled = TrueEnd SubPrivate Sub Timer1_Timer()s = s + 1Label1.Caption = "程序已经运行了：" & Str(s) & "秒" End Sub11、Private Sub Command1_Click()List2.AddItem List1.TextList1.RemoveItem List1.ListIndexEnd SubPrivate Sub Command2_Click()List1.AddItem List2.TextList2.RemoveItem List2.ListIndexEnd SubPrivate Sub Form_Load()List1.AddItem "清华大学"List1.AddItem "北京大学"List1.AddItem "中国人民大学"List1.AddItem "北京师范大学"List1.AddItem "北京理工大学"End Sub12、Private Sub Command1_Click()If Trim(Text1) <> "" ThenList1.AddItem Trim(Text1)Text1 = ""Text1.SetFocusLabel2.Caption = "院校数：" & List1.ListCount ElseMsgBox "请先输入院校名!"End IfEnd SubPrivate Sub Command2_Click()If Trim(Text1) <> "" ThenFor i = 0 To List1.ListCount - 1If List1.List(i) = Trim(Text1) ThenList1.RemoveItem iText1 = ""Exit ForEnd IfNextIf i > List1.ListCount Then MsgBox "您输入的院校不存在！"ElseMsgBox "请先输入院校名!"End IfLabel2.Caption = "院校数：" & List1.ListCountEnd SubPrivate Sub Command3_Click()List1.ClearText1 = ""End SubPrivate Sub Command4_Click()EndEnd Sub13、Private Sub Check1_Click(Index As Integer)Select Case IndexCase 0If Check1(0).Value = 1 Then Text1.FontBold = True Else Text1.FontBold = FalseCase 1If Check1(1).Value = 1 Then Text1.FontItalic = True Else Text1.FontItalic = FalseCase 2If Check1(2).Value = 1 Then Text1.FontUnderline = True Else Text1.FontUnderline = False Case 3If Check1(3).Value = 1 Then Text1.FontStrikethru = True Else Text1.FontStrikethru = False End SelectEnd SubPrivate Sub Command1_Click()HScroll1.Value = 8For i = 0 To 3Check1(i).Value = 0Option1(i).Value = FalseOption2(i).Value = FalseNextText1.FontSize = 12Text1.FontName = "宋体"Text1.ForeColor = vbBlackEnd SubPrivate Sub Command2_Click()EndEnd Sub'将text1的属性MultiLine设置为“True”Private Sub Form_Load()Text1 = "好雨知时节，" & vbCrLf & "当春乃发生。

算法与程序设计VB测试卷

算法与程序设计测试题一、选择题1．在VB 语言中，下列正确的赋值语句是（）。

A ． a + a = 2B ． 3 * a = c – 5C ． a = 2 * aD ． a + 3 = b2．代数式 dc b a -+对应的VB 表达式是（）。

A ． (a + b)/(c - d)B ． (a + b)/c – dC ． a + b/(c - d)D ． a + b/c - d3．不能使用"do"作为变量名的原因是（）。

A ．由英文字母开头B ．后面没有使用数字C ．使用了英文单词D ．使用了关键字4．在以下程序段中，语句print "hello"的执行次数是（）。

For i=1 to 3 step 2Print "hello"Next iA ．4B ．3C ．2 D．15．在VB 语言中，表示“a 大于5或b 小于0” 的正确表达式是（）。

A ． 0 < b Or a < 5B ． a > 5 And b < 0C ． a > 5 Or b < 0D ． a > 0 And b < 56．若a = 4，b = 5，则运行Print a; "+"; b; "="; a + b 的结果是（）。

A ． 4 + 5 = 9B ． a + b = 9C ． a + b = a + bD ． 97．下列循环语句中，循环次数无限的是（）。

8．以下说法正确的是（）。

A ．VB 是操作系统B ．VB 是文字处理软件C ．VB 是电子表格软件D ．VB 是程序设计软件9．在VB 中，要在窗体上添加一个标签，在工具箱中要单击控件是（）。

A ．B ．C ．D ．10．设置标签标题时，应改变标签的（）属性。

A ． NameB ． FontC ． BackColor D． Caption 二、填空题11．将下列式子改写成VB 的表达式B A AB-+2______________________________12．写出下面程序段运行的结果A=1A=A+1Print A+1运行后显示的结果是______________________________13．写出下面程序段运行的结果A=1B=2S=A+BIf S>3 ThenS=S+1ElseS=S-1End IfPrint S运行后显示的结果是______________________________14．写出下面程序段运行的结果For M=1 To 10Print "A";Next M运行后显示的结果是______________________________15．写出下面程序段运行的结果For M=1 To 10M=M+1Print "A";Next M运行后显示的结果是______________________________16．写出下面程序段运行的结果For M=1 To 10Next MPrint M+1运行后显示的结果是______________________________17．写出下面程序段运行的结果M=5N=2A=M mod NB=M\nPrint A+B运行后显示的结果是______________________________18．写出下面程序段运行的结果M=5Print "M=",M运行后显示的结果是______________________________19．写出下面程序段运行的结果A= "China"A= "Beijing"Print A运行后显示的结果是______________________________19．写出下面程序段运行的结果M=80Print X+1;X+2;X+3运行后显示的结果是______________________________三、编写程序21．请用For循环语句实现计算1+2+3+…+100的程序。

VB程序设计试题及参考答案

VB程序设计试题及参考答案VB程序设计及参考答案⼀、单选题（共20分，每⼩题1分）1、要改变控件的宽度，应修改该控件的（）属性。

（A）TOP （B）width （C）Left （D）Height2、将命令按钮Command1设置为不可见，应修改该命令按钮的（）属性。

（A）Visible （B）Value （C）Caption（D）Enabled3、（）对象具有clear⽅法。

（A）图⽚框（B）窗体（C）复选框（D）列表框4、启动VB后，就意味着要建⽴⼀个新（）。

（A）窗体（B）⽂件（C）⼯程（D）程序5、下列（）对象不具有Clear⽅法。

（A）列表框（B）组合框（C）剪贴框（D）图⽚框6、组合框有三种风格，它们由Style属性所决定，其中为简单组合框时，Style 属性值应为（）（A）0 （B）1 （C）2 （D）37、下列可调整图⽚框的⼤⼩以适合图⽚的属性是（）（A）Stretch （B）autosize （C）picture （D）oledropmode 8、要想清除⽂本框中的内容则可利⽤（）进⾏。

（A）Caption （B）Text （C）Clear （D）Cls9、在⽂本框控件中将Text的内容全部显⽰为所定义的字符的属性是（）。

（A）Password （B）PasswordChar（C）需要编程来实现（D）以上都不是10、Visual Basic是⼀种⾯向对象的程序设计语⾔，所采⽤的编程机制是（）。

（A）从主程序开始执⾏（B）按过程顺序执⾏（C）事件驱动（D）按模块顺序执⾏11、下列四项中合法的变量名是（）。

（A）a-bc （B）a_bc （C）4abc （D）integer12、⽆论何种控件，共同具有的属性是（）（A）Text （B）Name （C）Caption （D）ForeColor13、有程序代码如下：Text1.Text = "Visual Basic程序设计"则Text1、Text ，和"Visual Basic程序设计"分别代表（）。

vb程序设计试题(含答案)

第一套试题一、选择题〔每题 2 分，共 30 分〕1.在 VB环境中，工程文件的扩展名是 ( C )〔 A〕 .frm〔B〕.bas〔C〕.vbp〔D〕.frx2.下面 4 项中不属于面向对象系统三要素的是 ( A )〔 A〕变量〔B〕事件〔C〕属性〔D〕方法、/ 、Mod、 * 这 4 个算述运算符中，优先级别最低的是( C )〔 A〕 \〔B〕/〔C〕Mod〔D〕*4.要使 Print 方法在 Form_Load事件中起作用，要对窗体的 ( C ) 属性进行设置〔 A〕 BackColor〔B〕ForeColor〔 C〕 AutoRedraw〔D〕Caption5.不管何控件，共同具有的属性是 ( B )〔 A〕 Text〔B〕Name〔 C〕 ForeColor〔D〕Caption6.要使 Form1窗体的标题栏显示“欢送使用 VB〞，以下语句正确的选项是 ( D )A〕 Form1.Caption= “欢送使用 VB〞〔B〕Form1.Caption= ˊ欢送使用 VBˊ〔 C〕 Form1.Caption= 欢送使用 VB〔D〕Form1.Caption=〞欢送使用VB〞7.VB 提供了结构化程序设计的 3 种根本结构，这 3 种根本结构是 ( D )〔 A〕递归结构，选择结构，循环结构〔B〕选择结构，过程结构，顺序结构（C〕过程结构，输入、输出结构，转向结构〔D〕选择结构，循环结构，顺序结构8. 给变量赋值 a=123+MID(“123456〞 ,3,2) ，a 变量中的值是 ( D )〔 A〕“ 12334〞〔B〕123〔C〕12334〔D〕157 下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40 岁条件的人数，不正确的语句是 ( D )〔 A〕 If sex= “男〞 And age＜40 And InStr(duty,“教授〞)＞0 Then n=n+1B〕 If sex= “男〞 And age＜40 And (duty= “教授〞 Or duty= “副教授〞 ) Then n=n+1〔 C〕 If sex= “男〞 And age＜40 And Right(duty,2)=“教授〞Then n=n+1〔 D〕 If sex=“男〞 And age＜ 40 And duty= “教授〞 And duty= “副教授〞 Thenn=n+110. 假设要去除列表框的所有内容，可用来实现的方法是( C )〔 A〕 RemoveItem〔B〕Cls〔 C〕 Clear〔D〕以上均不可以11.要使时钟控件 Timer1 的 Timer 事件不起作用，以下正确的语句是 ( B ) 〔 A〕 Timer1.Visible=False〔B〕Timer1.Enabled=False〔 A〕 Timer1.Interval=1000〔D〕Timer1.Index=0引用列表框 (List1) 最后一个数据项应使用的语 ( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount)(D)List1.List(ListCount-1)13.如下数组声明语句，正确的选项是 ( B )〔 A〕 Dim a[3,4]As Integer 〔 C〕 Dim a(n,n) As Integer 〔B〕Dim a(3,4)As Integer 〔D〕Dim a(3,4)As Integer14.下面子过程语句说明合法的是 (A 、D )〔 A〕 Sub f1(ByVal n%) 〔 C〕 Function f1%(f1%) 〔B〕Sub f1(n%)As Integer 〔D〕Function f1(ByVal n%)15.假定有如下的命令按钮 ( 名称为 Command1)事件过程：Private Sub Command1_Click()x=InputBox(" 输入： " ， " 输入整数 ")MsgBox"输入的数据是：〞，，〞输入数据："+xEnd Sub16. 程序运行后，单击命令按钮，如果从键盘上输入整数10，那么以下表达中错误的是(A)〔 A〕x 的值是数值 10〔B〕输入对话框的标题是“输入整数〞（C〕信息框的标题是“输入数据： 10〞〔 D〕信息框中显示的是“输入的数据是：〞二、填空题〔每题 2 分，共 20 分〕1、当进入 VB集成环境后，发现没有显示“工具箱〞窗口，应选择视图菜单的工具箱选项，使“工具箱〞窗口显示。

程序设计语言VB综合设计题及答案[精选五篇]

程序设计语言VB综合设计题及答案[精选五篇]第一篇：程序设计语言VB综合设计题及答案《程序设计语言VB》综合设计题1.编制程序实现：在窗体上，单击按钮1，在文本框中动态显示当前时间；单击按钮2，则停止动态显示；单击按钮3，清除文本框内容。

提示：可用定时器控制时间，用系统函数Now显示时间（如Text1.Text = Now）。

2.编制程序：求出100-200之间所有可以被3整除的数的总和，将结果用消息框显示输出。

3.编制程序：利用输入框输入10个不同的整数，将它们从小到大排序，并打印输出。

4.编制程序实现：设计在一框架中包含三个复选框，只有当其1,3选中而2未选中时，才在Text1中显示“Hello”字符。

5.编一程序能实现在窗体上打印出如下图所示的图形。

A AAA AAAAA AAAAAAA BBBBBBB BBBBB BBB B 6.编一程序用于判断一正整数是否为素数。

（提示：只能被1和本身整除的正整数称为素数。

为了判断一个数n是不是素数，可以将n被2到sqr(n)之间的所有整数除，如果都除不尽，则n就是素数，否则n是非素数。

）7.选用If和Select判断结构中任意一种编写满足下列条件的计税要求的程序：少于1600元，免税；1601-5000元，征2%的税；多于5000元，超过部分征5%的税。

8.有a、b、c三个数，编一程序实现通过文本框给a、b赋值；再调用能完成a、b比较大小的子过程，用c将大数回传。

要求按值传送a、b。

9.编一程序用于求所有的“水仙花数”。

所谓“水仙花数”是指一个3位数，其各位数字立方和等于该数本身。

例如：153就是一水仙花数，因为153 = 13+53+33。

10.设计一弹出式菜单，用于设置窗体的背景色，背景色包含白色、黄色、红色三种颜色。

11.编写程序实现：输入三角形的三条边a,b,c的值，根据其数值判断能否构成三角形。

如果能，则判断三角形是否是直角三角形，若是则计算该直角三角形的面积。

VB程序设计试题与答案解析

VB程序设计试题与答案解析vb程序设计试题1.多窗体程序是由多个窗体组成，在缺省情况下，vb在应用程序执行时，总是把（）指定为启动窗体。

a.不涵盖任何控件的窗体b.设计时的第一个窗体c.涵盖控件最少的窗体d.命名为frm1的窗体2.应用程序打包后，其包文件的后缀为（）。

a..exeb..cabc..txtd..ocx3.当一个工程中含有多个窗体时，其中的启动窗体是（）。

a.启动vb时建立的第一个窗体b.第一个嵌入的窗体c.最后一个添加的窗体d.在“工程属性”对话框中指定的窗体4.能发生改变标签label控件表明标题的属性就是（）。

a.capionc.clickd.text5.下面关于工程的概念中错误的就是（）。

a.visualbasic的工程是相关应用程序文件的集合b.visualbasic的工程实际上为了管理形成应用程序的所有文件c.一个小的visualbasic应用程序就可以形成一个工程d.建立只有一个窗口的应用程序，会生成多个程序文件，也称为一个工程6.将一个vb程序留存在磁盘上，至少可以产生的文件就是（）。

a..doc、.txtb..txt、.exec..vbp、.frmd..bat、.frmb.7.一个vb应用程序可以包含几个vbp文件（）8.a.1个b.2个c.可以没d.不受限制9.8.当运行程序时，系统自动执行启动窗体的（）事件过程。

a.loadb.clickc.unloadd.gotfocus9.对于定时器（timer）控件,设置其定时是否开启的属性是（）a.indexb.tagc.enabledd.left10.启动vb后，就意味着要建立一个新（）。

a.窗体b.程序c.文件d.工程a.单击窗体上没有控件的地方b.单击任一个控件c.不执行任何操作d.双击窗体的标题栏12.下面各种高级语言中，不是面向对象程序设计语言的就是（）。

a.visualbasicb.c++c.pascald.java13.visualbasic应用程序处在继续执行模式时，这时（）。