求VB 的编码···题目如下：在窗体上输出100-200（包括100,200）之间不能被3整除的奇数及这些数的和.(

Private Sub Command1_Click()Dim i,j,kFor i = 101 To 200 Step 2 '每次加二,确保奇树If i Mod 3 > 0 Then '不能被3整除j = j & Str(i) & "," '要打印输出的字符串k = k + i '奇树和End IfNext iMe.Print jMe.Print...