VB笔试习题练习Word格式.docx

1、16.对初学者而言,调试程序方便,有效的手段是 （ A）。A. 在可疑的代码处设置断点，逐语句跟踪 B. 查看资料 C. 通过”立即”窗口显示变量的值 D. 找老师问原因17. 在代码窗口,代码下方有蓝色波浪线表示（B ） 。A .对代码设置了格式 B. 编译语法错误 C. 逻辑错误 D. 运行时错误二.填空题1.VB.NET 是完全面向对象的程序设计语言，其最大的特点是_引入了.net 框架_2._可视化编成技术_技术能让编程人员不必编写代码就可以创建GUI（图形用户界面）。3._解决方案_是由一个或几个项目组成的VB.NET程序。4.当_自动隐藏_特性设置后，浮动窗口将自动隐藏。5.当进入

2、VB.NET集成环境，发现没有显示 “工具箱”窗口，应选择_视图_菜单的_工具箱_。6要同时保存解决方案中的每个文件，最方便的方法是单击工具栏的_全部保存_按钮。7对象属性是指_对象的性质来描述和反应对象特征的参数_。8对象的方法是指_对象的动作、行为_。9在刚建立项目时，使窗体上的所有控件具有相同的字体格式，应对_Form窗体_的_Font_属性进行设置。10属性窗口的属性可以按照_分类顺序_和_字母顺序_顺序排列。11当对命令按钮的Image属性装入.bmp图形文件后，按钮上并没有显示所需的图形，原因是对_FlatStyle _属性设置为_System_。12若已建立了Form1，Form

3、2两个窗体，默认启动窗体为Form1。通过_项目_菜单的_属性_的_常规_选项卡，可将启动对象设置为Form2。13在文本框中，通过_SelectionStart_属性能获得当前插入点所在的位置。14要对文本框中已有的内容进行编辑，按下键盘上的按钮，就是不起作用，原因是设置了_ReadOnly_的属性为True。15在窗体上已建立多个控件，如TextBox1，Label1，Button1，若要使程序一运行焦点就定位在Button1控件上，应对Button1控件设置_TabIndex_属性的值为_0_。第二章 VB.NET语言基础和顺序结构一.选择题 1.在一个语句内写多条语句时，每个语句之间用

4、（B）符号分隔。A， B. ： C.、 D. ；2. 一语句要在下一行继续写，用（C）符号作为续行符。A . + B . - C. _ D . 3. 下面属于合法的变量名的是（ A）。A.X_yz B. 123abc C .Integer D.X-Y 4.下面属于不合法的整常数的是（ D）. A.100 B. &O100 C. &H100 D. %1005.下面属于合法的字符常数的是（ B） 。A.ABC$ B. “ABC” C. ABC D.ABC6. 下面属于合法的单精度型变量的是（A）。A. mun！ B. sum% D. xinte$ D. mm#7.下面属于不合法的双精度常数的是（D

5、）。 A.100# B.100.0 C.1E+2 D.100.0D+28. 表达式16/4-25 * 8/4 Mod 52 的值为（B）。.9.数学关系表达式x10表示成正确的VB.NET表达式为（ B）。A3=x10 B. 3=x AND x=3 OR x10 D.3=x AND =0 AND a+cb+3 OR NOT d的值是_False_。5.Int（-3.5）、Int（3.5）、Fix（-3.5）、Fix（3.5）、Round（3.5）的值分别是 _-4_、_3_、_-3_、_3_、_-4_、_4_。6.表达式UCase（Mid（“abcdefgh”，3，4）的值是_CDEF_。7.

6、在直角坐标系中，x、y是坐标系中任意点的位置，用x和y表示在第一象限或第三象限的表达是_x 0 and y 0 Or x0 and y= “A” and Ucase（s） = “Z”_。11.下面程序随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。例如，产生246，输出是642。 Sub Button1_Click（.） Handles Button1.Click Dim x, y As Integer x=Int （_Rnd（）*900 + 100_） y=（x Mod 10）*100+_（x mod 100）10）*10_+x100 MsgBox（“x=”& x &“y=”

7、 &y） End Sub. 第三章 选择结构 一、选择题：1 VB.NET提供了结构化程序设计的三种基本结构，三种基本结构是（D）。A.递归结构，选择结构，循环结构 B.选择结构，过程结构，顺序结构C.过程结构，输入输出结构，转向结构 D.选择结构，循环结构，顺序结构2 按照结构化程序设计的要求，下面（C）语句是非结构化程序设计语句。Aif语句 B. For语句 C. GoTo语句 D. Select Case语句 3.下面程序段运行后，显示的结果是（A）。 Dim x% If x Then MsgBox（x） Else MsgBox（x+1） A.1 B.0 C.-1 D.显示出错信息4语句

8、“If x=1 Then y=1” 下列说法正确的是（C）。A. “x=1” 和“y=1” 均为赋值语句B“x=1” 和“y=1” 均为关系表达式C“x=1” 为关系表达式“y=1” 为赋值语句D“x=1” 为赋值语句“y=1” 为关系表达式5下面程序段显示的结果是（A）。 Dim x% x=Int（Rnd）+5 Select Case x Case 5 MsgBox（“优秀”） Case 4 MsgBox（“良好”） Case 3 MsgBox（“通过”） Case Else MsgBox（“不通过”） End Select A. 优秀 B. 良好 C. 通过 D. 不通过6.下面If 语句

9、统计满足性别（sex）男、职称（duty）为副教授以上、年龄（age）小于40岁条件的人数，正确的语句是（A）。A. If sex= “男” And age0 Then n=n+1B. If sex= “男” And age40 And duty=“教授” or duty= “副教授” Then n=n+1C. If sex= “男” And age40 And Right（duty,2）= “教授” Then n=n+1D. If sex= “男” And agey, x, y） B. If xy Then Max1=x Else Max1=y C. Max1=Math.Max（x, y）

10、D. If y=x Then Max1=y Max=x8.下面三个程序设计段计算学生外语附加分：外语6级（lang6）为“优秀”加15分，“通过” 加10分；外语4级（lang4）为“优秀”加8分，“通过”加4分。外语附加分只能计一次最高的分数。（A）能正确计算。 A. If lang6=“优秀” Then langf=15 ElseIf lang6=“合格” Then langf=10 ElseIf lang4= “优秀” Then langf=8 ElseIf lang4=“合格”Then langf=4 End if B If lang4= “合格” Then langf=4 ElseI

11、f lang4=“优秀” Then ElseIf lang6=“合格” ThenElseIf lang6=“优秀” Then End ifC. If lang6=“优秀”Then langf=15 If lang6=“合格” Then langf=10 If lang4=“优秀” Then langf=8 If lang4= “合格” Then langf=4 D. If lang4= “合格”Then langf=4 If lang4=“优秀” Then langf=8 If lang6=“合格” Then langf=10 If lang6=“优秀” Then langf=15 Else

12、langf=0End if9.下面语句执行后，变量w中的值是（B）。w= Choose （Weekday（“2005,5,1”）, “Red”, “Green” , “Blue”, “Yellow”） A. Nothing B. “Red” C. “Green” D. “Yellow”1当C字符串变量中第三个字符是“C”时，利用MsgBox显示“Yes”，否则显示“No”。（1） If_Mid（c，3，1） = “C”_Then MsgBox（“yas”） Else MsgBox（“No”）2.程序运行后输出的结果是_7_。x=Int（Rnd）+3If x28 Then y=x2+1If x2

13、=9 Then y=x2-2If x28 Then y=x3MsgBox（y）3.下面程序的功能是_分别统计输入若干数的奇数和、偶数和，存放在m，n中_。Dim n%, m% Sub TextBox1_KeyPress（.）Handles TextBox1.KeypressIf Asc（e.KeyChar）=13 Then If IsNumeric（TextBox1.Text） Then Select Case Val（TextBox1.Text） Mod 2 Case 0 n=n+Val（TextBox1.Text） Case 1 m=m+Val（TextBox1.Text） End If

14、TextBox1.Text=” TextBox1.Focus（ ）End If End Sub该题中统计括号个数的变量m,n若在过程内声明，程序会产生什么结果？（2）4下面的程序段是检查输入的算术表达式中圆括号是否配对，并显示相应的结果。本程序在文本框中输入表达式，边输入边统计，以输入回车符作为表达式输入结束，然后显示结果，如下图所示。 Dim count1%Sub TextBox1_KeyPress（ ）Handles TextBox1.KeyPress If_ Me.KeyChar _=“（”Then count1+1 ElseIf _ Me.KeyChar _=“）” Then coun

15、t1=_ count1-1_End If If Asc（e.KeyChar）=13 Then If_ count1=0_ Then MsgBox（“左右括号配对”） ElseIf count10 Then MsgBox（_“左括号多于右括号” & count1 & “个”_） Else MsgBox（“右括号多于左括号”& “个”） End If 该题中统计括号个数的变量count1若在过程内声明，程序会产生什么结果？5输入若干个字符，统计有多少个元音字母，有多少个其他字母，直到按Enter键结束，显示结果，大、小写不区分。其中CountY中放元音字母个数，CountC中放其他字符数。 Dim

16、 CountY% , CountC% Sub TextBox1_KeyPress （） Handles TextBox1.KeyPress Dim c As Charc=_If “A”=c And c20y=sqrt（3x）-2 当10=201/2+|x| 当x20_ Theny=x*x+3*x+2ElseIf_x20_Case_Isz and x+zy and y+zx_ Then Msgbox（“能构成三角形”） If_ X=y and y=z_ Then Msgbox （“是等边三角形” ElseIf _ X=y Or y=z Or x=z_ ThenMsgbox （“是等腰三角形”）

17、ElseIf Sqrt（x*x+y*y）=z Or Math.Sqrt（y*y+z*z）=x Or Math.Sqrt（x*x+z*z）=y Then Msgbox （“是直角三角形”） Else _X=y Or y=z Or x=z_ End IfMsgBox （“不能构成三角形”）8输入一个年份，判断它是否为闰年，并显示是否是闰年的有关信息。判断闰年的条件是：年份能被4整除但不能被100整除，或能被400整除。同时请用日期型变量的IsLeepYear成员来验证。 Dim d As Date d=Now If_ d.year mod 4 = 0 and d.year mod 100 0d.year_ Or d.year Mod 400=0 Then MsgBox（d.Year & “是闰年”） “是平年”） En