1樓：玫瑰為你盛開
用circle方法（顏色可空著，用預設的前景顏色繪圖）：
物件名.circle（x，y）,半徑,[顏色],起始角,終止角起始角和終止角均為負值時，畫一個扇形，起始角和終止角都是弧度，不是60°，70°這樣的角度，你按照自己的百分比將0到2*3.14159的弧度劃分好就可以了。
要填充的話，在畫【每個扇形】之前，用兩個語句（窗體的物件名直接用me）：
物件名.fillstyle = 0
物件名.fillcolor = 顏色值
第一行的0表示實心填充，第二行的顏色值可用rgb(i,j,k)或qbcolor(n)來賦值。
比如以下語句，就是畫兩個相鄰的扇形，一個紅色填充，一個黃色填充：
me.scale (-100, 100)-(100, -100)me.fillstyle = 0
me.fillcolor = rgb(255, 0, 0)circle (0, 0), 50, , -1.2, -1.7me.fillstyle = 0
me.fillcolor = rgb(255, 255, 0)circle (0, 0), 50, , -1.7, -2.7
2樓：匿名使用者
自己畫圓
circle (0, 0), r, color然後自己畫線,根據百分比和圓心計算好線段的終點從圓心畫幾條線過去就行了
VB6 0中如何設定延時
private sub form load dim x x shell notepad.exe vbnormalfocus sendkeys 這是一個文字檔案的測試程式.true 模擬輸入英文字串 sendkeys true 兩次回車 waittime 2 延時 2 秒 sendkeys 自動輸入文...
VB6 0的窗體中，如何顯示不同內容
1全部不知道你註解是什麼用意。不過兩個都說一下，如果你不想新增form。你就建立frame組將所想要切換的所有控制元件全放在相應的每一個frame1陣列控制元件裡。然後，不管你有多少個控制元件。你都不需要對那控制元件單個操控。你只用通過用迴圈來控制frame1陣列的visible屬性來統一管理，或者...
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...