1樓：依然特雷西
1、繪製線表後肯定要先找到這兩個控制元件。
2、然後在這裡先畫上x和y兩軸線。
4、接下來，用標籤輸入這兩個標誌。
4、在使用這個形狀按鈕繪製。
5、一個個畫過去線條就可以了。
注意事項：
vb可以輕易的使用dao、rdo、ado連線資料庫，或者輕鬆的建立active x控制元件，用於高效生成型別安全和麵向物件的應用程式。
2樓：匿名使用者
畫直線為了在兩個座標點之間畫一條直線，可使用 line 方法的簡單形式，其語法如下：
[object.]line [(x1, y1)]–(x2, y2)[, color]
其中 object 是可選擇的；若省略，此方法將在**所連線的窗體（當前窗體）上畫線。第一對座標也是可選的。就所有的座標值來說，x 和 y 引數都既可以是整數，也可以是分數。
例如，下列語句可在窗體上畫一條斜線。
line (500, 500)–(2000, 2000)
visual basic 所畫出的一條直線，要包括第一個端點，而不是最後一個端點。這種行為在從點到點畫封閉曲線時是有用的。為了畫最後一個端點，應使用這種語法：
pset [step] (0, 0)[, color]
第一對座標 (x1, y1) 是可選的。如果省略這些座標，將把該物件的 x,y 當前位置（畫圖座標）作為端點。當前位置是由 currentx 和 currenty 屬性指定的，然而在其它情況它會等於以前的圖形方法或 print 方法所畫最後點的位置。
如果以前沒有使用過圖形方法或 print 方法，或沒有設定 currentx 和 currenty 屬性，則預設位置為物件的左上角。
例如，以下語句通過三點連線畫出一個三角形。
'設定起點的 x 座標。
currentx = 1500
'設定起點的 y 座標。
currenty = 500
'向起點的右下方畫一直線。
line -(3000, 2000)
'向當前點的左方畫一直線。
line -(1500, 2000)
'向右上方畫一直線到起點。
line -(1500, 500)
blanker 應用程式使用 line 方法建立出了一些有趣的圖案樣式。為了看到這些圖案，可從「選項」選單中，選定「crossfire」，然後選定「start demo」按鈕，即可看到。
step 關鍵字
pset、line、和 circle 方法使用以下語法可指定一個或多個點：
(x, y)
可在每個點之前加上 step 關鍵字，用來指定要畫出的點，是相對最後畫出點的位置。visual basic 要將 x 和 y 的值加到最後所畫的點上。例如，下邊這條語句：
line (100, 200)–(150, 250)
等價於：
line (100, 200)–step(50, 50)
在許多情況下，step 關鍵字可免除持續不斷地記錄最後所畫點位置的負擔。經常最為關心的可能是兩點的相對位置，而不是它們的絕對位置。
使用顏色引數
為了改變直線的顏色，應將可選的 color 引數與圖形方法一起使用。例如，下述語句將畫一條深藍色的直線：
line (500, 500)–(2000, 2000), rgb(0, 0, 255)
如果省略了 color 引數，將使用在其上畫線的物件的 forecolor 屬性，來決定直線的顏色。
3樓：匿名使用者
瞭解下面幾個方法的使用
picture1.scale (-5, 10)-(10, -10)設定**框的座標，在上面的例子中，**框的左上角座標為(-5, 10)，右下角座標為（10, -10)
picture1.forecolor = rgb(255, 255, 0)
picture1.drawwidth = 2設定畫線顏色和粗細
picture1.line (-5, 0)-(10, 0)畫線picture1.pset (x, y)畫點
請問，vb中可以畫線的粗細和指定畫出的線是什麼顏色嗎？
4樓：尚心部落
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 語句塊。
5樓：匿名使用者
當然可以，否則這工具能賣出去麼？msdn裡面有示例，看一下就知道怎麼畫 。
這個示例用 line 方法在窗體上畫了幾個同心矩形。要執行這個示例，將此**放入窗體的 general 部分。按 f5 並單擊窗體。
sub form_click ()
dim cx, cy, f, f1, f2, i ' 宣告變數。
scalemode = 3 ' 設定 scalemode 為畫素。
cx = scalewidth / 2 ' 水平中點。
cy = scaleheight / 2 ' 垂直中點。
drawwidth = 8 ' 設定 drawwidth。
for i = 50 to 0 step -2
f = i / 50 ' 執行中間步驟。
f1 = 1 - f: f2 = 1 + f ' 計算。
forecolor = qbcolor(i mod 15) ' 設定前景顏色。
line (cx * f1, cy * f1)-(cx * f2, cy * f2), , bf
next i
doevents ' 做其它處理。
if cy > cx then ' 設定 drawwidth。
drawwidth = scalewidth / 25
else
drawwidth = scaleheight / 25
end if
for i = 0 to 50 step 2 ' set up loop.
f = i / 50 ' 執行中間。
f1 = 1 - f: f2 = 1 + f ' 計算。
line (cx * f1, cy)-(cx, cy * f1) ' 畫左上角。
line -(cx * f2, cy) ' 畫右上角。
line -(cx, cy * f2) ' 畫右下角。
line -(cx * f1, cy) ' 畫左下角。
forecolor = qbcolor(i mod 15) ' 每次改變顏色。
next i
doevents ' 進行其它處理。
end sub
6樓：匿名使用者
可以參考一下：
private sub form_load()me.autoredraw = true
me.scalemode = 6 '單位設為毫米me.drawwidth = 5 '5毫米dim i, j as long
for i = 1 to 10
if i > 5 then
line (5, i * 2)-(50, i * 2), vbblue
else
line (5, i * 2)-(50, i * 2), vbredend if
next i
end sub
7樓：匿名使用者
private sub form_click()me.drawwidth = 5 '5畫素 自己轉換你想要的5毫米for i = 1 to 5
me.line (100, 200 * i)-(1500, 200 * i), vbred
next
for i = 1 to 5
me.line (100, 1000 + 200 * i)-(1500, 1000 + 200 * i), vbblue
next
end sub
8樓：匿名使用者
object..drawwidth = 10
vb 如何在picture中用line方法連續畫線 10
9樓：匿名使用者
vb可用object.line - (x2, y2)寫法實現在物件上繪製連續折線。
line 方法，在物件上畫直線和矩形。
以下是具體實現繪製曲線的**：
option explicit
const pi = 3.14159265432
private sub command1_click()
picture1.scale (-2 * pi, 1)-(2 * pi, -1) '建立座標系
dim i as single
picture1.currentx = -2 * pi '建立當前座標
picture1.currenty = 0
for i = -2 * pi to 2 * pi step 0.01
picture1.line -(i, cos(3 * i) * sin(5 * i)), vbred '繪製曲線
next
end sub
執行效果：
VB中FORMAT是什麼意思，在VB中，Format 是什麼意思，怎麼理解的？
format是cstring類的一個成員函式，它通過格式操作使任意型別的資料轉換成一個字串 datetime是時間型別。返回值是一種格式化後的字元，format裡面可以寫普通的字串，比如 my name is 但有些格式指令字元具有特殊意義，比如 6s vb格式輸出函式可以使數值 日期或字串按指定的...
vb中tab（n）是什麼意思，在vb中「vbtab」 是什麼意思？
tab n 可選的 n 引數是在顯示或列印列表中的下一個表示式之前移動的列數。若省略此引數，則 tab 將插入點移動到下一個列印區的起點。這就使 tab 可用來替換國別中的逗號，此處，逗號是作為十進位制分隔符使用的。tab函式把顯示或列印位置移到由引數n指定的列數。當在一個 print方法中有多個t...
在vb中什麼叫標籤，什麼叫控制元件，在VB中什麼叫標籤，什麼叫控制元件？
在標籤的cilck事件中寫上 就可以點選了。private sub label1 click msgbox 點我 end sub 在圖形使用者介面 gui 中螢幕上的一種物件，使用者可操作該物件來執行某一行為。控制元件是使用者可與之互動以輸入或運算元據的物件。控制元件通常出現在對話方塊中或工具欄上。...