1、第三章 eShop-MIS 供应商信息管理界面的 设计要求：1)掌握创建多窗体应用程序的方法2)掌握实现窗体切换的方法3）更改窗体图标与背景)一、单项选择题1、窗体的背景色用_属性来设计。 （选择一项）a) BackColor b) ForeColor c) Picture d) FillColor2、在窗体上添加一个名称为 a 的按钮和一个名称为 b 的标签。当单击按钮时，在标签中显示该按钮的名称。下列能正确实现此功能的程序是A) Private Sub a_Click()b.Text = a.NameEnd Sub B) Private Sub b_Click()b.Text = a.Na
2、meEnd Sub C) Private Sub a_Click()b.Name = a.NameEnd Sub D) Private Sub b_Click()b.Name = a.NameEnd Sub3、 以下叙述中正确的是 A)窗体的 Name 属性指定窗体的名称，用来标识一个窗体B)窗体的 Name 属性的值是显示在窗体标题栏中的文本C)可以在运行期间改变对象的 Name 属性的值D)对象的 Name 属性值可以为空4、在立即窗口输出文字“欢迎来到 VB 世界”有三种方法，它们是_。 （选择两项）a) 在立即窗口输入：print “欢迎来到 VB 世界”b) 在立即窗口输入：Msgb
3、ox “欢迎来到 VB 世界”c) 在立即窗口输入：? “欢迎来到 VB 世界”d) 在立即窗口输入：Debug.print “ 欢迎来到 VB 世界”5、 当在一个窗体上建立了多个文本框后，可以用_方法，把光标置于所需要的文本框上。 （选择一项）a) LostFocus b) GotFocus c) SetFocus d) Change6、(1) 在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Move 500，500End Sub程序运行后，单击命令按钮，执行的操作为A) 命令按钮移动到距窗体左边界、上边界各
4、 500 的位置B) 窗体移动到距屏幕左边界、上边界各 500 的位置C) 命令按钮向左、上方向各移动 500D) 窗体向左、上方向各移动 5007、在窗体上有若干控件，其中有一个名称为 Text1 的文本框。影响 Text1 的 Tab 顺序的属性是 A) TabStop B)EnabledC) Visible D)TabIndex8、在窗体上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为A) For i=0 To List1.ListCount-1NextB) For i=0 To ListCount-1NextC) For i=1 To Li
5、st1.listCountNextD) For i=1 To ListCountNext9、在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程：Private Sub Command1_Click()a = 12345Print Format$(a, “000.00“)End Sub程序运行后，单击命令按钮，窗体上显示的是A) 123.45 B) 12345.00 C) 12345 D)00123.4510、确定一个控件在窗体上的位置的属性是A) Width 和 Height B) Width 或 HeightC) Top 和 Left D) Top 或 Left 二、填
6、空题(1) 控件是包含在窗体上的对象，它具有【1】 和 【2】事件这三种特性，并依此完成其特定的功能。（2）把窗体的 KeyPreview 属性设置为 True，然后编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub程序运行后，如果直接按键盘上的“A“键（即不按住 Shift 键），则在窗体上输出的字符分别是
7、 【3】 和 【4】 。（3）在窗体上画一个标签（名称为 Label1）和一个定时器（名称为 Timer1），然后编写如下几个事件过程：Private Sub Form_Load()Timer1.Enabled = FalseTimer1.Interval = 【5】 End SubPrivate Sub Form_Click()Timer1.Enabled = 【6】End SubPrivate Sub Timer1_Tick()Label1.Text = 【7】End Sub程序运行后，单击窗体，将在标签中显示当前时间，每隔 1 秒钟变换一次（见图）。请填空。（4）在窗体上画一个文本框、一
8、个标签和一个命令按钮，其名称分别为 Text1、Label1和 Command1，然后编写如下两个事件过程：Private Sub Command1_Click()S$ = InputBox(“请输入一个字符串“)Text1.Text = S$End SubPrivate Sub Text1_Change()Label1.Text = UCase(Mid(Text1.Text, 7)End Sub程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic“，则在标签中显示的内容是 【8】 。三、程序设计题1、Form1、Form2、Form3 中各有 1 个文本框，内均有 1 个数字。如何将它们相加的和显示在 Form4 中的 Text1 里？如何将它们并列显示在 Form4 中的 Text1 里？2、实际应用中，一个窗体往往不能满足许多应用程序的要求，需要用到多个窗体，VB 提供了多窗体(Multi-Form)的程序设计。 简单描述建立多窗体的步骤：
