求指导

这个事斐波那契数列求和的 代码 为什么运行起来显示不了
Private Sub Form_Load()
Dim N, A, B, K As Integer
Dim SUM As Long, S$
A = 0
B = 0
K = 0
SUM = 0
For N = 1 To 15
SUM = A + B
Print Tab(5 + K * 16); A
Print Tab(21 + K * 16); B
If K = 2 Then
Print
K = -2
End If
A = A + B
B = A + B
K = K + 2
Next N
Print: Print: Print Tab(25); "SUM="; SUM
End Sub