Marquesinas en visual basic

Solo disponible en BuenasTareas
  • Páginas : 2 (256 palabras )
  • Descarga(s) : 0
  • Publicado : 23 de agosto de 2012
Leer documento completo
Vista previa del texto
LAS MARQUESINAS EN VB 2010
Una marquesina es un mensaje (o conjunto de letras) que poseen movimiento o se mueven. Existen básicamente 2 tipos de marquesinas, unas que permiten elmovimiento de las letras del mensaje y otras que dan movimiento a los objetos que contienen las letras.
MARQUESINA CON MOVIMIENTO DE LETRAS:
Vamos a crear una primera marquesina conmovimiento de letras.
PRIMERO: construimos un formulario como el siguiente, con un label, cuyo name es lblMarquesina.
SEGUNDO: Agregamos un timer, el cual se sitúa debajo delformulario. Este timer tiene por name tmrMarquesina.
TERCERO: El tmrMarquesina tendrá las siguientes propiedades:
TERCERO: El código para que el formulario funcione es el siguiente:Public Class frmMarquesinas
Dim largo As Integer
Dim mensaje As String
Private Sub frmMarquesinas_Load(Args…) Handles MyBase.Load
mensaje = lblMarquesina.Text()
largo= Len(mensaje)
End Sub
 Private Sub tmrMarquesina_Tick(Args…) Handles tmrMarquesina.Tick
If largo = 0 Then
largo = Len(mensaje)
Else
largo =largo - 1
lblMarquesina.Text = Mid(mensaje, 1, largo)
End If
End Sub
End Class
MARQUESINA CON MOVIMIENTO DE OBJETOS O CONTROL:
Ahora vamos a hacer que se muevael label y no las letras, para ello repetimos los pasos PRIMERO y SEGUNDO.
TERCERO: Digitamos el siguiente código:
Public Class frmPrincipalPrivate Sub tmrMarquesina_Tick(Args…) Handles tmrMarquesina.Tick
LblMarquesina.Left = LblMarquesina.L eft + 15
If LblMarquesina.Left >= Me.Width Then
LblMarquesina.Left = -LblMarquesina.WidthEnd If
End Sub
End Class
Para completar el ejercicio debes hacer un análisis de todas las instrucciones de los códigos escritos en los dos tipos de marquesina.
tracking img