我是新手快考试求高手指导
编写程序，已知：S=1+3+5+7+...+99，求S不大于150的最大值 --------------------编程问答-------------------- 哥们，这是一个典型的数学问题，等差数列，压根用不着程序，如一定要用程序，请看如下分析先：1、数列的常规项：An＝2*n-1
2、数列的前N项之和：Sn＝（1+An）/2*n，也就是：n^2
3、所以，要求只和不大于150，也就是：n^2<=150
--------------------编程问答-------------------- --------------------编程问答-------------------- setp 2 --------------------编程问答-------------------- --------------------编程问答-------------------- --------------------编程问答-------------------- 呵呵，老师考的是 Do While 的编写，不是计算结果。
--------------------编程问答--------------------
Private Sub Form_Load()
Dim s As Integer
Do While s <= 150
temp = s
s = s + 2
Loop
MsgBox "满足条件的s为：" & temp, vbInformation, "结果"
End Sub
试试这个
补充：VB , 基础类
