1樓：匿名使用者
輸出倒是比較簡單
for i=0 to 360
y(i)=x+a*x+b*z(i)+c 'z(i)表示，分別與x對應的取值，y(i)方便用來儲存這麼多數值
print y(i) 'y後面可以加逗號或者分號等，這樣不至於每個y都是一行，361行，vb介面可以顯示不完整。記得把窗體屬性的autoredraw為true。還有就是最好用一個文字框把y儲存起來。
用法text1.text=text1.text+str(y)
至於畫出x、y的座標圖，你是指所有的這361個點嗎？
那就以左下角為原點，把x、y值進行換算，每個畫素值為1，point這些x、y點就可以了
2樓：匿名使用者
sub form1_click()
dim x,i,a,b,c,z(361),y(361)
a=已知數;b =已知數;c=已知數
for i=0 to 360
x=iz(i)=f(x) '這裡就是你說的對應的x與z的關係表達
y(i)=x+ax+bz(i)+c '利用y與x、z的關係計算y值
print y(i);
next i
'由於print語句預設將顯示窗體劃分為左上角為座標（0,0）的座標系，所以可以直接這樣顯示各座標點。
for i=0 to 360
form1.pset (i,y(i)) '設定點位置，其實可以直接用point語句
form1.point (i,y(i)) '就可直接顯示點了。
next i
end sub
VB用公式計算S數值兩個按鈕解釋
第一個關鍵是這裡 for i 1 to 20 s s 1 i 1 2 1 iif i mod 2 1,1,1 next i 1 2 1 iif i mod 2 1,1,1 這要分成兩部分看，前半部分是根據項數i確定一個奇數。i 1 2 1，你算下，i 1是第一項，為1，i 2,第二項為3。不是嗎？後...
用vb計算，用VB計算N！
我也很無聊。dim result as long dim n as integer 初始化result n result 1 n cint text1.text 使用while while n 0 result result n n n 1 loop 使用for dim i as integer f...
excel公式計算，excel中公式計算
i2 if sum f2 g2 180,5,if sum f2 g2 160,2,if sum f2 g2 140,1,0 獎學金基數 或i2 if f2 g2 180,5,if f2 g2 160,2,if f2 g2 140,1,0 獎學金基數 if and l1 140,l1 160 獎學金基...