Imprimir Página - Source Code Titulo Animado

Título: Source Code Titulo Animado
Publicado por: Nardo[N] en 15 Febrero 2011, 18:30 pm

Bueno estaba googleando y me encontre con un source code de Titulo Animado .. ya lo prove y esta muy bueno

El titulo aparece letra por letra no aparece de golpe :D

Código:

Private Sub Form_Load()
CheckAgain
End Sub

Private Sub Timer1_Timer()
'****************************************

t = Left(a, b)
Form1.Caption = t
b = b + 1
If b > I Then b = 0

End Sub


Sub CheckAgain()
a = Text1.Text
I = Len(a)
    b = 0

Creditos: Faisal Software

Título: Re: Source Code Titulo Animado
Publicado por: 79137913 en 15 Febrero 2011, 18:41 pm

HOLA!!!

Mi version (reducida)

Código

Private Const Titulo As String = "Titulo animado.-·.-·.-·.-·.-·.-·.-·.-·.-·"
Private x As Integer
 
Private Sub Timer1_Timer()
If x = Len(Titulo) Then x = 0
x = x + 1
Form1.Caption = Mid(Titulo, 1, x)
End Sub

Misma idea Otro efecto (me gusta este):

Código

Private Const Titulo As String = "Titulo animado.-·.-·.-·.-·.-·.-·.-·.-·.-·"
Private x As Integer
 
Private Sub Timer1_Timer()
If x = Len(Titulo) Then x = 0
x = x + 1
Form1.Caption = Mid(Titulo, x, Len(Titulo) - x) & Mid(Titulo, 1, x)
End Sub

GRACIAS POR LEER!!!

Título: Re: Source Code Titulo Animado
Publicado por: Nardo[N] en 15 Febrero 2011, 18:56 pm

No me da ni uno de tus codes :(

EDIT:
ya me funciono ..

Título: Re: Source Code Titulo Animado
Publicado por: Elemental Code en 15 Febrero 2011, 19:08 pm

Me gusta el segundo :D

Lo guardo ;)

Título: Re: Source Code Titulo Animado
Publicado por: raul338 en 15 Febrero 2011, 19:13 pm

Nardo[N], necesitas poner un Timer con Enabled = True y un numero (100 por ejemplo) de Interval

El proyecto es muuy simple para descargar, seria mejor poner el codigo :P

Título: Re: Source Code Titulo Animado
Publicado por: Nardo[N] en 15 Febrero 2011, 19:20 pm

Modificado , Ya puse el code .. ;D si ya vi eso raul338 ese era mi problema

Título: Re: Source Code Titulo Animado
Publicado por: 79137913 en 15 Febrero 2011, 19:21 pm

HOLA!!!

Cita de: Elemental Code en 15 Febrero 2011, 19:08 pm

Me gusta el segundo :D

Lo guardo ;)

Gracias E_C

GRACIAS POR LEER!!!

Título: Re: Source Code Titulo Animado
Publicado por: juaqui en 19 Febrero 2011, 03:34 am

Gracias por el codigo
funciona perfecto

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Nardo[N] en 15 Febrero 2011, 18:30 pm