Visual Basic - Fallo en programa

Buenas, estoy empezando a programar y quiero hacer un programa que haga las tablas de multiplicar del 1 al 9 y depués de cada tabla debe de decir si continúa con la siguente, no sé si me explico... lo he intentado hacer pero el programa no funciona por algún fallo...
Estoy programando en concreto en Basic, para enterarme un poco antes de meterme con Visual Basic, gracias, les pego el código a ver si ven el fallo:

m = 0
for n = 1 to 9
for c = 0 to 10
m = n * c
print n; "x"; c; "="; m
next
print
input "¿Quieres otra?(s/n): ", r$
if r$ = "s" or r$ = "S" then
next
else
end
end if
end

Saludos

Hola a ver si te sirve el siguiente ejemplo
en visual basic 6.0
ejemplo de:
la tabla de multiplicar del UNO: un boton (command1) y dentro este codigo

Private Sub Command1_Click()
'la tabla del uno'
Dim n
For n = 0 To 10
MsgBox "1 X " & n & " = " & 1 * n
Next
End Sub

PARA LAS SIGUIENTES TABLAS CAMBIAR LA FRASE DE CODIGO:
MsgBox "1 X " & n & " = " & 1 * n

POR:

LA DEL DOS--> MsgBox "2 X " & n & " = " & 2 * n
LA DEL TRES->MsgBox "3 X " & n & " = " & 3 * n
..........
..........
.........

salu2

Por si te sirve en VB6 sería así

Private Sub Command1_Click()
Dim M As Integer, n As Integer, c As Integer, r As String
M = 0
For n = 1 To 9
For c = 0 To 10
M = n * c
Print n; "x"; c; "="; M
Next
Print
r = InputBox("¿Quieres otra?(s/n)")
If r <> "s" And r <> "S" Then End
Next
End Sub