VB 第一章 练习题讲解学习.docx

VB 第一章 练习题讲解学习.docx

《VB 第一章 练习题讲解学习.docx》由会员分享，可在线阅读，更多相关《VB 第一章 练习题讲解学习.docx（64页珍藏版）》请在冰豆网上搜索。

VB第一章练习题讲解学习

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

一.选择题

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

A.VBB.C++C.PascalD.J#

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

A.工具箱窗口B.属性窗口C.立即窗口D.窗体窗口

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

A.TextB.NameC.CaptionD.Image

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

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.Me.Name=“欢迎使用VB.NET”

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

A.LoadB.ClickC.UnLoadD.GotFocus

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

A.文本框没有内容

B.文本框的MulitLine属性为False

C.文本框的MulitLine属性为True

D.文本框的Locked属性True

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

A.ChangeB.KeyDownC.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.当需要上下文帮助时,选择要帮助的“难题”,然后按住（D）键,就可出现MSDN窗口及显示所需“难题”的帮助信息。

A.HelpB.F10C.EscD.F1

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

A.对代码设置了格式

B.编译错误

C.逻辑错误

D.运行时错误

二.填空题

1.VB.NET是完全面向对象的程序设计语言，其最大的特点是____________。

引入了.net框架

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

可视化编程技术

3.__________________是由一个或几个项目组成VB.NET程序。

解决方案

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

自动隐藏

5.当进入VB.NET集成环境，发现没有显示“工具箱”窗口，应选择____________菜单的____________选项，使“工具箱”窗口显示，并最好将其窗口的属性设置为___________。

视图、工具箱、可停靠

6.新建项目时，要改变默认Option设置，应对__________菜单的__________的___________文件夹进行相应选项的选择。

7．对象属性是指_________。

对象的性质来描述和反应对象特征的参数

8．对象的方法是指_______________。

对象的动作行为。

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

Formfont

10．属性窗口的属性可以按照___________和__________顺序排列。

分类顺序、字母顺序

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

FlatStyle、system

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

通过_______菜单的_________的________选项卡，可将启动对象设置为Form2。

项目菜单、属性、常规

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

SelectionStart

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

readlony

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

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

第二章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）。

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

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

A.mun！

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

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

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

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

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

９.数学关系表达式３≤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的不正确表达式是（）。

~~~~~~~~~~~~~~~

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+1.2346D四个常数分别表示_________，_______，________，__________类型。

2．整型变量x中存放了一个两位数，要将两位数交换位置，例如，13变成31，实现表达式是_________。

3．表示x是5的倍数或是9的倍数的逻辑表达式为_________。

4．已知a=3.5，b=5.0，c=2.5，d=True，则表达式a>=0ANDa+c>b+3ORNOTd的值是_______。

5．Int（-3.5）、Int（3.5）、Fix（-3.5）、Fix（3.5）、Round（3.5）的值分别是____、____、___、___、___、___。

6．表达式UCase（Mid（“abcdefgh”，3，4））的值是_________。

7．在直角坐标系中，x、y是坐标系中任意点的位置，用x和y表示在第一象限或第三象限的表达是__________。

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

11.计算离你毕业（假定2008年6月30日毕业）还有多少个星期的函数表达式是__________。

12.表示s字符变量是字母字符（大小写字母不区分）的逻辑表达式为___________。

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

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

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

Dimx,yAsInteger

x=Int（_________）

y=（xMod10）*100+________+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岁条件的人数，正确的语句是（D）。

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.下面程序段求两个数中的大数，（）不正确。

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

C.Max1=Math.Max（x,y）C.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

langf=0

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”。

If_________ThenMsgBox（“yas”）ElseMsgBox（“No”）Mid（c，3，1）=“C”

2．程序运行后输出的结果是___________。

x=Int（Rnd）+3

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

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

Ifx^2<8Theny=x^3

MsgBox（y）

3．下面程序的功能是（）。

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

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

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

Dimcount1%

SubTextBox1_KeyPress（……………）HandlesTextBox1.KeyPress

If__________=“（”Then

count1+1

ElseIf________=“）”Then

count1=_________

EndIf

IfAsc（e.KeyChar）=13Then

If_________Then

MsgBox（“左右括号配对”）

ElseIfcount1>0Then

MsgBox（__________）

Else

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

EndIf

ExitSub

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________Then

y=x*x+3*x+2

ElseIf_________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__________

y=x*x+3*x+2

Case__________

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__________Then

Msg（“能构成三角形”）

If_________Then

Msg（“是等边三角形”

ElseIf________Then

Msg（“是等腰三角形”）

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

Msg（“是直角三角形”）

Else

_________

EndIf

Else

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

EndIf

EndSub

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

判断闰年的条件是：

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

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

SubButton1_Click（....）HandlesButton3.Click

DimdAsDate

d=Now

If_________Ord.yearMod400=0Then

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

Else

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

EndIf

Ifd.IsLeepYear（________）Then

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

Else

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

EndIf

EndSub

第四章循环结构

一.选择题

1．以下（）是正确的For...Next结构。

A.Forx=1ToStep10

...

Nextx

B.Forx=3To-3Ste