Vb编写程序题型及答案.doc

Vb编写程序题型 一、基本操作题 1、新建工程，在窗体上创建一个命令按钮Command1，一个标签Label1。窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：(1)在属性窗口中设置命令按钮上的文字为“绿色”，标签上文字为“这里是一个标签”（5分）。(2)编写事件过程，运行程序后，单击命令按钮，窗体的背景色改为绿色（5分）。(3)编写事件过程，运行程序后，单击窗体，标签上显示“你单击了窗体”（5分）。 答案： Private Sub Command1_Click() Form1.BackColor = vbGreen End Sub Private Sub Form_Click() Label1.Caption = 你单击了窗体 End Sub 2、新建工程，在窗体上创建一个命令按钮Command1和一个标签Label1。窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：(1)在属性窗口中设置命令按钮上的文字为“改变大小”，标签上文字为“改变颜色”（5分）。(2)编写事件过程，运行程序后，单击命令按钮，适当增加窗体的高度（5分）。(3)编写事件过程，运行程序后，单击标签，将窗体的背景色改为绿色（5分）。 答案： Private Sub Command1_Click() Form1.Height = Form1.Height + 200 End Sub Private Sub Label1_Click() Form1.BackColor = vbGreen End Sub 3、新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1。窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：(1)在属性窗口中设置两个命令按钮上的文字分别为“隐藏”和“显示”，标签上文字为“可以隐藏的控件”（5分）。(2)编写事件过程，运行程序后，单击“隐藏”按钮，标签不可见，单击“显示”按钮，标签重新可见（5分）。(3)编写事件过程，运行程序后，单击窗体，窗体的标题栏上显示“隐藏/显示控件”（5分）。 答案： Private Sub Command1_Click() Label1.Visible = False End Sub Private Sub Command2_Click() Label1.Visible = True End Sub Private Sub Form_Click() Form1.Caption = 隐藏/显示控件 End Sub4、新建工程，在窗体上创建一个命令按钮Command1、一个标签和三个单选钮OptionButton1～3。窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：(1)在属性窗口中设置命令按钮上的文字为“关闭”，标签上的文字为“字体颜色”，三个单选钮上的文字分别为“红”、“绿”、“蓝”（5分）。(2)编写事件过程，运行程序后，单击命令按钮可关闭窗体（5分）。(3)编写事件过程，运行程序后，分别单击三个单选钮，可改变标签文字为红色、绿色或蓝色（5分） 答案： Private Sub Command1_Click() Form1.Hide End Sub Private Sub Option1_Click() Label1.ForeColor = vbRed End Sub Private Sub Option2_Click() Label1.ForeColor = vbGreen End Sub Private Sub Option3_Click() Label1.ForeColor = vbBlue End Sub 5、新建工程，在窗体上创建一个命令按钮Command1，一个标签Label1。窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：(1)在属性窗口中设置命令按钮上的文字为“窗体标题”，标签上文字为“窗体颜色”（5分）。(2)编写事件过程，运行程序后，单击命令按钮，窗体的标题栏上显示“Visual?Basic考试”（5分）。 (3)编写事件过程，运行程序后，单击标签，窗体的背景色改为红色（5分）。 答案： Private Sub Command1_Click() Form1.Caption = Visual Basic考试 End Sub Private Sub Label1_Click() Form1.BackColor = vbRed End Sub 6、新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label