Visual Basic - Efecto de texto
Códigos Visual Basic
Para el uso de este codigo debemos crear un boton, el cual llamaremos command1.
Solo debemos modificar los textos.
Una vez echo esto podremos ver el efecto.
Tutores.org
Mostrando Codigo - Visual Basic
CODIGO
// Codigo ofrecido por Tutores.org
- Private Sub Command1_Click()
- Dim x, y, i
- Form1.FontSize = 15
- ForeColor = 5
- x = CurrentX
- y = CurrentY
- For i = 1 To 400
- Print "Tutores.org"
- x = x + 1: y = y + 1
- CurrentX = x
- CurrentY = y
- Next
- ForeColor = &HFFF&
- Print "Tutores.org"
- End Sub
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Efecto de texto" href="http://www.tutores.org/codigo/1313/" target="_blank">Efecto de texto</a>
<!-- Final enlace Tutores.org -->
<a title="Tutores.org - Efecto de texto" href="http://www.tutores.org/codigo/1313/" target="_blank">Efecto de texto</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS