1樓:匿名使用者
1、在窗體上新增一個line1控制元件。
2、在它的屬性框裡修改borderwidth的值為想要的值,比如輸入5。
3、程式設計實現:
line1.borderwidth = 6
2樓:堵義
事先在窗體裡新增一個line控制元件
需要顯示的時候指定它的位置
寬度用width屬性試試。
3樓:匿名使用者
line沒有寬度可設,你要設 form1 或 picture1 的 drawwidth 屬性,例如:
private sub command1_click()dim originwidth as singleoriginwidth = form1.drawwidthform1.drawwidth = 20 '設在 form1 畫線時寬度
line (10, 10)-(2500, 2500)form1.drawwidth = originwidth '復原end sub
4樓:匿名使用者
使用drawwidth 屬性
返回或設定圖形方法輸出的線寬。
語法object.drawwidth [= size]drawwidth 屬性語法具有下列組成部分:
部分 描述
object 物件表示式,其值是“應用於”列表中的一個物件。
size 數值表示式,其範圍從 1 到 32,767。該值以畫素為單位表示線寬。預設值為 1,即,一個畫素寬。
private sub form_load()drawwidth = 150
line (10, 10)-(2500, 2500)end sub
vb裡面的line方法的具體使用方法
5樓:匿名使用者
你試下,簡單的例子
form1.line (1, 1)-(2000, 2000)--------------畫線
form1.line (1, 1)-(2000, 2000), , b---------畫空心矩形
form1.line (1, 1)-(2000, 2000), , bf-------畫實心矩形
line 方法
在物件上畫直線和矩形。
語法 object.line [step] (x1, 1) [step] (x2, y2), [color], [b][f]
line 方法的語法有以下物件限定符和部分:
部分 描述
object 可選的。 物件表示式,其值為“應用於”列表中的物件。如果object 省略,具有焦點的窗體作為object。
step 可選的。關鍵字,指定起點座標,它們相對於由 currentx 和 currenty 屬性提供的當前圖形位置。
(x1, y1) 可選的。single (單精度浮點數),直線或矩形的起點座標。scalemode 屬性決定了使用的度量單位。
如果省略,線起始於由 currentx 和 currenty 指示的位置。
step 可選的。關鍵字,指定相對於線的起點的終點座標。
(x2, y2) 必需的。single (單精度浮點數),直線或矩形的終點座標。
color 可選的。long (長整型數),畫線時用的 rgb 顏色。如果它被省略,則使用 forecolor 屬性值。可用 rgb 函式或 qbcolor 函式指定顏色。
b 可選的。如果包括,則利用對角座標畫出矩形。
f 可選的。如果使用了 b 選項,則 f 選項規定矩形以矩形邊框的顏色填充。不能不用 b 而用 f。
如果不用 f 光用 b,則矩形用當前的 fillcolor 和 fillstyle 填充。fillstyle 的預設值為 transparent。
說明 畫聯結的線時,前一條線的終點就是後一條線的起點。
線的寬度取決於 drawwidth 屬性值。在背景上畫線和矩形的方法取決於 drawmode 和 drawstyle 屬性值。
執行 line 方法時, currentx 和 currenty 屬性被引數設定為終點。
這個方法不能用於with...end with 語句塊。
vb中ubound怎麼用,Ubound 在VB中怎麼用啊?!
ubound函式返回陣列的最大下標 dim s 4 as string dim i as integer i 4 i ubound s 就是取陣列的最大下標。格式 ubound 陣列,第幾維 給一段 執行一下 新建一窗體,然後到 區,刪除所有 後,貼上以下 可見執行效果 option explici...
vb6 0中,如何實現讀取檔案中的內容並在vb上顯示出
option explicitprivate sub form load dim fileno as integer dim pathname as string,filename as string dim tmp as string me.show pathname environ userpr...
VB中邏輯表示式怎麼表示,請問,VB中的邏輯運算子都是什麼意思?
不周期彗星 1 x y小於10 且 x y要大於0 x y 10 and x y 0 2 x.y都是正整數或都是負整數 int x x and int y y and sng x sng y 3 a.b之一為零但不得同時為零 a 0 or b 0 and a b 4 c1 c2 c3大於等於255或...