1樓：匿名使用者
定義了一個布林型別變數，賦值為真，boolean型別只有兩個值，不是true就是false，就像硬幣只有正反兩面一樣，不是字串true
2樓：匿名使用者
你可以看看我根據你的**改寫的，我用了更少的變數和更清晰的結構。
基本思路是：定義3對座標：初始座標、前一座標、當前座標，分別用0,1,2表示的話，
點選左鍵，連線1,2
點選右鍵，設定0為2
雙擊左鍵，連線0和2
這樣就都明白了吧。
你的問題中那個布林型變數，就是雙擊的時候設定0這點用的，單擊時候為否，因此連線12，雙擊時候為是，連線02
'初始點
dim x0 as integer
dim y0 as integer
'途中點
dim x1 as integer
dim y1 as integer
'雙擊的時候，閉合曲線，而且重設起點
private sub form_dblclick()
line (x1, y1)-(x0, y0), rgb(255, 0, 0)
call start(x1, y1)
end sub
private sub form_load()
drawwidth = 3
'預設初始點為原點
x0 = 0
y0 = 0
end sub
private sub form_mousedown(button as integer, shift as integer, x as single, y as single)
'點選左鍵則畫一段
if button = 1 then
line (x1, y1)-(x, y), rgb(255, 0, 0)
x1 = x
y1 = y
end if
'點選右鍵可以重新設定初始點
if button = 2 then
call start(x, y)
end if
end sub
'設定初始點為當前滑鼠位置
private sub start(byval x as integer, byval y as integer)
circle (x, y), 50
x0 = x
y0 = y
x1 = x
y1 = y
end sub
C畫多邊形
剛寫好，僅供參考 point point1 new point 100,200 point point2 new point 100,300 point point3 new point 200,300 point point4 new point 200,200 point curvepoints...
CAD如何畫多邊形體，CAD中怎麼畫多邊形
李明望的文庫 cad中繪製多變型需要用到多邊形命令pol。下面以畫一個六邊形舉例說明 執行pol命令。命令欄提示輸入多變形的邊數，此時輸入6即可。命令欄提示指定多邊形的中心點，此時指定中心點。命令欄提示選擇外切於圓還是內接於圓。這個要看情況而定，這裡選擇內接於圓。指定圓的半徑，這裡輸入100.如圖所...
CAD問題，如何按固定面積畫多邊形
此題需用代數分析法解決。 11dao草人 先畫一個任意大小的多邊形，測量出所畫多邊形的面積例如a1 命令aa空格，o空格，選擇所畫多邊形即可看出面積 用a2除以你所需要的面積，得出的數字開根號，最後用sc命令縮放你所畫出的圖形即可。例如畫出多邊形面積500，所需面積400，則500除以400等於1....