VB笔试知识题理解练习.docx

VB笔试知识题理解练习.docx

《VB笔试知识题理解练习.docx》由会员分享，可在线阅读，更多相关《VB笔试知识题理解练习.docx（30页珍藏版）》请在冰豆网上搜索。

VB笔试知识题理解练习

第一章VB.NET环境和程序设计初步

一.选择题

1.在VisualStudio.NET的集成开发的环境中，下面不属于该环境编程语言的是（C）。

A.VB.netB.C++C.PascalD.J#

2.在集成开发环境中有两类窗口，浮动窗口和固定窗口，下面不属于浮动窗口的是（D）。

A.工具箱窗口B.属性窗口C.解决方案管理器窗口D.窗体窗口

3.在VB.NET中，在窗体上显示控件的文本，用（A）属性设置。

A.TextB.NameC.EnabledD.Image

4.不论何种控件，共同具有的属性是（B）。

A.TextB.NameC．ForeColorD．Text

5．对于窗体，可改变窗体的边框性质的属性是（B）。

A.MaxButtonB.FormBorderStyleC.NameD.Left

6.若要使标签控件显示时不要覆盖窗体的背景图案，要对（A）属性进行设置。

A．BackColorB.BorderStyleC．ForeColorD.BackStyle

7．若要使命令按钮不可操作，要对（A）属性进行设置。

A.EnabledB.VisibleC.BackColorD.Text

8.要使文本框中的文字不能被修改，应对（D）属性进行设置。

A.LockedB.VisibleC.EnabledD.ReadOnly

9.要使当前Form1窗体的标题栏显示“欢迎使用VB.NET”，以下（B）语句是正确的。

A.Form1.Text=“欢迎使用VB.NET”B.Me.Text=“欢迎使用VB.NET”

C.Form1.Name=“欢迎使用VB.NET”D.Name=“欢迎使用VB.NET”

10.当运行程序时，系统自动执行启动窗体的（A）事件过程。

A.LoadB.ClickC.UnLoadD.GotFocus

11.当文本框的ScrollBars属性设置了非None值，却没有效果，原因是（B）。

A.文本框没有内容B.框的MulitLine属性为False

C.框的MulitLine属性为TrueD.本框的Locked属性True

12．要判断在文本框中是否按了Enter键，应在文本框的（D）事件中判断。

A.TextChangedB.LostFocusC.ClickD.KeyPress

13.在VB.NE集成环境中创建VB.NET应用程序时，除了工具箱窗口、窗体窗口和属性窗口外，必不可少的窗口是（C）。

A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口

14．当创建一个项目名为“引例”的项目时，该项目的所有代码文件将保存在（C）文件夹下。

A．MyDocumentsB．VB.NETC．\引例D．Windows

15．将调试通过后生成的.exe可执行文件放到其他机器上不能运行的主要原因是（A）。

A.运行的机器上面无VB.NET系统B.缺少.frm窗体文件C.该可执行文件有病毒D.以上原因都不对

16.对初学者而言,调试程序方便,有效的手段是（A）。

A.在可疑的代码处设置断点，逐语句跟踪B.查看资料C.通过”立即”窗口显示变量的值D.找老师问原因

17.在代码窗口,代码下方有蓝色波浪线表示（B）。

A.对代码设置了格式B.编译语法错误C.逻辑错误D.运行时错误

二.填空题

1.VB.NET是完全面向对象的程序设计语言，其最大的特点是____引入了.net框架_____

2.____可视化编成技术____技术能让编程人员不必编写代码就可以创建GUI（图形用户界面）。

3.___解决方案____是由一个或几个项目组成的VB.NET程序。

4.当___自动隐藏___特性设置后，浮动窗口将自动隐藏。

5.当进入VB.NET集成环境，发现没有显示“工具箱”窗口，应选择___视图___菜单的___工具箱___。

6．要同时保存解决方案中的每个文件，最方便的方法是单击工具栏的____全部保存_____按钮。

7．对象属性是指____对象的性质来描述和反应对象特征的参数_____。

8．对象的方法是指________对象的动作、行为______。

9．在刚建立项目时，使窗体上的所有控件具有相同的字体格式，应对__Form窗体__的___Font___属性进行设置。

10．属性窗口的属性可以按照_____分类顺序______和_____字母顺序_____顺序排列。

11．当对命令按钮的Image属性装入.bmp图形文件后，按钮上并没有显示所需的图形，原因是对__FlatStyle__属性设置为_____System____。

12．若已建立了Form1，Form2两个窗体，默认启动窗体为Form1。

通过__项目__菜单的__属性___的__常规__选项卡，可将启动对象设置为Form2。

13．在文本框中，通过_____SelectionStart_____属性能获得当前插入点所在的位置。

14．要对文本框中已有的内容进行编辑，按下键盘上的按钮，就是不起作用，原因是设置了__ReadOnly__的属性为True。

15．在窗体上已建立多个控件，如TextBox1，Label1，Button1，若要使程序一运行焦点就定位在Button1控件上，应对Button1控件设置____TabIndex_____属性的值为_____0_____。

第二章VB.NET语言基础和顺序结构

一.选择题

1.在一个语句内写多条语句时，每个语句之间用（B）符号分隔。

A．，B.：

C.、D.；

2.一语句要在下一行继续写，用（C）符号作为续行符。

A.+B.-C._D.…

3.下面属于合法的变量名的是（A）。

A.X_yzB.123abcC.IntegerD.X-Y

4.下面属于不合法的整常数的是（D）.

A.100B.&O100C.&H100D.%100

5.下面属于合法的字符常数的是（B）。

A.ABC$B.“ABC”C.‘ABC’D.ABC

6.下面属于合法的单精度型变量的是（A）。

A.mun！

B.sum%D.xinte$D.mm#

7.下面属于不合法的双精度常数的是（D）。

A.100#B.100.0C.1E+2D.100.0D+2

8.表达式16/4-2＾5*8/4Mod5\2的值为（B）。

Ａ.１４　Ｂ.４　Ｃ.２０　　Ｄ.２

9.数学关系表达式３≤x＜10表示成正确的VB.NET表达式为（B）。

A．3<=x<10B.3<=xANDx<10C.x>=3ORx<10D.3<=xAND<10

10.\、/、Mod、*四个算术运算符中，优先级别最低的是（C）。

A.\B./C.ModD.*

11.与数学表达式ab/（3cd）对应，VB.NET的不正确表达式是（D）。

A.a*b/（3*c*d）B.a/3*b/c/dC.a*b/3/c/dD.a*b/3*c*d

12.Rnd函数不可能为下列（B）值。

A.0B.1C.0.1234D.0.0005

13.Int（198.555*100+0.5）/100的值是（C）。

A.198B.199.6C.198.56D.200

14.已知A$=“12345678”，则表达式Val（Mid（A,1,4）+Mid（A,4,2））的值为（B）。

A.123456B.123445C.8D.6

15.MsgBox（DateAdd（“m”,2，#1/28/2005#））语句显示结果是（A）。

A.2005-3-28B.2005-1-30C.2007-1-28D.2003-1-28

16.表达式DateDiff（“y”,#12/30/1999#,#1/13/2000#）的结果是（C）。

A.1B.11C.14D.99

17.表达式Len（“123程序设计ABC”）的值是（A）。

A．10B.14C.20D.17

18．下面正确的赋值语句是（C）。

A．x+y=30B.y=∏*r*r;C.y=x+30D.3y=x

19.为了给x、y、z三个变量赋初值1，下面正确的赋值语句是（A）。

A.x=1:

y=1:

z=1B.x=1,y=1,z=1C.x=y=z=1D.xyz=1

20.赋值语句“a=123+MID（“123456”,3,2）”执行后，a变量中的值是（D）。

A.“12334”B.123C.12334D.157

21．赋值语句“a=123&MID（“123456”,3,2）”执行后，a变量中的值是（A）。

A.“12334”B.123C.12334D.157

22.已知a=12，b=20，复合赋值语句“a*=b+10”执行后，a变量中的值是（D）。

A.50B.250C.30D.360

二.填空题

1．在VB.NET中，1234%，123456!

，1.2346E+5三个常数分别表示_____整型____，___单精度型____，____双精度型____类型。

2．整型变量x中存放了一个两位数，要将两位数交换位置，例如，13变成31，实现表达式是_____（xmod10）*10+x\10____。

3．表示x是5的倍数或是9的倍数的逻辑表达式为____xmod5=0Orxmod9=0_____。

4.已知a=3.5，b=5.0，c=2.5，d=True，则表达式a>=0ANDa+c>b+3ORNOTd的值是___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.在直角坐标系中，x、y是坐标系中任意点的位置，用x和y表示在第一象限或第三象限的表达是_____x>0andy>0Orx<0andy<0_____。

8.要显示当前机器内日期，函数为____Now_____。

9.计算离你毕业（假定2008年6月30日毕业）还有多少个星期的函数表达式是_____DateDiff（“w”,Now,#6/30/2008#）_____。

10.表示s字符变量是字母字符（大小写字母不区分）的逻辑表达式为_____UCase（s）>=“A”andUcase（s）<=“Z”______。

11.下面程序随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。

例如，产生246，输出是642。

SubButton1_Click（......）HandlesButton1.Click

Dimx,yAsInteger

x=Int（____Rnd（）*900+100_____）

y=（xMod10）*100+____（（xmod100）\10）*10____+x\100

MsgBox（“x=”&x&x&“y=”&y）

EndSub.

第三章选择结构

一、选择题：

1．VB.NET提供了结构化程序设计的三种基本结构，三种基本结构是（D）。

A.递归结构，选择结构，循环结构B.选择结构，过程结构，顺序结构

C.过程结构，输入输出结构，转向结构D.选择结构，循环结构，顺序结构

2．按照结构化程序设计的要求，下面（C）语句是非结构化程序设计语句。

A．if语句B.For语句C.GoTo语句D.SelectCase语句

3.下面程序段运行后，显示的结果是（A）。

Dimx%

IfxThenMsgBox（x）ElseMsgBox（x+1）

A.1B.0C.-1D.显示出错信息

4．语句“Ifx=1Theny=1”下列说法正确的是（C）。

A.“x=1”和“y=1”均为赋值语句

B．“x=1”和“y=1”均为关系表达式

C．“x=1”为关系表达式“y=1”为赋值语句

D．“x=1”为赋值语句“y=1”为关系表达式

5．下面程序段显示的结果是（A）。

Dimx%

x=Int（Rnd）+5

SelectCasex

Case5

MsgBox（“优秀”）

Case4

MsgBox（“良好”）

Case3

MsgBox（“通过”）

CaseElse

MsgBox（“不通过”）

EndSelect

A.优秀B.良好C.通过D.不通过

6.下面If语句统计满足性别（sex）男、职称（duty）为副教授以上、年龄（age）小于40岁条件的人数，正确的语句是（A）。

A.Ifsex=“男”Andage<40AndInStr（duty,“教授”）>0Thenn=n+1

B.Ifsex=“男”Andage<40Andduty=“教授”orduty=“副教授”Thenn=n+1

C.Ifsex=“男”Andage<40AndRight（duty,2）=“教授”Thenn=n+1

D.Ifsex=“男”Andage<40Andduty=“教授”Andduty=“副教授”Thenn=n+1

7.下面程序段求两个数中的大数，（D）不正确。

A.Max1=IIf（x>y,x,y）B.Ifx>yThenMax1=xElseMax1=y

C.Max1=Math.Max（x,y）D.Ify>=xThenMax1=yMax=x

8.下面三个程序设计段计算学生外语附加分：

外语6级（lang6）为“优秀”加15分，“通过”加10分；外语4级（lang4）为“优秀”加8分，“通过”加4分。

外语附加分只能计一次最高的分数。

（A）能正确计算。

A.Iflang6=“优秀”Then

langf=15

ElseIflang6=“合格”Then

langf=10

ElseIflang4=“优秀”Then

langf=8

ElseIflang4=“合格”Then

langf=4

Endif

BIflang4=“合格”Then

langf=4

ElseIflang4=“优秀”Then

langf=8

ElseIflang6=“合格”Then

langf=10

ElseIflang6=“优秀”Then

langf=15

Endif

C.Iflang6=“优秀”Thenlangf=15

Iflang6=“合格”Thenlangf=10

Iflang4=“优秀”Thenlangf=8

Iflang4=“合格”Thenlangf=4

D.Iflang4=“合格”Thenlangf=4

Iflang4=“优秀”Thenlangf=8

Iflang6=“合格”Thenlangf=10

Iflang6=“优秀”Then

langf=15

Else

langf=0

Endif

9.下面语句执行后，变量w中的值是（B）。

w=Choose（Weekday（“2005,5,1”）,“Red”,“Green”,“Blue”,“Yellow”）

A.NothingB.“Red”C.“Green”D.“Yellow”

二.填空题

1．当C字符串变量中第三个字符是“C”时，利用MsgBox显示“Yes”，否则显示“No”。

（1）If____Mid（c，3，1）=“C”_____ThenMsgBox（“yas”）ElseMsgBox（“No”）

2.程序运行后输出的结果是___7____。

x=Int（Rnd）+3

Ifx^2>8Theny=x^2+1

Ifx^2=9Theny=x^2-2

Ifx^2<8Theny=x^3

MsgBox（y）

3.下面程序的功能是______分别统计输入若干数的奇数和、偶数和，存放在m，n中_____。

Dimn%,m%

SubTextBox1_KeyPress（......）HandlesTextBox1.Keypress

IfAsc（e.KeyChar）=13Then

IfIsNumeric（TextBox1.Text）Then

SelectCaseVal（TextBox1.Text）Mod2

Case0

n=n+Val（TextBox1.Text）

Case1

m=m+Val（TextBox1.Text）

EndSelect

EndIf

TextBox1.Text=””

TextBox1.Focus（）

EndIf

EndSub

<注意>该题中统计括号个数的变量m,n若在过程内声明，程序会产生什么结果？

（2）

4．下面的程序段是检查输入的算术表达式中圆括号是否配对，并显示相应的结果。

本程序在文本框中输入表达式，边输入边统计，以输入回车符作为表达式输入结束，然后显示结果，如下图所示。

Dimcount1%

SubTextBox1_KeyPress（……………）HandlesTextBox1.KeyPress

If_____Me.KeyChar_____=“（”Then

count1+1

ElseIf____Me.KeyChar____=“）”Then

count1=___count1-1______

EndIf

IfAsc（e.KeyChar）=13Then

If____count1=0_____Then

MsgBox（“左右括号配对”）

ElseIfcount1>0Then

MsgBox（_____“左括号多于右括号”&count1&“个”_____）

Else

MsgBox（“右括号多于左括号”&count1&“个”）

EndIf

EndIf

EndSub

<注意>该题中统计括号个数的变量count1若在过程内声明，程序会产生什么结果？

5．输入若干个字符，统计有多少个元音字母，有多少个其他字母，直到按Enter键结束，显示结果，大、小写不区分。

其中CountY中放元音字母个数，CountC中放其他字符数。

DimCountY%,CountC%

SubTextBox1_KeyPress（……………）HandlesTextBox1.KeyPress

DimcAsChar

c=________

If“A”<=cAndc<=“Z”Then

SelectCase_________

Case_________

CountY=CountY+1

CaseElse

CountC=CountC+1

EndSelect

EndIf

If________Then

MsgBox（“元音字母有”&CountY&“个”）

MsgBox（“其他字母有”&CountC&“个”）

EndIf

EndSub

6.用If语句，SelectCase语句两种计算方法计算分段函数

x^2+3x+2当x>20

y=sqrt（3x）-2当10<=x<=20

1/2+|x|当x<10

SubButton1_Click（....）HandlesButton1.Click

Dimx!

y!

x=Val（TextBox1.Text）

If___x>20_____Then

y=x*x+3*x+2

ElseIf____x<10_____Then

y=1/2+Math.Abs（x）

Else

y=Math.Sqrt（3*x）-2

EndIf

MsgBox（“y=”&y）

EndSub

SubButton1_Click（....）HandlesButton1.Click

x=Val（TextBox1.Text）

SelectCasex

Case_____Is>20_____

y=x*x+3*x+2

Case_____Is<10_____

y=1/2+Math.Abs（x）

CaseElse

y=Math.Sqrt（3*x）-2

EndSelect

MsgBox（“y=”&y）

EndSub

7.输入三角形的三边a、b、c的值，根据其数值，判断能否构成三角形。

若能，还要显示三角形的性质：

等边三角形、等腰三角形、直角三角形、任意三角形。

SubButton1_Click（....）HandlesButton3.Click

Dimx%,y%,z%

x=Val（InputBox（“inputx”））

y=Val（InputBox（“inputx”））

z=Val（InputBox（“inputx”））

If_____X+y>zandx+z>yandy+z>x_____Then

Msgbox（“能构成三角形”）

If_____X=yandy=z____Then

Msgbox（“是等边三角形”

ElseIf____X=yOry=zOrx=z____Then

Msgbox（“是等腰三角形”）

ElseIfSqrt（x*x+y*y）=zOrMath.Sqrt（y*y+z*z）=xOrMath.Sqrt（x*x+z*z）=yThen

Msgbox（“是直角三角形”）

Else

____X=yOry=zOrx=z_____

EndIf

Else

MsgBox（“不能构成三角形”）

EndIf

EndSub

8．输入一个年份，判断它是否为闰年，并显示是否是闰年的有关信息。

判断闰年的条件是：

年份能被4整除但不能被100整除，或能被400整除。

同时请用日期型变量的IsLeepYear成员来验证。

SubButton1_Click（....）HandlesButton3.Click

DimdAsDate

d=Now

If__d.yearmod4=0andd.yearmod100<>0d.year___Ord.yearMod400=0Then

MsgBox（d.Year&“是闰年”）

Else

MsgBox（d.Year&“是平年”）

End