Site hosted by Angelfire.com: Build your free website today!

Principales Propiedades de los Controles Standard
(pag.4)
[Height / Width][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[Icon][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[Index][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[ListCount][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[ListIndex][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[Locked][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[MousePointer][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[Multiline][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[Name][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[NewIndex][Aplicable A] [Sintaxis][Comentarios][Ejemplo]

[ItemData][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[PasswordChar][Aplicable A] [Sintaxis][Comentarios][Ejemplo]
[Picture][Aplicable A] [Sintaxis][Comentarios][Ejemplo]


Paginas...

Higth, Width

Aplicable a:
Control CheckBox, Control ComboBox, Control CommandButton, Control Data, Objeto Form, Control Frame, Controles HScrollBar y VScrollBar, Control Image, Control Label, Control ListBox, Control OptionButton, Control PictureBox, Control Shape, Control TextBox.

 

Sintaxis
objeto.Height [= número]
objeto.Width [= número]

La sintaxis de las propiedades Height y Width consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto cuyo resultado es un objeto de la lista Aplicable a.
número Una expresión numérica que especifica las dimensiones del objeto, según se indica en Valores.

Valores

Las medidas se calculan de la siguiente forma:

  • Form: alto y ancho externos del formulario, incluyendo los bordes y la barra de título.
  • Control: se mide desde el centro del borde del control, de forma que los controles con anchos de borde distintos se alineen correctamente. Estas propiedades utilizan las unidades de escala del contenedor de un control.

Comentarios

          Para los objetos Form estas propiedades se miden siempre en twips. Para los formularios y controles, los valores de estas propiedades cambian cuando el usuario o el código modifican el tamaño del objeto. Los límites máximos de estas propiedades para todos los objetos dependen del sistema.

          Utilice las propiedades Height, Width, Left y Top para realizar operaciones o cálculos que impliquen el área total de un objeto, como puede ser mover el objeto o cambiar su tamaño. Utilice las propiedades ScaleLeft, ScaleTop, ScaleHeight y ScaleWidth para realizar operaciones o cálculos que impliquen solamente el área interna de un objeto, como dibujar o mover objetos dentro de otro objeto.

Ejemplo de las propiedades Height y Width

          En este ejemplo se establece como tamaño de un formulario el 75 por ciento del tamaño de la pantalla y se centra el formulario al cargarlo. Para probar este ejemplo, pegue el código en la sección Declaraciones de un formulario. Presione F5 y haga clic en el formulario.

Private Sub Form_Click ()
Width = Screen.Width * .75 ' Establecer el ancho del formulario.
Height = Screen.Height * .75 ' Establecer el alto del formulario.
Left = (Screen.Width - Width) / 2 ' Centrar el formulario horizontalmente.
Top = (Screen.Height - Height) / 2 ' Centrar el formulario verticalmente.
End Sub

Arriba


Icon

Aplicable a:
Objeto Form.

Devuelve el icono que aparece al minimizar un formulario en tiempo de ejecución.

Sintaxis
objeto.Icon

El marcador de posición objeto representa una expresión de objeto que da como resultado un objeto de la lista Aplicable a.

Comentarios

          Utilice esta propiedad para especificar un icono para cualquier formulario que el usuario pueda minimizar en tiempo de ejecución.

          Por ejemplo, puede asignar a un formulario un icono único que indique su función. Especifique el icono cargándolo mediante la ventana Propiedades en tiempo de diseño. El archivo que cargue debe tener la extensión .ico y el formato correspondiente. Si no especifica ningún icono, se utilizará el icono predeterminado para los formularios en Visual Basic.

          Puede utilizar como origen de iconos la biblioteca de iconos de Visual Basic (ubicada en el subdirectorio Icons). Cuando crea un archivo ejecutable, puede asignar un icono a la aplicación mediante la propiedad Icon de cualquier formulario de la misma.

Nota Puede ver un icono de formulario en la esquina superior izquierda del formulario en Windows 95, o cuando se minimiza el formulario en Windows 95 y en Windows NT. Si el formulario está minimizado, el valor de la propiedad BorderStyle debe ser 1 (Fixed Single, Simple fijo) o 2 (Sizable, Tamaño ajustable), y el de la propiedad MinButton debe ser True para que el icono sea visible.

          En tiempo de ejecución puede asignar el valor de la propiedad Icon de un objeto a la propiedad DragIcon o Icon de otro objeto distinto. También puede asignar un icono obtenido con la función LoadPicture. Si utiliza la función LoadPicture sin argumentos, se asigna un icono vacío (nulo) al formulario, lo que permite dibujar sobre el icono en tiempo de ejecución.

 Arriba


Index (Matriz de Controles)

Aplicable a:
Control CheckBox, Control ComboBox, Control CommandButton, Control Data Control Frame, Controles HScrollBar y VScrollBar, Control Image, Control Label, Control Line, Control ListBox, Control Menu, Control OptionButton, Control PictureBox, Control Shape, Control TextBox, Control Timer.

Devuelve o establece el número que identifica un control de forma exclusiva en una matriz de controles. Sólo está disponible si el control forma parte de una matriz de controles.

Sintaxis

objeto[(número)].Index

La sintaxis de la propiedad Index consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto cuyo resultado es un objeto de la lista Aplicable a.
número Una expresión numérica que da como resultado un entero que identifica un control individual en una matriz de controles.

Valores

Los valores admitidos para número son:

Valor Descripción
Ningún valor (Predeterminado) No forma parte de una matriz de controles.
0 a 32.767 Parte de una matriz. Especifica un entero mayor o igual que 0 que identifica un control en una matriz de controles. Todos los controles de una matriz de controles tienen la misma propiedad Name. Visual Basic asigna automáticamente el siguiente entero disponible de la matriz de controles.

Comentarios

          Puesto que los elementos de matrices de controles comparten el mismo valor de la propiedad Name, deberá utilizar la propiedad Index en código para especificar un determinado control de la matriz. Index debe aparecer como un entero (o una expresión numérica que da como resultado un entero) entre paréntesis al lado del nombre de la matriz de controles; por ejemplo, MisBotones(3). También puede utilizar el valor de la propiedad Tag para distinguir un control de otro en una matriz de controles.

          Cuando un control de la matriz reconoce que se ha producido un evento, Visual Basic llama al procedimiento de evento de la matriz de controles y pasa el valor de Index correspondiente como argumento adicional.

          Aunque Visual Basic asigna de forma predeterminada el siguiente entero disponible como valor de Index para un nuevo control de una matriz de controles, puede anular este valor asignado y omitir enteros. También puede establecer Index a un entero distinto de 0 para el primer control de la matriz. Si hace referencia a un valor Index en el código que no identifica uno de los controles de una matriz de controles, se producirá un error en tiempo de ejecución de Visual Basic.

          Nota Para quitar un control de una matriz de controles, cambie el valor de la propiedad Name del control y elimine el valor de su propiedad Index.

Ejemplo de la propiedad Index

          Este ejemplo comienza con dos controles OptionButton y agrega un nuevo OptionButton al formulario cada vez que hace clic en un control CommandButton.

Private Sub Command1_Click ()
  Static MaxIdx ' Índice mayor de la matriz.
  If MaxIdx = 0 Then MaxIdx = 1 ' MaxIdx preestablecido.
  MaxIdx = MaxIdx + 1 ' Incrementa el índice.
  If MaxIdx > 7 Then Exit Sub ' Coloca ocho botones en el formulario.
  Load OptButton(MaxIdx) ' Crea nuevos elementos en la matriz.
  ' Establece la ubicación del nuevo botón de opciones bajo un botón previo.
  OptButton(MaxIdx).Top = OptButton(MaxIdx - 1).Top + 360
  OptButton(MaxIdx).Visible = True ' Hace visible el nuevo botón.
End Sub

  Arriba


ListCount

Aplicable a:
Control ComboBox, Control ListBox

Devuelve el número de elementos de la parte de lista de un control.

Sintaxis

objeto.ListCount

El marcador de posición objeto representa una expresión de objeto que da como resultado un objeto de la lista Aplicable a.

Comentarios

ListCount proporciona información específica de cada control:

  • Controles ComboBox y ListBox: el número de elementos de la lista.

 

          Si no hay seleccionado ningún elemento, el valor de la propiedad ListIndex es –1. El primer elemento de la lista corresponde a ListIndex = 0 y ListCount es siempre una unidad mayor que el valor máximo de ListIndex.

Ejemplo de la propiedad ListCount

          En este ejemplo se carga la lista de fuentes de impresora en un control ComboBox, se muestra el primer elemento de la lista y se escribe el número total de fuentes. Cada vez que se hace clic en el botón de comando, todos los elementos de la lista cambian a mayúsculas o a minúsculas. Para probar este ejemplo, pegue el código en la sección Declaraciones de un formulario que contenga un control ComboBox (Style = 2) y un control CommandButton, presione F5 y haga clic en el control CommandButton.

Private Sub Form_Load ()
  Dim I ' Declarar la variable.
  AutoRedraw = True ' Establecer AutoRedraw.
  For I = 0 To Printer.FontCount - 1 ' Poner los nombre de las fuentes en una lista.
    Combo1.AddItem Printer.Fonts(I)
  Next I
  Combo1.ListIndex = 0 ' Establecer el texto del primer elemento.
   ' Imprimir la información de ListCount en el formulario.
  Print "Número de fuentes de impresora: "; Combo1.ListCount
End Sub

Private Sub Command1_Click ()
Static UpperCase
  Dim I ' Declarar variable.
   For I = 0 To Combo1.ListCount - 1 ' Bucle por la lista.
     If UpperCase Then
       Combo1.List(I) = UCase(Combo1.List(I))
     Else
       Combo1.List(I) = LCase(Combo1.List(I))
    End If
  Next I
  UpperCase = Not UpperCase ' Cambiar mayúsculas y minúsculas.
End Sub

  Arriba


ListIndex

Aplicable a:
Control ComboBox, Control ListBox

Devuelve o establece el índice del elemento seleccionado actualmente en el control. No está disponible en tiempo de diseño.

Sintaxis
objeto.ListIndex [= índice]

La sintaxis de la propiedad ListIndex consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto cuyo resultado es un objeto de la lista Aplicable a.
índice Una expresión numérica que especifica el índice del elemento actual, según se indica en Valores.

Valores

Los valores admitidos para índice son:

Valor Descripción
–1 (Predeterminado para los controles ComboBox) Indica que actualmente no hay ningún elemento seleccionado. Para un control ComboBox indica que el usuario ha escrito texto nuevo en la parte del cuadro de texto.
n (Predeterminado para los controles ListBox) Número que indica el índice del elemento seleccionado actualmente.

Comentarios

          La expresión List(List1.ListIndex) devuelve la cadena correspondiente al elemento seleccionado actualmente.

          El primer elemento de la lista corresponde a ListIndex = 0 y ListCount es siembre una unidad mayor que el valor máximo de ListIndex.

 

Ejemplo de la propiedad ListIndex

          En este ejemplo se muestran los nombres de tres jugadores en un control ListBox y el sueldo del jugador seleccionado en un control Label. Para probar este ejemplo, pegue el código en la sección Declaraciones de un formulario que contenga un control ComboBox y un control Label, presione F5 y elija un nombre en el control ComboBox.

Dim Player(0 To 2) ' Dimensionar dos matrices.
Dim Salary(0 To 2)

Private Sub Form_Load ()
   Dim I ' Declarar variable.
   AutoSize = True
   Player(0) = "Daniel Rendich" ' Introducir los datos en las matrices.
   Player(1) = "Federico Couto"
   Player(2) = "Ernesto Méndez"
   Salary(0) = "234.500$"
   Salary(1) = "158.900$"
   Salary(2) = "1.030.500$"
   For I = 0 To 2 ' Agregar los nombres a la lista.
   Combo1.AddItem Player(I)
   Next I
   Combo1.ListIndex = 0 ' Mostrar el primer elemento de la lista.
   End Sub
   Private Sub Combo1_Click ()
   ' Mostrar el salario correspondiente al nombre.
   Label1.Caption = Salary(Combo1.ListIndex)
End Sub

Arriba


Locked

Aplicable a:
Control TextBox

Devuelve o establece un valor que indica si un control se puede modificar.

Sintaxis

objeto.Locked [ = booleano]

La sintaxis de la propiedad Locked consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto cuyo resultado es un objeto de la lista Aplicable a.
Booleano Una expresión numérica que especifica el índice del elemento actual, según se indica en Valores.

Valores

Los valores admitidos para booleano son:

Valor Descripción
True Control TextBox: el texto del control se puede desplazar y resaltar, pero no se puede modificar. El programa puede cambiar el texto si cambia la propiedad Text.
False Control TextBox: puede modificar el texto del control.

Arriba



MousePointer

Aplicable a:
Control CheckBox, Control ComboBox, Control CommandButton, Control Data, Objeto Form Control Frame, Controles HScrollBar y VScrollBar, Control Image, Control Label, Control ListBox, Control OptionButton, Control PictureBox, Control TextBox.

Devuelve o establece un valor que indica el tipo de puntero de mouse que aparece cuando se sitúa el mouse sobre un área determinada de un objeto en tiempo de ejecución.

Sintaxis

objeto.MousePointer [= valor]

La sintaxis de la propiedad MousePointer consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto cuyo resultado es un objeto de la lista Aplicable a.
Valor Un número entero que especifica el tipo de puntero de mouse que aparece, según se describe en Valores.

Valores

Los valores admitidos para valor son:

Constante Valor Descripción
vbDefault 0 (Predeterminado) Forma determinada por el objeto.
VbArrow 1 Flecha
VbCrosshair 2 Cruz (Puntero en forma de Cruz)
VbIbeam 3 Forma de I
VbIconPointer 4 Icono (PEqueño cuadrado dentro de otro cuadrado)
VbSizePointer5 5 Tamaño (flecha de cuatro puntas: norte, sur, este y oeste).
VbSizeNESW 6 Tamaño NE SO (flecha doble que apunta al nordeste y al sudoeste).
VbSizeNS 7 Tamaño N S (flecha doble que apunta al norte y al sur).
VbSizeNWSE 8 Tamaño NO SE (flecha doble que apunta al noroeste y al sudeste).
VbSizeWE 9 Tamaño O E (flecha doble que apunta al oeste y al este).
VbUpArrow 10 Flecha hacia arriba.
VbHourglass 11 Reloj de arena (espera).
VbNoDrop 12 No colocar
VbArrowHourglass 13 Flecha y reloj de arena.
VbArrowQuestion 14 Flecha y signo de interrogación.
vbSizeAll 15 Ajustar todo.
vbCustom 99 Icono personalizado especificado en la propiedad MouseIcon.

Comentarios

          Puede utilizar esta propiedad cuando desee indicar los cambios en la funcionalidad al desplazar el puntero del mouse por los controles de un formulario o cuadro de diálogo. La opción de reloj de arena (11) es útil para indicar que el usuario debe esperar a que termine un proceso u operación.

Ejemplo de la propiedad MousePointer

          En este ejemplo se cambia el puntero del mouse por un reloj de arena mientras se dibujan círculos en la pantalla y al final del procedimiento el puntero adopta la forma que tenía originalmente. Para probar este ejemplo, pegue el código en la sección Declaraciones de un formulario. Presione F5 para ejecutar el programa y luego haga clic en el formulario.

Private Sub Form_Click ()
Dim I ' Declara una variable.
' Cambia el puntero del mouse por un reloj de arena.
Screen.MousePointer = vbHourglass
' Establece un color aleatorio y dibuja círculos en el formulario.
For I = 0 To ScaleWidth Step 50
ForeColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)
Circle (I, ScaleHeight * Rnd), 400
Next
' Vuelve al puntero normal.
Screen.MousePointer = vbDefault
End Sub

Arriba


Multiline

Aplicable a:
Control TextBox.

Devuelve o establece un valor que indica si un control TextBox acepta y muestra múltiples líneas de texto. Es de sólo lectura en tiempo de ejecución.

Sintaxis

objeto.MultiLine

El marcador de posición objeto representa una expresión de objeto que da como resultado un objeto de la lista Aplicable a.

Valores

Los valores admitidos para la propiedad MultiLine son:

Valor Descripción
True Permite múltiples líneas de texto.
False (Predeterminado) Pasa por alto los retornos de carro y restringe los datos a una única línea.

Comentarios

          Los controles TextBox de múltiples líneas ajustan el texto a la línea siguiente cuando el usuario se extiende más allá del cuadro de texto.

           También puede agregar barras de desplazamiento a los controles TextBox más grandes, utilizando para ello la propiedad ScrollBars. Si no se especifica un control de barra de desplazamiento horizontal, el texto de los controles TextBox de múltiples líneas se ajustará automáticamente a la línea siguiente.

Nota En los formularios sin ningún botón predeterminado, al presionar ENTRAR en un control TextBox de múltiples líneas, el enfoque pasa a la línea siguiente. Si existe un botón predeterminado, deberá presionar CTRL+ENTRAR para pasar a la línea siguiente.

Arriba


Name

Aplicable a:
Control CheckBox, Control ComboBox, Control CommandButton, Control Data, Objeto Form, Control Frame, Controles HScrollBar y VScrollBar, Control Image, Control Label, Control Line, Control Menu, Control OptionButton, Control PictureBox, Control Shape, Control TextBox, Control Timer.

Devuelve el nombre utilizado en el código para identificar un formulario, un control o un objeto de acceso a datos. Es de sólo lectura en tiempo de ejecución.

Sintaxis

objeto.Name

El marcador de posición objeto representa una expresión de objeto que da como resultado un objeto de la lista Aplicable a. Si se omite objeto, se supondrá que el formulario asociado al módulo del formulario activo es objeto.

Comentarios

El nombre predeterminado para objetos nuevos es el tipo de objeto y un entero único. Por ejemplo, el primer objeto Form nuevo será Form1 y el tercer control TextBox que cree en un formulario será Text3.

La propiedad Name de un objeto debe comenzar por una letra y puede tener un máximo de 40 caracteres. Puede incluir números y caracteres de subrayado (_), pero no signos de puntuación ni espacios en blanco. Aunque el valor de la propiedad Name puede ser una palabra clave, un nombre de propiedad o el nombre de otro objeto, esto puede crear conflictos en el código.

Puede crear un conjunto de controles del mismo tipo si establece la propiedad Name al mismo valor. Por ejemplo, cuando establece el nombre de todos los botones de opción en un grupo como MiOpc, Visual Basic asigna valores únicos a la propiedad Index de cada control con el fin de distinguir unos de otros en la matriz. Dos controles de distinto tipo no pueden tener el mismo nombre.

Nota Aunque Visual Basic usa a menudo el valor de la propiedad Name como valor predeterminado de las propiedades Caption y Text, el cambio de una de estas propiedades no afecta a las otras.

Arriba


NewIndex

Aplicable a:
Control ComboBox, Control ListBox.

Devuelve el índice del último elemento agregado a un control ComboBox o ListBox. Es de sólo lectura en tiempo de ejecución.

 

Sintaxis

objeto.NewIndex

 

El marcador de posición objeto representa una expresión de objeto que da como resultado un objeto de la lista Aplicable a.

Comentarios

Puede utilizar esta propiedad con listas ordenadas cuando necesite una lista de valores asociados a cada elemento de la matriz de la propiedad ItemData. Al agregar un elemento a una lista ordenada, Visual Basic lo inserta en orden alfabético. Esta propiedad indica la posición en la que se ha insertado el elemento, de forma que pueda insertar el valor correspondiente en la propiedad ItemData con el mismo índice.

La propiedad NewIndex devuelve -1 cuando no hay ningún elemento en la lista o cuando se ha eliminado un elemento después de agregar el último elemento.

Arriba


ItemData

Aplicable a:
Control ComboBox, Control ListBox.

Devuelve o establece un número específico para cada elemento de un control ComboBox o ListBox.

Sintaxis

objeto.ItemData(índex) [= número]

La sintaxis de la propiedad ItemData consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto que da como resultado un objeto de la lista Aplicable a.
índice El número de un elemento concreto del objeto.
número El número que se asocia con el elemento especificado.

Comentarios

La propiedad ItemData es una matriz de valores enteros largos cuyo número de elementos es el valor de la propiedad List de un control. Puede utilizar los números asociados con cada elemento para identificar los elementos. Por ejemplo, puede usar un número de identificación de empleado para identificar cada nombre de empleado de un control ListBox. Cuando llena el ListBox, también se llenan los elementos correspondientes de la matriz ItemData con los números de empleado.

La propiedad ItemData se usa a menudo como índice de una matriz de estructuras de datos asociadas con los elementos de un control ListBox.

Nota Cuando inserta un elemento en una lista con el método AddItem, el elemento también se inserta automáticamente en la matriz ItemData. Sin embargo, el valor no se reinicia a cero; conserva el valor que había en esa posición antes agregar el elemento a la lista. Cuando use la propiedad ItemData, asegúrese de establecer su valor al agregar nuevos elementos a la lista.

Ejemplo de la propiedad ItemData

Este ejemplo llena un control ListBox con nombres de empleados y llena la matriz de propiedades ItemData con números de empleados usando la propiedad NewIndex para mantener los números sincronizados con la lista ordenada. Un control Label presenta el nombre y el número de un elemento cuando el usuario hace una selección en la lista. Para probar este ejemplo, pegue el código en la sección Declaraciones de un formulario que contenga un control ListBox y un control Label. Establezca la propiedad Sorted del ListBox a True, y después presione F5 y haga clic en el control ListBox.

Private Sub Form_Load ()
' Llena List1 y la matriz ItemData con los
' elementos correspondientes ordenados.
List1.AddItem "Judy Phelps"
List1.ItemData(List1.NewIndex) = 42310
List1.AddItem "Chien Lieu"
List1.ItemData(List1.NewIndex) = 52855
List1.AddItem "Mauro Sorrento"
List1.ItemData(List1.NewIndex) = 64932
List1.AddItem "Cynthia Bennet"
List1.ItemData(List1.NewIndex) = 39227
End Sub

Private Sub List1_Click ()
' Agrega el número y el nombre del empleado.
Msg = List1.ItemData(List1.ListIndex) & " "
Msg = Msg & List1.List(List1.ListIndex)
Label1.Caption = Msg
End Sub

Arriba


PassWordChar

Aplicable a:
Control TextBox.

Devuelve o establece un valor que indica si en un control TextBox aparecen los caracteres que escribe el usuario o un carácter marcador de posición. Devuelve o establece el carácter utilizado como marcador de posición.

Sintaxis

objeto.PasswordChar [= valor]

La sintaxis de la propiedad PasswordChar consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto que da como resultado un objeto de la lista Aplicable a.
valor Una expresión de cadena que especifica el carácter marcador de posición.

Comentarios

Utilice esta propiedad para crear un campo de contraseña en un cuadro de diálogo. Aunque puede utilizarse cualquier carácter como marcador de posición, la mayoría de las aplicaciones para Windows usan el asterisco (*) (Chr(42)).

Esta propiedad no afecta a la propiedad Text, que contiene exactamente lo que haya escrito el usuario o lo que se haya establecido con el código. Para mostrar el texto real, establezca PasswordChar a una cadena de longitud cero (""), que es la opción predeterminada.

Puede asignar cualquier cadena a esta propiedad, pero sólo será significativo el primer carácter, pasándose por alto todos los demás.

Nota Si la propiedad MultiLine está establecida a True, la propiedad PasswordChar no tendrá efecto.

Ejemplo de la propiedad PasswordChar

En este ejemplo se ilustra cómo la propiedad PasswordChar afecta a la forma en que un control TextBox muestra el texto. Para probar este ejemplo, pegue el código en la sección Declaraciones de un formulario que contenga un control TextBox, presione F5 y haga clic en el formulario. Cada vez que haga clic en el formulario, el texto alternará entre el carácter asterisco (*) de contraseña y texto normal.

Private Sub Form_Click ()
   If Text1.PasswordChar = "" Then
   Text1.PasswordChar = "*"
   Else
   Text1.PasswordChar = ""
   End If
End Sub

Arriba


 

Picture

Aplicable a:
Control CheckBox, Control CommandButton, Objeto Form, Control Image, Control OptionButton, Control PictureBox.

Devuelve o establece un gráfico que se mostrará en un control.

Sintaxis

objeto.Picture [= imagen]

La sintaxis de la propiedad Picture consta de las siguientes partes:

Parte Descripción
objeto Una expresión de objeto que da como resultado un objeto de la lista Aplicable a.
imagen Una expresión de cadena que especifica un archivo que contiene un gráfico, según se indica en Valores.

Valores

Los valores admitidos para imagen son:

Valor Descripción
(Ninguno) (Predeterminado) Ninguna imagen.
(Mapa de bits, icono, metarchivo, GIF, JPEG)) Especifica un gráfico que puede cargar mediante la ventana Propiedades en tiempo de diseño. En tiempo de ejecución también puede establecer esta propiedad, utilizando la función LoadPicture con un mapa de bits, un icono o un metarchivo.

Comentarios

En tiempo de diseño, puede transferir un gráfico con el Portapapeles mediante los comandos Copiar, Cortar y Pegar del menú Edición.

Al establecer la propiedad Picture en tiempo de diseño, el gráfico se guarda y se carga con el formulario. Si crea un archivo ejecutable, la imagen estará contenida en él. Los gráficos cargados en tiempo de ejecución no se guardan con la aplicación.

Nota En tiempo de ejecución puede establecer la propiedad Picture al valor de la propiedad Icon, Image o Picture de cualquier otro objeto y también se le puede asignar un gráfico devuelto por la función LoadPicture.

Ejemplo de la propiedad Picture

En este ejemplo se cargan iconos de la biblioteca de iconos de Visual Basic en dos controles PictureBox. Al hacer clic en el formulario, el tercer control PictureBox se utiliza para intercambiar los otros dos. Puede utilizar dos iconos cualesquiera. Pegue el código en la sección Declaraciones de un formulario que contenga tres controles PictureBox (para Picture3, establezca Visible = False). Presione F5 para ejecutar el programa y luego haga clic en el formulario.

Private Sub Form_Load ()
' Cargar los iconos.
Picture1.Picture = LoadPicture("ICONOS\EQUIPO\PAPEL02A.ICO")
Picture2.Picture = LoadPicture("ICONOS\EQUIPO\PAPEL02B.ICO")
End Sub

Private Sub Form_Click ()
' Cambiar los iconos.
Picture3.Picture = Picture1.Picture
Picture1.Picture = Picture2.Picture
Picture2.Picture = Picture3.Picture
' Borrar la tercera imagen (no es necesario si no está visible).
Picture3.Picture = LoadPicture()
End Sub

Arriba


[Pagina 1] [Pagina 2] [Pagina 3] [Pagina 4] [Pagina 5]