VB NET语言习题集（刘炳文书）

(C)KeyDown和KeyUp的事件过程中有e.KeyCode参数 (D)大键盘上的“4”键的上档字符是“$”，当同时按下Shift和大键盘上的“4”键时

KeyPress事件过程中的e.KeyChar参数值是“$”的ASCII值(结论是：不能反应ASCII值，而是ASCII码字符)

30. 列表框ListBox控件的SelectedIndexChanged事件的触发条件是当选中列表选项时触发该事件。下面_____________ 属性的触发条件和功能与SelectedIndexChanged事件完全相同。 （A）FontChanged （B）GotFocus （C）SelectedValueChanged （D）StyleChanged

31. 当Combo控件DropDownStyle属性设置为Simple时，以下____________正确。

（A）该值是DropDownStyle属性的默认值 （B）该值设置组合框处于不可见状态

（C）该值设置组合框中文本框部分处于不可以编辑的状态

（D）该值设置组合框中文本框部分可编辑，且列表部分处于可见状态 32．以下_____________ 语句可以实现向列表控件中添加选项。 （A）ListBoxl.Items.Clear() (B) ListBoxl.Add (\选项三”) (C) ListBoxl.Items(“选项三”)

(D) ListBoxl.Items.Add(\选项三”)

33. 下面关于状态栏Locked属性_____________ 是错误的。 (A) 该属性用于设置是否锁定状态栏的设置位置 (B) 该属性包括True和False两个值

(C) 当该属性值为False(默认)值时，控件处于不锁定状态栏设置状态 (D) 该属性可以在程序运行时通过语句修改其锁定状态 34. 下列列表控件中_____________ 最能节省空间。

(A) ListBox (B)ListView (C)CheckedListBox (D)CompBox

*35. 当状态栏ShowWPanels属性设置为_____________时，状态栏将按照设置面板显示。

(A)True (B)False (C) 默认值 (D)None 36．在下列关于通用对话框的叙述中，错误的是______________。 (A)FontDialog是显示字体对话框。

(B)在打开或另存为对话框中，用户选择的文件名可以经FileTitle属性返回。

(C)在文件打开或另存为对话框中，用户选择的文件名及其路径可以经FileName属性返回。 (D)通用对话框可以用来制作和显示帮助对话框。 37、以下正确的语句是________________。

(A)SaveFileDialogl.Filter=All Files| *.*| Pictures(*.Bmp)|*.Bmp

(B)CommonDialogl.Filter=”All Files “|” *.* ”|” Pictures(*.Bmp) “|” *.Bmp (C)CommonDialogl.Filter=”All Files|*.*|Pictures(*.Bmp)|*.Bmp” (D)CommonDialogl.Filter=|All Filesl| *.*|Pictures(*.Bmp)| *.Bmp| 38．在下面关于窗体事件的叙述中，错误的是______________。 (A)在窗体的整个生命周期中，Initialize事件只触发一次。 (B)在用Show显示窗体时，不一定发生Load事件。 (C)每当窗体需要重画时，肯定会触发Paint事件。 (D)Resize事件是在窗体的大小有所改变时被触发。

二、填空题

1. 在程序运行时，试将文本框中的字体颜色设置为红色的语句有_____________________。 2．对象的属性是指________。 3．对象的方法是指________。

5

4．在刚建立项目时，为使窗体上的所有控件具有相同的字体格式，应对________属性进行设置。 5．当对文本框的ScrollBar的属性设置为Both(有水平和垂直滚动条)，但没有水平和垂直滚动条显示，造成的原因是________属性设置为False的原因。

6．当对窗体form1加入背景图片应使用的属性是______________, 设有一张图片sun.jpg在“D:\\图片”文件夹里，加入图片的方法是: _______________________________________。

7. 若己用窗体类创建了Forml、Form2两个窗体，默认启动窗体为Forml。通过_______菜单的________的______选项，可将启动窗体设置为Form2。在程序中若要显示Forml窗体，则执行 __________语句。

8．在文本框中，通过______________属性能获得选定文本，且此属性只能在______________状态使用。

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

10．在窗体上已建立多个控件如TextBoxl、Labell、Button1， 若要使程序一运行焦点就定位在TextBoxl控件上，应该在窗体的________事件中，把TextBoxl控件的________属性的值设置为________。若采用方法实现上述情况，应写的语句是__________________。

11. 设置窗体Form1在程序运行时，不可以改变大小的属性和属性值是：___________________。 12、在VB .NET中，获取或设置窗体左上角相对于屏幕左上角的坐标的属性是__________。 13．复选框____________属性设置为2-Grayed时，变成灰色，禁止用户选择。 14. __________属性设置为1，单选按钮和复选框的标题显示在左边。 15. 通过 __________属性设置，单选按钮和复选框以图形方式显示。

16.在程序运行时，如果将分组框的____________属性设为False，则分组框的标题呈灰色，表示分组框内的所有对象均被屏蔽，不允许用户对其进行操作。 17．列表框中项目的序号是从____________开始的。 18．____________表示列表框中最后一项的序号。 19．列表框中的____________属性是数组。

20．____________方法可清除列表框的所有内容。

21．组合框是组合了文本框和列表框的特性而形成的一种控件。________风格的组合框不允许用户向文本框输入中数据， 只能从列表框中进行选择。

22．滚动条响应的重要事件有____________和 ValueChange。

23．当用户单击滚动条的空白处时，滑块移动的增量值由____________ 属性决定。 24．滚动条产生ValueChange事件是因为____________值改变了。

25．如果要每隔15s产生一个Timer事件，则Interval属性应设置为____________。 26．____________函数将返回系统的时间。

27．在设计状态，由____________属性决定TabControl控件中的选项卡数。

28．当用户单击鼠标右键时，鼠标的MouseDown、MouseUp和MouseMove事件的参数e.Button参数值为____________。 29. 在计算机键盘上的“4”键的上档字符是“$”，当同时按下Shift和“4”键时，过程中e.KeyChar的值是____________。

30．有一个如图所示的应用程序。当“计算机”和“操作系统”选项末被选定时，它们所在框架中的其他控件不能使用。如果单击Ok按钮，则在下面的标签中显示用户所选择的信息。请完成该应用程序的有关事件过程。

6

应用程序图

Private Sub___________ (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ___________ cboComputer.Enabled=Not cboComputer.Enabled txtComputer.Enabled=Not txtComputer.Ensbled End Sub

Private Sub cmdOk_Click() LblOutput=” ”

If chkComputer.Checked Then

lblOutputer.Text=lblOutput.Text & ___________ & vbCrLf lblOutput.Text=lblOutput.Text & ___________ & vbCrLf End If

If chkOs.Checked Then If ___________Then

lblOutput.Text=lblOutput.Text & “Windows 2000” & vbCrLf

else

lb1Output.Text=lblOutput.Text & “Windows 98” & vbCrLf End If End If End Sub

31.下面程序段是将列表框Listl中重复的项目删除，只保留一项。

Dim I as Integer, j as Integer

For I=0 To ListBoxl.Items.Count-1

For j=ListBoxl.Items.Count-1 To __________Step -1 If ListBox1.Items(i)=ListBox1.Items(j) then _______________

End if

Next j

Next i

32. 下列程序允许用户按Enter键将一个组合框(cboComputer)中没有的项目添加到组合框中。

Private Sub cboComputer_KeyPress(ByVal sender As Object, ByVal e As

System.Windows.Forms.KeyPressEventArgs) Handles ComboBox1.KeyPress

Dim flag As Boolean

If e.KeyChar=Chr(13) Then Flag=False

For I=0 TO cboComputer.Items.Count-1 If_____________

Flag=True

Exit For

End If Next i

End if

If _____________ then _____________ else

MsgBox(“组合框中己经有了该项目”) End if

End Sub

7

33、假定有一个设置字体或颜色的通用对话框控件FontDialog1或ColorDialogl，在程序中给一个文本框（TextBox1）加入选定的字体或前景色的语句是__________________。

34、在程序中设置对象的字体、字型和字号。例如：设置标签栏label2为“黑体，24号字，斜体”，

如何实现_______________。

三、编程题

1． 设计一段程序在程序运行后，单击命令按钮后，文本框中显示出字符”欢迎来到VB .NET多彩

世界!”, 并把文本框的背景和文字的颜色变成黄色和蓝色，字体为“楷书”，字型及字号变成“粗体”和35号字。

2、在窗体上添加一个标签框，要求在程序运行时，单击窗体时改变标签的背景色（绿色）、前景色（粉红）和标题，双击时还原。

提示：可以设置一个变量（将变量设为模块级），事先把原来窗体的背景颜色属性值赋给出这个变量，当执行另一个操作时，再将这个变量值赋回给窗体背景属性。 3、在窗体上绘制一个文本框，，要求在窗体调整大小时，保持文框和窗体的比例不变，请编写事件代码。

4、窗体上有3个按顺序建立的文本框TextBox1、TextBox2和TextBox3, 有哪些方法可在窗体加载时使TextBox3首先获得焦点。

5、在VB .NET环境下，创建1个名为.Pro1的项目，当窗体第一次显示时，窗体距屏幕左边250像素，距屏幕上200像素，窗体大小为（200，200）, 窗体边框为默认边框，窗体不透明；当鼠标在窗体上单击时，窗体边框变为固定大小的三维立体边框，窗体大小变为原来大小2倍且窗体变为半透明；当鼠标指针离开窗体时，窗体恢复为第一次显示时的状态。

6、再上题所建的项目中，再添加一个窗体，改变窗体的背景图案，并且两个窗体之间能够交替隐藏和显示。

*7、创建两个窗体Form1和Form2，在Form1上有命令按钮Button1”Form2.Show“，单击该按钮和单击Form1的结果相同，都是隐藏Form1显示Form2; 在Form2上也有一个命令按钮

Button1”Form1.Show“，单击该按钮实现隐藏Form2显示Form1。调用过程的方法，使用同一个过程实现在Form1上单击按钮、单击窗体以及在Form2上单击按钮的功能。

第3章 简单Visual Basic .NET程序设计

编程题：

1、见P74页 3.7题 2、见P74页 3.8题

8