如何使用while语句求1到100的奇数和

1、用while语句求1~100的奇数和代码有以下方法：

解法一：sum =0

for i in range(1,100):

    if i %2==1:

        sum +=i

        print(sum)

2、解法二:利用access关系数据库

Private Sub sum _sub2()

    Dim sum As Integer . i As Integer 

       sum =0:i=1

      While i <=100 

           i =十2

           sum = sum 十 i 

           i =十1

       Wend 

       MsgBox "1~100地和为＂&. sum 

End Sub