VB picture 控件 画线的时候怎么分别改变线的透明度,粗细

2024-12-03 23:54:28
推荐回答(2个)
回答(1):

透明度无法改变

粗细可以修改 窗体的DrawWidth属性 默认为1

回答(2):

Private Sub Form_Load()
Picture1.AutoRedraw = True
Picture1.DrawWidth = 1
Picture1.Line (0, 0)-(100, 500), vbRed
Picture1.DrawWidth = 5
Picture1.Line -(1000, 1000), vbGreen
Picture1.DrawWidth = 9
Picture1.Line -(2000, 1000), vbBlue

End Sub