查人人中国名人网布氏硬度检测对照表:vb中怎么控制一个LINE的宽度??
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/09 08:42:07
vb中怎么控制一个LINE的宽度??
比如我想让一个LINE的宽度是150像素:
line (10,10)-(2500,2500) ??????
下面应该怎么写???
比如我想让一个LINE的宽度是150像素:
line (10,10)-(2500,2500) ??????
下面应该怎么写???
1、在窗体上添加一个Line1控件。
2、在它的属性框里修改BorderWidth的值为想要的值，比如输入5。
3、编程实现：
Line1.BorderWidth = 6
事先在窗体里添加一个line控件
需要显示的时候指定它的位置
宽度用WIDTH属性试试。
使用DrawWidth 属性
返回或设置图形方法输出的线宽。
语法
object.DrawWidth [= size]
DrawWidth 属性语法具有下列组成部分：
部分 描述
object 对象表达式，其值是“应用于”列表中的一个对象。
size 数值表达式，其范围从 1 到 32,767。该值以像素为单位表示线宽。缺省值为 1，即，一个像素宽。
Private Sub Form_Load()
DrawWidth = 150
Line (10, 10)-(2500, 2500)
End Sub
LINE没有宽度可设，你要设 Form1 或 Picture1 的 DrawWidth 属性，例如：
Private Sub Command1_Click()
Dim originWidth As Single
originWidth = Form1.DrawWidth
Form1.DrawWidth = 20 '设在 Form1 画线时宽度
Line (10, 10)-(2500, 2500)
Form1.DrawWidth = originWidth '复原
End Sub
关注