如何将其自动换行即每5行一换,帮忙看一下程序哪里错了
PrivateSubForm_Click()Dima,zAsIntegerz=0:c=0Fora=101To200Step2IfaMod3<>0Thenc=c+aPrin...
Private Sub Form_Click()
Dim a, z As Integer
z = 0: c = 0
For a = 101 To 200 Step 2
If a Mod 3 <> 0 Then
c = c + a
Print c; a;
z = z + 1
If z Mod 5 = 0 Then Print
End If
Next a
End Sub
越详细越好 展开
Dim a, z As Integer
z = 0: c = 0
For a = 101 To 200 Step 2
If a Mod 3 <> 0 Then
c = c + a
Print c; a;
z = z + 1
If z Mod 5 = 0 Then Print
End If
Next a
End Sub
越详细越好 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询