运行以下VB程序，输出结果是。

Private Sub Command1_Click()

Dim s As Integer, x As Integer

s = 0

x = 20

For x = 20 To 1 Step -3

    s = s + x

Next x

Print x

End Sub