寫vb演算法

A. 這個該如何用VB寫演算法

嵌套循環，3個元素就三層嵌套，4個元素就4個嵌套……以3個元素為例，設數組為A（N），共有N個元素（數組下標就從1開始），另一個變數是SUM，則程序可以寫成

For i = 1 to N
For j = i+1 to N
For k = j+1 to N
If A(i) + A(j) + A(k) = SUM Then
'這里的i、j、k 就是所要的元素的下標
End If
Next k
Next j
Next i

程序沒調試過，但思路就是這樣。

B. 求VB演算法

應該是：求每行代碼的解釋吧？
樓上已經回答的很詳細了，我再說說你最後的問題，關於Mod和\兩個運算：
回顧當小學里，第一次學除不盡的除法時，我是小學三年級的時候，老師這樣寫在黑板上的：
7 ÷ 3 = 2 …… 1
老師說那個2叫做商，那個在省略號後面的1叫做余數。
我們再來看看Mod 和 \ 這兩個符號在VB里的作用
7 \ 3 = 2
7 Mod 3 = 1
原來這兩個運算符號，在VB里實現的就是商數與余數的獲得。
注意，這兩個稱為「運算符號」

C. 寫四個VB演算法

1.
'設1元紙幣 x 張,2元紙幣 y 張,5元紙幣 z 張
Private Sub Command1_Click()
For x = 1 To 8
For y = 1 To 8
For z = 1 To 8
If (x * 1 + y * 2 + z * 5 = 24) And (x + y + z = 10) Then
Print "1元紙幣" + Str(x) + "張 2元紙幣" + Str(y) + "張 5元紙幣" + Str(z) + "張"

End If
Next z
Next y
Next x

End Sub

D. VB簡單演算法

第一次
S(1)
m=1
循環1次
x=0
x=x+1
x=1
S=1
S(1)=1

s(2)
M=2
循環2次
X=1
X=X+1
X=2

X=2
X= X+1
X=3
s(2)=3

S(1)+S(2) 當然是 4 了

第二次按

S(1)
m=1
循環1次
x=3
x=x+1
x=4
S=4
S(1)=1

s(2)
M=2
循環2次
X=4
X=X+1
X=5

X=5
X= X+1
X=6
s(2)=6

S(1)+S(2) 當然是 10 了

第三次按 自己推到把!!!

第四次 22

第五次按 28

關鍵句!!
Static x As Integer

在過程級別中使用，用於聲明變數並分配存儲空間。在整個代碼運行期間都能保留使用 Static 語句聲明的變數的值。

E. VB共有哪些演算法（所有）

所謂演算法，就是你解決一個問題所運算的方法，VB（或者其它程序語言）只提供基本語句，例如加減乘除、平方根、反切、冪、正餘弦等等，演算法是靠你自己去編寫的，所以說演算法是無窮無盡的！