For i = 0 To 10tabla = number.Text & "*" & i & "=" & Val(number.Text * i) & vbNewLineText1.Text = tablaNext i
text1.text = text1.text & tabla
If a >= 1 and a<=9 thenmsgbox "Solo del 1-9"end if
MsgBox("Texto del mensaje", Estilo del mensaje[Conjunto de iconos y botones, debes selecionar uno de la lista que te aparecera], "Titulo")
MsgBox ("Este es un msgBox", MsgBoxStyle.Information, "¡Consegido!")
Msgbox("Hola mundo, quieres cafe?",vbyesno)