二级vb编程题1—简单操作

二级vb编程题1—简单操作

一、简单操作

1.1新建工程，在窗体Form1上创建两个命令按钮Command1、Command2，一个文本框Text1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使两个按钮上的文字分别为“隐藏”和“显示”，文本框中显示“可以隐藏的控件”（5分）。

(2)编写事件过程，运行程序后，单击“隐藏”按钮，文本框不可见，单击“显示”按钮，文本框重新可见（5分）。

(3)编写事件过程，运行程序后，单击窗体，窗体的标题栏上显示“隐藏/显示控件”（5分）。 解答：（1）修改Command1、Command2的Caption属性分别为“隐藏”和“显示”， 文本框的Text属性为“可以隐藏的控件”

Private Sub Command1_Click()

Text1.Visible = False

End Sub

Private Sub Command2_Click()

Text1.Visible = True

End Sub

Private Sub Form_Click()

Form1.Caption = "隐藏/显示控件"

End Sub

1.2新建工程，在窗体Form1上创建一个命令按钮Command1，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使命令按钮上的文字为“清除”，标签上文字为“这里是一个标签”（5分）。

(2)编写事件过程，运行程序后，单击“清除”按钮，清除标签上的文字（5分）。

(3)编写事件过程，运行程序后，每次单击标签，标签向左移动若干位置（5分）。 Private Sub Command1_Click()

Label1.Caption = ""

End Sub

Private Sub Label1_Click()

Label1.Left = Label1.Left - 100

End Sub

1.3新建工程，在窗体Form1上创建一个命令按钮Command1，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使命令按钮上的文字为“窗体标题”，标签上文字为“窗体颜色”（5分）。

(2)编写事件过程，运行程序后，单击按钮，窗体的标题栏上显示“我的窗体”（5分）。

(3)编写事件过程，运行程序后，单击标签，窗体的背景色改为蓝色（5分）。

Private Sub Command1_Click()

Form1.Caption = "我的窗体"

End Sub

Private Sub Label1_Click()

Form1.BackColor = vbBlue

End Sub

二级vb编程题1—简单操作

1.4新建工程，在窗体Form1上创建一个命令按钮Command1，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使命令按钮上的文字为“显示”，标签上文字为“”（5分）。

(2)编写事件过程，运行程序后，单击“显示”按钮，标签上显示“你单击了[显示]按钮”（5分）。

(3)编写事件过程，运行程序后，每次单击窗体，命令按钮向上移动一个按钮位置（5分）。 Private Sub Command1_Click()

Label1.Caption = "你单击了[显示]按钮"

End Sub

Private Sub Form_Click()

Command1.Top = Command1.Top - Command1.Height

End Sub

1.5新建工程，在窗体Form1上创建一个命令按钮Command1，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使命令按钮上的文字为“红色”，标签上文字为“这里是一个标签”（5分）。

(2)编写事件过程，运行程序后，单击按钮，窗体的背景色改为红色（5分）。

(3)编写事件过程，运行程序后，单击窗体，标签上显示“你单击了窗体”（5分）。 Private Sub Command1_Click()

Form1.BackColor = vbRed

End Sub

Private Sub Form_Click()

Label1.Caption = "你单击了窗体"

End Sub

1.6新建工程，在窗体Form1上创建一个命令按钮Command1，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使命令按钮上的文字为“显示”，标签上文字为“”（5分）。

(2)编写事件过程，运行程序后，单击“显示”按钮，标签上显示“你单击了[显示]按钮”（5分）。

(3)编写事件过程，运行程序后，每次单击窗体，命令按钮向右移动一个按钮位置（5分）。 Private Sub Command1_Click()

Label1.Caption = "你单击了[显示]按钮"

End Sub

Private Sub Form_Click()

Command1.Left = Command1.Left+Command1.Width

End Sub

1.7新建工程，在窗体Form1上创建两个命令按钮Command1、Command2，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使两个命令按钮上的文字分别为“改变字体”和“改变内容”，标签上文字为“提高计算机应用能力”，字体为宋体（5分）。

(2)编写事件过程，运行程序后，单击“改变字体”按钮，标签上的文字字体改为隶书（5分）。

(3)编写事件过程，运行程序后，单击“改变内容”按钮，标签上的文字改为“标签上的内

二级vb编程题1—简单操作

Private Sub Command1_Click()

Label1.FontName = "隶书"

End Sub

Private Sub Command2_Click()

Label1.Caption = "标签上的内容已改变"

End Sub

1.8新建工程，在窗体Form1上创建两个命令按钮Command1、Command2，一个标签Label1，并将窗体文件命名为“VB第一题”（5分），要求：

(1)修改属性，使两个命令按钮上的文字分别为“改变颜色”和“改变大小”，标签上文字为“计算机等级考试”，标签可以自动调整大小以显示所有文字（5分）。

(2)编写 …… 此处隐藏：1715字，全部文档内容请下载后查看。喜欢就下载吧 ……