GDI+怎么画箭头
答案:2 悬赏:0 手机版
解决时间 2021-02-23 19:16
- 提问者网友：niaiwoma
- 2021-02-22 21:58
GDI+怎么画箭头
最佳答案
- 五星知识达人网友：野慌
- 2021-02-22 23:07
是下面的效果吗？ 其实原理都一样，只是有些东西麻烦小点而已
Private Sub Form_Load()
Picture1.AutoRedraw = True
Picture1.Line (1000, 500)-(2000, 800),vbRed , BF
Picture1.Line (1700, 800)-(2000, 1500),vbRed , BF
For i = -300 To 300
Picture1.Line (1850 + i, 1500)-(1850, 2000),vbRed
Next
End Sub
Private Sub Form_Load()
Picture1.AutoRedraw = True
Picture1.Line (1000, 500)-(2000, 800),vbRed , BF
Picture1.Line (1700, 800)-(2000, 1500),vbRed , BF
For i = -300 To 300
Picture1.Line (1850 + i, 1500)-(1850, 2000),vbRed
Next
End Sub
全部回答
- 1楼网友：一把行者刀
- 2021-02-22 23:51
我不会~~~但还是要微笑~~~：）
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯