⑴ vb編程題求100至200內的素數之和
做這個程序時，首先初始化一個美加器，初值為零，然後通過一個判斷是否素數的函數，在做一個循環，從101到199步長為二進行循環，如果找到了一個素數，就把他累加起來，循環結束的時候，輸出這個累加器的值就可以了
⑵ 怎樣用vb編程計算從鍵盤上輸入任意個數,求其總和、平均值
新建工程,1個文本框和1個按鈕
text1用來錄入數據, 因為是任意個數,用很多文本框是不方便的,程序設計是使用","來分隔數字,你可以輸入任意多個數字,然後按鈕command1後,就可以顯示總和及平均值.
Private Sub Command1_Click()
If Len(Text1) = 0 Then Exit Sub
If InStr(Text1, ",") < 2 Then Exit Sub
Dim a, sumn%, i%, j%
a = Split(Text1, ",")
For i = 0 To UBound(a)
If IsNumeric(Val(a(i))) Then '防止有非數字的情況發生,做一下校驗
sumn = sumn + Val(a(i))
j = j + 1
End If
Next
Print "總和為:" & sumn
Print "平均數為:" & sumn / (UBound(a) + 1)
End Sub