VB 相关问题

来源:百度知道 编辑:UC知道 时间:2024/06/16 02:13:49
1.在窗体上画四个图像框和一个文本框,在每个图像框中装入一个箭头图形,分为四个不同的方向,把文本框的MultiLine属性设置为Ture。编写,当单击某个图像框时,在文本框中显示相应的信息,例如,单击向右的箭头时,在文本框中显示“单击向右箭头”。
2.在窗体上建立3个文本框和一个命令按钮。程序运行后,单击命令按钮,在第一个文本框中显示由Command1-Click事件过程设定的内容(例如“Microsoft Visual Basic”),同时在第二、第三文本框中分别用小写字母和大写字母显示第一个文本框的内容。

第一题

'一般方法
Private Sub Picture1_Click()
Text1.Text = "up"
End Sub

Private Sub Picture2_Click()
Text1.Text = "down"
End Sub

Private Sub Picture3_Click()
Text1.Text = "right"
End Sub

Private Sub Picture4_Click()
Text1.Text = "left"
End Sub

'用控件数组的方法
Private Sub Picture1_Click(Index As Integer)
Select Case Index
Case 0: Text1.Text = "up"
Case 1: Text1.Text = "down"
Case 2: Text1.Text = "right"
Case 3: Text1.Text = "left"
End Select
End Sub

第二题
Private Sub Command1_Click()
Text1.Text = "Microsoft Visual Basic"
Text2.Text = LCase(Text1.Text)
Text3.Text = UCase(Text1.Text)
End Sub

希望对你有帮助,当然,这么简单的题希望你不是仅仅拿去交任务,更重要的去看看为什么会是这样子