急！明天要做的题目！简单的vb编程题，要用简单的方法解！

来源：百度知道 编辑：UC知道 时间：2024/05/18 04:31:41
1.在窗体上画四个图象框和一个文本框，在各个图象框中装如一个箭头图形，分为4个不同的方向，把文本框的Multiline属性设置为True，编写程序当单击某个图象时，在文本框中显示相应的信息。
2.在窗体上建立了3个文本框和一个命令按妞，程序运行后，单击命令按妞，在第一个文本框中显示有Command-Click事件过程设定的内容。同时在第二，三个文本框中分别用小写字母和大写字母显示第一个文本框中的内容。
我自己不会做，谢谢

'问题1：
'Text1 的 MultiLine 属性要在属性窗口设置
Private Sub Form_Load()
Picture1.AutoRedraw = True: Picture1.Print "→"
Picture2.AutoRedraw = True: Picture2.Print "←"
Picture3.AutoRedraw = True: Picture3.Print "↑"
Picture4.AutoRedraw = True: Picture4.Print "↓"

End Sub

Private Sub Picture1_Click()
Text1.Text = "单击了Picture1：→"
End Sub
Private Sub Picture2_Click()
Text1.Text = "单击了Picture2：←"
End Sub
Private Sub Picture3_Click()
Text1.Text = "单击了Picture3：↑"
End Sub
Private Sub Picture4_Click()
Text1.Text = "单击了Picture4：↓"
End Sub

'问题2：
Private Sub Command1_Click()
Text1.Text = "我的字符：ABCxyz"
Text2.Text = LCase(Text1.Text)
Text3.Text = UCase(Text1.Text)
End Sub

Private Sub picBox_Click(Index As Integer)
Select Case Index<