Private Sub Command1_Click()Dim i As Integer, sum As IntegerFor i = 1 To 101 Step 4 sum = sum + i NextMsgBox sumEnd Sub
撸啊撸是咯哦去