VB.NET练习题8
VB.NET练习题8
2010年05月05日
VB.NET练习题8 发布时间： 2008-4-21 被阅览数： 83 次
VB.NET练习题8
第1章 习题
一、判断题
1. .NET的Web Service是以HTML为基础的。（ F ）
2. .NET提出的Web Service最下层就是采用常规的SOAP协议。（ F ）
3. .NET开发的窗口应用程序，无需复杂的部署安装，只要选取【复制|粘贴】就行了。（ F ）
4. Visual Basic .NET提供ASP.NET Web应用程序的开发。（ T ）
二、选择题
1. 通用语言运行环境的主要功能为（ C ）
（A）内存管理 （B）执行线程管理 （C）跨平台 （D）以上都是
2. .NET所开发的应用程序，在执行时由谁全权负责（ A ）
（A）CLR （B）编译器 （C）操作系统 （D）不需要
3. Visual Basic .NET所编译而成的内容为（ D ）
（A）机器码 （B）组合语言 （C）P-Code （D）MSIL
4. .NET应用程序第二次执行时，不需要编译的原因是（ B ）
（A）已经产生执行文件 （B）Cache的机制 （C）通用语言规范本身的要求 （D）以上都不是
5.项目文件是以哪种扩展名来保存的（ C ）
（A）.sln （B）.vb （C）.vbproj （D）.sou
6. 在.NET开发环境下，选取“Web”工具栏上的“首页”会出现（ D ）
（A）微软首页 （B）Yahoo！ （C）Kimo （D）起始页
7. 某个窗口被关闭，必须使用菜单中的哪一个选项来打开（ B ）
（A）说明 （B）视图 （C）文件 （D）编辑
8.在.NET的设计中，项目由谁来管理（ D ）
帮助 （B）项目本身 （C）类库 （D）方案
9. 如果保留动态数组元素原来的值，在关键字Redim 后加（ ）参数。
A、Byref B、Byval C、Preserve D、Static
三、填空题
1. 目前.NET开发环境提供了那些程序设计语言的开发功能：（ C# ）、（ VB ）和（ VC++ ）。
2. JIT是什么的缩写（ Just-In-Time ）。
3. .NET所提供的应用程序开发平台，主要包含三个部分：（ ）、（ ）和（ ）。
4. 列举CLR的五个特性：（ ）、（ ）、（ ）、（ ）和（ ）。
四、应用题
1. 完成有关在线帮助的操作。
2. 以“文件类型和扩展名”为搜索主题，并利用Web工具栏上的“同步处理”按钮了解这个帮助的所在位置。
第2章 习题
一、下列代码段的输出是什么？ 5 7 9 11
1、Dim I as Integer=5
Do
Response.Write( I & “”)
I = I + 2
Loop Until I > 10
2、1、在窗体上画一个名称为Button1的命令按钮，然后编写如下事件过程：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x, i, j, n As Integer
x = 0
n = InputBox("请输入一个整数")
For i = 1 To n
For j = 1 To i
x = x + 1
Next j
Next i
msgbox(x)
End Sub
程序运行后，单击命令按钮，如果输入3，则在消息框中显示的内容是（ ）。
3、在窗体上画一个名称为Button1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：
DIM X,Y As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
X = 5
Y = 3
Call proc(X, Y)
Label1.TEXT = X
Label2.TEXT = Y
End Sub
Sub proc(ByRef a As Integer, ByVal b As Integer)
a = a * a
b = b + b
End Sub
程序运行后，单击命令按钮，则两个标签中显示的内容分别是（ ）和（ ）。
二、编写一段代码，实现循环输出1至10。
Dim i As Integer = 0
Dim j As Integer = 1
Do While i 10
If i Mod 2 = 0 Then
Console.WriteLine(i)
End If
i += 1
Loop
四、设计一个解决方案，能实现输入一个整数，判断它的位数，并将其按逆序输出到一个文本框中。例如输入321，输出123。
第3章 习题
一、 选择题
1、在VB.NET中，用 a 属性标识不同的对象。
A. Text B. Name C. Index D. Title
2、要使某个控件在程序运行后可用，应使 c 属性值的True.
A. Visible B. Locked C. Enabled D. AllowDrop
3、事件过程是指 a 时所执行的程序代码。
A. 运行程序 B. 响应事件 C. 设置属性 D. 使用控件
4、列表框中的列表内容可通过 d 属性设置。
A. Text B. List C. ValueMember D. Items
5、清除列表框中的所有项目，应调用 c 方法。
A. Cls B. RemoveAt C. Clear D. Remove
6、在窗体中复制和粘帖Button控件时，各Button控件的Name属性和Text属性 a 。
A. 所有Button控件的Name属性和Text属性都相同 B. Name属性相同，Text属性不同
C. Name属性不同，Text属性相同 D. 每个Button控件的Name属性和Text属性相同。
7、要使TextBox控件的ForeColor属性值为红色，在程序代码中应使用 c 语句。
A. TextBox1.ForeColor=VbRed
B. B. TextBox1.ForeColor=System.Font.Color=VbRed
C. TextBox1.ForeColor= System.Drawing.Color.Red
D. D. TextBox1.ForeColor=VBRGB（255，0，0）
8、TextBox控件中的 c 属性值为True，可以设置ScrollBar属性的值。
A. MultiLine B. Lines C. Autosize D. MaxLength
9、RadioButton控件的 a 属性值为True,可以选中该按钮。
A. Enabled B. Checked C. Visible D. Locked
10、Timer_Tick()事件中要启动计时器，必须要设置 c 属性。
A. Enabled=True B. Interval=Value
C. Enabled=True和 Interval=Value D. Enabled=True和 Interval=0
二、 填空题
1、改变窗体的标题，应修改窗体的 text 属性。
2、程序运行过程中，要向ListBox 控件中添加一项，应该使用 items 方法。
3、对象的 name 属性在程序运行过程中，只能被引用，不能被修改。
4、要使某个控件在程序启动后，能看的见，但不能用，应使该控件的 enabled 属性为False。
5、程序启动后，要使某个控件获得焦点，应使用该控件的 setfocus 方法。
6、CheckBox控件的 checked 属性决定了该控件的状态。
7、要使TextBox控件在程序启动后，只能显示只定内容，不能修改，应使 readonly 属性值为True.
8、滚动条控件的 location 属性值，反映了滚动条滑块的当前取值。
9、如果要定义计时器的计时时间间隔为2s,则应使其Interval属性值为 2000 。
10、要把文本框控件用作密码输入框，并且在程序启动后，向该控件输入密码时，用户看不到密码是什么，那么应该修改该控件的 passwordchar 属性。
三、 简答题
1、 Label控件和TextBox控件都可以显示信息，两者有什么区别。
Textbox可以接受键盘输入事件；而label只能在程序编译时加载信息
2、 使用InputBox函数时，返回值是什么数据类型，MsgBox函数可以用作单独的语句使用吗？
整形、可以
3、 控件的Name和Text属性有什么不同。
NAME是对象的唯一标示；text是对象编译和显示时的名称
4、 列表框和组合框在使用时有什么不同？
列表框用于在很多表项中作出选择，一般为了能正确操作，高度最少要3行，适用于
将输入限制为列表中内容的情况；
组合框是组合列表框和文本框的独立空间，用于在一组选项中反复选择的情况，并可以
输入列表中没有的表项；此外还可以节约屏幕空间。
5、 简述MouseDown事件和MouseEnter事件有什么不同。
6、 在VB.NET中，创建好一个项目后，能再修改该项目的名称吗？或者在项目没有退出应用环境前想另存为另一个项目，可以吗？为什么？
四、 实验题
1、 设计一个个人简历表，把每个人的姓名信息作为项目放在列表框控件中，当选中列表框中某个项目时，在窗体上显示这个人的其它信息。
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Left = 450
Me.Top = 250
Label1.Text = "←请选择"
ListBox1.Items.Add(" "" Then
ListBox1.Items.Add(TextBox1.Text)
TextBox1.Focus()
TextBox1.Text = ""
End If
End Sub
图3-41 文本框中文本的复制
第4章 习题
1. 设计一个Access启动后的一个窗体界面，如图4-40所示。不需要编写程序。
图4-40 启动Access时的一个窗体界面
2. 用户在单击LinkLabel控件时，将打开一个网页，请问可以用哪个方法打开一个网页。
3. 菜单的热键和快捷键的含义是什么？两者有什么不同。
4. 菜单的RadioCheck属性与Enabled属性有什么区别。
5. 如何判断用户单击了工具栏上的某个按钮。
6. 设计一个如图所示的“邮件编辑”窗体。不需要编写程序。
图4-41邮件编辑窗体
7. 设计一个图片浏览器，当选中右边的某个图片时，可以把该图片复制到左边的图片框中。如图4-42所示。
图4-42复制图片
第5章 习题
一、判断题
（r ）1. 模块化程序设计有一个要点就是数据隐藏（data-hiding）。
（w ）2. Visual Basic .NET默认的构造函数是Sub Construct。
（r ）3. Visual Basic .NET利用Inherits来表示继承。
（w ）4. Visual Basic .NET默认的析构函数是Sub Finalize。
二、选择题
1. 类中利用Dim声明的变量为（a ）
（A）Private （B）Public （C）Protected （D）Shadow
2. 构造函数必须以哪个关键字声明（a ）
（A）Private （B）Public （C）Protected （D）Shadow
3. 要让继承的类也能使用的变量，必须以哪个关键字声明（ d ）
（A）Private （B）Dim（C）Protected （D）Used
4.当类中的函数以MustOverride声明时，类必须以哪个关键字声明（ ）
（A）NotInheritable （B）Overridable （C）MustInherit （D）Overrides
5.一般的函数要使用重载的功能，必须使用哪个关键字来声明（ d ）
（A）NotInheritable （B）Overridable （C）MustInherit （D）Overrides
三、填空题
1. 类所具备的五个要素（属性 ）、（ 方法 ）、（ 事件 ）
2. 要调用基类的构造函数，必须使用（ new命名空间 ）。
3. 当A继承B时，我们称A为（ 子类 ），B为（ 父类 ）。
4. 声明为Public的类不能继承自声明为（ ？ ）或（ ？ ）的类，声明为Friend的类也不能继承自声明为（ ？ ）的类。
5. 说明以下在类内所声明变量的差异：
Dim i As Integer （ ？ ）
Protected x As Single （ 只能在自己的类或其派生类中访问 ）
Public x As Single （ 使用没有限制，可以在类之外访问 ）
四、应用题
1. 设计一个CTime类，能够显示目前的时间，包含：时、分、秒，而且能够切换显示12小时或是24小时制的时间。在设计上，必须包含以下的成员函数。
（1）SetHour、SetMin、SetSec：用户设置当前的时分秒。
（2）AddSecond：增加一秒钟。可以利用Timer控件，每隔一秒调用这个函数。这个函数本身还必须具备时间的判断功能，包含每60秒要增加一分钟，每60分钟要增加一小时。
（3）ShowTime：显示当前的时间。
以上只是制定的基本设计模式，请读者自己发挥增加其他的内容。
(注：这个题我按你给我说的 添加了两个if后时间是从12---24制进行切换啦 ，可就在判断字符是PM后要对user.hur加12这个地方出错了。因为我把它们放在了TIMER_TICK事件里完成秒的动态更新，这时这个USER,HUR也跟着一直加12的更新。我调了一会还是没得倒预想的结果，下午还有4节课 把这个半成品交给你搞定吧 )
解 Dim user As New CTime
Dim temp As Boolean = True
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Left = 450
Me.Top = 250
Me.Text = "时间控制"
Label1.Text = "请设置当前时间...."
Button1.Text = "设置"
Button2.Visible = False
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
user.hur = CInt(InputBox("请输入当前的时辰...", "小时"))
If user.hur > 24 Then
user.hur = CInt(InputBox("格式错误！请重新输入...."))
End If
user.mnt = CInt(InputBox("请输入当前的分钟...", "分钟"))
If user.mnt > 60 Then
user.mnt = CInt(InputBox("格式错误！请重新输入...."))
End If
user.scd = CInt(InputBox("请输入当前的秒", "秒"))
If user.scd > 60 Then
user.scd = CInt(InputBox("格式错误！请重新输入...."))
End If
Button2.Visible = True
Button2.Text = "12/24"
Button2.Left = Button1.Left
Button2.Top = Button1.Top
Button2.Width = Button1.Width
Timer1.Enabled = True
Button1.Visible = False
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
temp = Not temp
If temp = False Then
Label2.Text = "12小时制"
Else
Label2.Text = "24小时制"
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
user.Addscd()
If user.scd = 60 Then
user.mnt += 1
user.scd = 0
End If
If user.mnt = 60 Then
user.hur += 1
user.mnt = 0
End If
If temp = False Then
If user.hur > 12 Then
user.hur = user.hur - 12
If user.hur = 12 Then
user.hur = 0
End If
Label1.Text = "PM" & user.hur & "时" & user.mnt & "分" & user.scd & "秒"
Else
Label1.Text = "AM" & user.hur & "时" & user.mnt & "分" & user.scd & "秒"
End If
Else
If user.hur = 24 Then
user.hur = 0
End If
Label1.Text = user.hur & "时" & user.mnt & "分" & user.scd & "秒"
End If
End Sub
第6章 习题
1. 完整数据库的基本特点是什么？
2. DataSet可否保存XML数据？
3. 做一个小程序，实现在ComboBox控件的下拉列表中实现数据绑定，显示对应表格的内容。
4. 编写一个小应用程序，实现对某一个表格数据的查询、增、删、改等基本操作。
第7章 习题
1.文件访问的类型有哪些及它们的适用范围。
2.创建一个页面，该页面打开用户在文本框中指定的文件，并将其内容显示在一个标签上。
3.修改习题2，将文件内容显示在一个可编辑文本框中，让用户能够修改其中的内容，点击【提交】按钮时，将所作的修改写入文件中。
