1、VBnet重点学习的练习练习习题集doc精品文档第一章 VB.NET 环境和程序设计初步一 .选择题1.在 Visual Studio.NET 的集成开发的环境中，下面不属于该环境编程语言的是（ C）。A.VB B.C+ C. Pascal D. J#2.在集成开发环境中有两类窗口，浮动窗口和固定窗口，下面不属于浮动窗口的是（ D）。A. 工具箱窗口 B.属性窗口 C.立即窗口 D. 窗体窗口3.在 VB.NET 中，在窗体上显示控件的文本，用（ A ）属性设置。A. Text B. Name C. Caption D. Image4.不论何种控件，共同具有的是什么属性 ( D ) 。A. T
2、ext B. Name C ForeColor D Text5对于窗体，可改变窗体的边框性质的属性是（ B ）。A. MaxButton B. FormBorderStyle C. Name D. Left6.若要使标签控件显示时不要覆盖窗体的背景图案，要对（ A ）属性进行设置。A BackColor B. BorderStyle CForeColor D.BackStyle7若要使命令按钮不可操作，要对（ A ）属性进行设置。A. Enabled B.Visible C. BackColor D. Text8.要使文本框中的文字不能被修改，应对（ D）属性进行设置。A. Locked B.
3、 Visible C. Enabled D. ReadOnly9.要使当前 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. Load B. Click C. UnLoad D. GotFocus11.当文本框的 ScrollBars 属性设置了非 None 值，却没有效果
4、，原因是（ B）。A.文本框没有内容B.文本框的 MulitLine 属性为 FalseC.文本框的 MulitLine 属性为 TrueD.文本框的 Locked 属性 True12要判断在文本框中是否按了 Enter 键，应在文本框的（ D）事件中判断。A. Change B. KeyDown C. Click D. KeyPress13.在 VB.NE 集成环境中创建 VB.NET 应用程序时，除了工具箱窗口、窗体窗口和属性窗口外，必不可少的窗口是（ C）。A 窗体布局窗口B 立即窗口C 代码窗口D 监视窗口14当创建一个项目名为“引例”的项目时，该项目的所有代码文件将保存在（ C）文件
5、夹下。A My Documents B VB.NET C 引例 D Windows15将调试通过后生成的 .exe 可执行文件放到其他机器上不能运行的主要原因是（ A ）。A . 运行的机器上面无 VB.NET 系统B . 缺少 . frm 窗体文件C.该可执行文件有病毒.精品文档D.以上原因都不对16.对初学者而言 ,调试程序方便 ,有效的手段是 ( A) 。A.在可疑的代码处设置断点，逐语句跟踪B.查看资料C.通过 ”立即 ”窗口显示变量的值D.找老师问原因17.当需要上下文帮助时 ,选择要帮助的 “难题 ”,然后按住 ( D )键 ,就可出现 MSDN 窗口及显示所需 “难题 ”的帮助信
6、息。A .Help B .F10 C .Esc D. F118.在代码窗口 ,代码下方有蓝色波浪线表示 ( B) 。A. 对代码设置了格式B.编译错误C.逻辑错误D.运行时错误二 .填空题1.VB.NET 是完全面向对象的程序设计语言，其最大的特点是 _ 。引入了 .net 框架2._技术能让编程人员不必编写代码就可以创建 GUI （图形用户界面） 。可视化编程技术3._ 是由一个或几个项目组成 VB.NET 程序。解决方案4.当 _ 特性设置后，浮动窗口将自动隐藏。自动隐藏5.当进入 VB.NET 集成环境， 发现没有显示 “工具箱” 窗口，应选择 _ 菜单的 _选项，使 “工具箱”窗口显示
7、，并最好将其窗口的属性设置为_。 视图、工具箱、可停靠6.新建项目时，要改变默认Option 设置，应对 _ 菜单的 _的 _文件夹进行相应选项的选择。7对象属性是指 _。对象的性质来描述和反应对象特征的参数8对象的方法是指 _ 。对象的动作行为。9在刚建立项目时， 使窗体上的所有控件具有相同的字体格式，应对 _的 _属性进行设置。 Form font10属性窗口的属性可以按照 _和 _ 顺序排列。分类顺序、字母顺序11当对命令按钮的 Image 属性装入 .bmp 图形文件后，按钮上并没有显示所需的图形，原因是对_属性设置为 _。 FlatStyle 、 system12若已建立了 Form
8、1 ，Form2 两个窗体，默认启动窗体为Form1 。通过 _ 菜单的 _的 _选项卡，可将启动对象设置为Form2 。项目菜单、属性、常规13在文本框中，通过 _ 属性能获得当前插入点所在的位置。SelectionStart14要对文本框中已有的内容进行编辑， 按下键盘上的按钮， 就是不起作用， 原因是设置了 _的属性为 True。readlony15在窗体上已建立多个控件，如 TextBox1 ， Label1， Button1 ，若要使程序一运行焦点就定位在 Button1 控件上，应对 Button1 控件设置 _tabindex_ 属性的值为 _0_。16要同时保存解决方案中的每个
9、文件，最方便的方法是单击工具栏的 _全部保存 _按钮。第二章 VB.NET 语言基础和顺序结构一 .选择题1 在一个语句内写多条语句时，每个语句之间用（ B ）符号分隔。A ， B. ： C.、 D. ;2.一语句要在下一行继续写，用（C）符号作为续行符。A . + B . - C. _ D . .精品文档3.下面属于合法的变量名的是（A ）。A .X_yz B. 123abc C .Integer D.X-Y4.下面属于不合法的整常数的是 ( D ).A .100 B. &O100 C. &H100 D. %1005.下面属于合法的字符常数的是 ( B ) 。.ABC$ B. “ ABC”
10、C. ABC D.ABC6.下面属于合法的单精度型变量的是（A）。A. mun ！ B. sum% D. xinte$ D. mm#7. 下面属于不合法的双精度常数的是（ D）。.100# B.100.0 C.1E+2 D.100.0D+28. 表达式 16/4-2 5 * 8/4 Mod 52 的值为 (B) 。 . . . . . 数学关系表达式 x 10 表示成正确的 VB.NET表达式为 (B ) 。A 3=x10 B. 3=x AND x=3 OR x10 D.3=x AND =0 AND a+cb+3 OR NOT d 的值是 _。5 Int(-3.5) 、 Int(3.5) 、
11、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.下面程序随机产生一个三位正整数，然后逆序输出， 产生的数与逆序数同时显示。 例如，
12、产生 246，输出是 642。 Sub Button1_Click(.) Handles Button1.ClickDim x, y As Integerx=Int (_)y=(x Mod 10)*100+_+x100MsgBox( “ x=”& x & x “ y=” &y)End Sub第三章 选择结构一 . 选择题1 VB.NET提供了结构化程序设计的三种基本结构，三种基本结构是（ D）。A 递归结构，选择结构，循环结构B 选择结构，过程结构，顺序结构C 过程结构，输入输出结构，转向结构D 选择结构，循环结构，顺序结构2 按照结构化程序设计的要求，下面（ C）语句是非结构化程序设计语句。
13、A if 语句 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语句“ 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)
14、+5Select Case xCase 5MsgBox(“优秀” )Case 4MsgBox(“良好” )Case 3MsgBox(“通过” )Case Else.精品文档MsgBox(“不通过” )End SelectA. 优秀 B. 良好 C. 通过 D. 不通过6. 下面 If 语句统计满足性别（ sex ）男、职称（ duty ）为副教授以上、年龄（ age）小于 40 岁条件的人数，正确的语句是（ D）。A. If sex= “男” And age0 Then n=n+1B. If sex= “男” And age40 And duty= “教授” or duty= “副教授” Th
15、en 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) C. If y=x Then Max1=y Max=x8. 下面三个程序设计段计算学生外语附加分：外语 6 级（ lang6 ）为“优秀”加 15 分，“通过” 加 10 分；外语 4级（ lang4 ）为“优秀”加 8 分，“通过”加 4 分。外语附加分只能计一次最高的分数。 （ A）能正确
16、计算。A. If lang6= “优秀” Thenlangf=15ElseIf lang6= “合格” Thenlangf=10ElseIf lang4= “优秀” Thenlangf=8ElseIf lang4= “合格” Thenlangf=4End ifB If lang4= “合格” Thenlangf=4ElseIf lang4= “优秀” Thenlangf=8ElseIf lang6= “合格” Thenlangf=10ElseIf lang6= “优秀” Thenlangf=15End ifC. If lang6= “优秀” Then langf=15If lang6= “合格
17、” Then langf=10If lang4= “优秀” Then langf=8If lang4= “合格” Then langf=4langf=0D. If lang4= “合格” Then langf=4If lang4= “优秀” Then langf=8If lang6= “合格” Then langf=10If lang6= “优秀” Thenlangf=15Elselangf=0.精品文档End if9.下面语句执行后，变量 w 中的值是（ B）。w= Choose (Weekday( “ 2005,5,1 ” ), “Red” , “Green” , “ Blue ” , “
18、 Yellow ” )A. Nothing B. “ Red” C. “Green” D. “Yellow ”二 . 填空题1当 C字符串变量中第三个字符是“ C”时，利用 MsgBox显示“ Yes”，否则显示“ No”。If_Then MsgBox( “yas ” ) Else MsgBox( “ No”) Mid(c ， 3， 1) = “ C”2 程序运行后输出的结果是 _。x=Int(Rnd)+3If x28 Then y=x2+1If x2=9 Then y=x2-2If x20 ThenMsgBox(_)ElseMsgBox(“右括号多于左括号” &count1& “个” ).精
19、品文档End IfExit SubEnd IfEnd Sub该题中统计括号个数的变量 count1 若在过程内声明，程序会产生什么结果？5输入若干个字符，统计有多少个元音字母，有多少个其他字母，直到按 Enter 键结束，显示结果，大、小写不区分。其中 Count Y 中放元音字母个数， Count C 中放其他字符数。Dim CountY% , CountC%Sub TextBox1_KeyPress ( ) Handles TextBox1.KeyPressDim c As Charc=_If “ A” =c And c20y= sqrt(3x)-2 当 10=x=201/2+|x| 当
20、x10Sub Button1_Click(.) Handles Button1.ClickDim x! , y!x=Val(TextBox1.Text)If_ Theny=x*x+3*x+2ElseIf_ Theny=1/2+Math.Abs(x)Elsey=Math.Sqrt(3*x)-2End IfMsgBox(“ y=” & y)End Sub.精品文档Sub Button1_Click(.) Handles Button1.Clickx=Val(TextBox1.Text)Select Case xCase_y=x*x+3*x+2Case_y=1/2+Math.Abs(x)Case E
21、lsey=Math.Sqrt(3*x)-2End SelectMsgBox(“ y=” & y)End Sub7 输入三角形的三边 a、 b、c 的值，根据其数值，判断能否构成三角形。若能，还要显示三角形的性质：等边三角形、等腰三角形、直角三角形、任意三角形。Sub Button1_Click(.) Handles Button3.ClickDim x%, y%, z%x= Val(InputBox(“ input x” )y= Val(InputBox(“ input x” )z= Val(InputBox(“input x” )If_ ThenMsg( “能构成三角形” )If_ ThenMsg(“是等边三角形
