Label

El control Label representa una etiqueta que contiene texto. Se utiliza principalmente para dar una descripción de otro control. Por ejemplo en los formulario se utilizan las etiquetas para describir que se debe escribir en los campos de texto.

Control

Clase base para definir los componentes que tiene una representación visual.

Propiedades

BackgroundImage

Obtiene o establece una imagen de fondo. Para cambiar la posición se utiliza la propiedad BackgroundImageLayout.

Public Class MainForm
    Public Sub New()
        InitializeComponent()
        Me.BackgroundImage = Drawing.Image.FromFile("C:\img\imagen.png")
    End Sub
End Class

BackgroundImageLayout

Utiliza la enumeración ImageLayout para cambiar la posición de la imagen.

ImageLayout	Posición de la Imagen
Tile	Mosaico
Center	Centrada
Stretch	Extendida
Zoom	Aumentada

NotifyIcon / Icono de Notificación

El control NotifyIcon es un icono de notificación que se ubica en barra de herramientas.

Icono de Notificación con ContextMenuStrip

Crear un proyecto y elegir la plantilla Aplicación para Windows. Arrastrar el control NotifyIcon.

Agregar al proyecto un archivo de icono como indica la siguiente imagen:



Dibujar un icono o elegir el que aparece por defecto.



Agregar el control ContextMenuStrip y agregar los items Cerrar y Acerca de ...



En la ventana de propiedades del objeto NotifyIcon1 cambiar el valor (ninguno) de la propiedad ContextMenuStrip por el objeto ContextMenuStrip1. En la propiedad Icon elegir el icono que se ha creado.

Ahora solo nos falta gestionar los eventos. El procedimiento NotifyIcon1_MouseDoubleClick utiliza la funcion IIf como operador ternario para evaluar si la ventana esta en estado normal se debe minimizar sino volver al estado normal.

Public Class Form1
  Private Sub CerrarToolStripMenuItem_Click(ByVal sender As Object, _
   ByVal e As System.EventArgs) Handles CerrarToolStripMenuItem.Click

    Me.Close()

  End Sub

  Private Sub AcercaDeToolStripMenuItem_Click(ByVal sender As Object, _ 
   ByVal e As System.EventArgs) Handles AcercaDeToolStripMenuItem.Click
    
    MsgBox("Programa v1.0", MsgBoxStyle.OkOnly, "Acerca de ...")

  End Sub

  Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As Object, _
   ByVal e As System.Windows.Forms.MouseEventArgs) _
   Handles NotifyIcon1.MouseDoubleClick
    
    If e.Button = Windows.Forms.MouseButtons.Left Then
      Me.WindowState = IIf(Me.WindowState = FormWindowState.Normal, _
                    FormWindowState.Minimized, FormWindowState.Normal)
    End If

  End Sub
End Class

Timer

El control Timer es un temporizador que se utiliza para manejar intervalos de tiempo producidos por el evento Tick.

Métodos

Propiedad Interval Establece un intervalo expresado en milisegundos.
Propiedad Enable Comienza o termina a transcurrir el temporizador.

Eventos

Tick Se produce cuando se cumple el intervalo de tiempo establecido en la propiedad Interval.

Reloj Digital

Arrastrar del cuadro de herramientas los controles Label y Timer al Form. Renombrar Label1 a relojLb y Timer1 a relojTm. Cambiar las propiedades Interval a 1000 y Enable a True.

Public Class MainForm
  Private Sub relojTm_Tick(ByVal sender As Object, ByVal e As System.EventArgs) _
   Handles relojTm.Tick
    relojLb.Text = FormatDateTime(Date.Now, DateFormat.LongTime)
  End Sub
End Class

LinkLabel

LinkLabel es un control de etiqueta que tiene función de mostrar hipervínculo, formato y seguimiento. Se utiliza principalmente para conectarse a una página de Internet a través de un navegador web.

WebLink

Si se produce el evento LinkClicked el navegador predeterminado se conectará al blog http://tutorialpdf.blogspot.com

Public Class MainForm
  Private Sub linklb_LinkClicked(ByVal sender As System.Object, _ 
   ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) _ 
   Handles linklb.LinkClicked
       Process.Start("http://tutorialpdf.blogspot.com")
  End Sub
End Class

Enviar un Mail

Realiza la misma operación que la etiqueta HTML <a href="mailto://enviar@mail.com">Enviar Email</a>

Public Class MainForm
  Private Sub linklb_LinkClicked(ByVal sender As System.Object, _ 
   ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) _
   Handles linklb.LinkClicked
       Process.Start("mailto://enviar@mail.com")
  End Sub
End Class