Question

Private Sub Command1_Click() x = 2 Fori= 1 to 10 step 2 x = x + i Next End Sub

说我是编译错误缺少语句结束 求各位帮帮忙

Answer 1

Private Sub Command1_Click()
    x = 2
    For i= 1 to 10 step 2
        x = x + i
    Next
End Sub