如何在VB中产生箭头指向

发布网友 发布时间:2022-04-22 09:50

我来回答

3个回答

热心网友 时间:2022-07-14 05:20

建一个Text1,Picture1,Picture2,Picture3,Picture4。
代码如下。
============
Private Sub Form_Resize()
Picture1.Print "←"
Picture2.Print "→"
Picture3.Print "↑"
Picture4.Print "↓"

End Sub

Private Sub Picture1_Click()
Text1.Text = "单击向左箭头"
End Sub

Private Sub Picture2_Click()
Text1.Text = "单击向右箭头"

End Sub

Private Sub Picture3_Click()
Text1.Text = "单击向上箭头"

End Sub

Private Sub Picture4_Click()
Text1.Text = "单击向下箭头"
End Sub

热心网友 时间:2022-07-14 05:20

朋友,你在网上找一幅箭头图片就可以了,代码如下:
Private Sub Picture1_Click()
Text1.Text = "单击向右箭头"
End Sub

热心网友 时间:2022-07-14 05:21

用photoshop做4个箭头,然后加载在picture中,再在picture1_click()中写相关的语句!
还有一种方法使用vb画图,画出4个箭头!

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com