Generador de Código de colores HTML o HEX
Cambien las opciones rojo, verde y azul y haga clic en el botón “Cambiar Color”
ROJO
|
VERDE
|
AZUL
|
Clic Para cambiar color en el visualizador |
Color
Resultado |
ROJO
|
VERDE
|
AZUL
|
Clic Para cambiar color en el visualizador |
Color
Resultado |
ROJO
|
VERDE
|
AZUL
|
Clic Para cambiar color en el visualizador |
Color
Resultado |
Utilizaremos
siempre estos valores: |
00 |
33 |
66 |
99 |
CC |
FF |
Private Sub Form1_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load Dim MySource As New AutoCompleteStringCollection() MySource.AddRange(New String() _ { _ "Enero", _ "Febrero", _ "Marzo", _ "Abril", _ "Mayo", _ "Junio", _ "Julio", _ "Agosto", _ "Septiembre", _ "Octubre", _ "Noviembre", _ "Diciembre" _ }) With TextBox1 .AutoCompleteCustomSource = MySource .AutoCompleteMode = AutoCompleteMode.SuggestAppend .AutoCompleteSource = AutoCompleteSource.CustomSource End With End Sub
El auto completar le da a tu aplicación un dinamismo singular y atractivo.
Esta técnica es muy común en la web, pero la puedes implementar sin problemas en tus entornos Windows para que los usuarios de tu sistema se adapten muy fácil y rápido.
Dim x As Control For Each x In Me.Controls If TypeOf x Is System.Windows.Forms.TextBox Then x.Text = "" NextEsta solución pude ser muy útil en caso que poseas muchos cuadros de texto en el mismo formulario, pero puede ser una solución muy complicada en algunos asuntos ya que mucha oportunidades los cuadros de texto son utilizados para mostrar información lo cual hay que re-calcular los datos y mostrar los mismos nuevamente ejecutando procesos redundantes.
'Propiedades y Métodos recursivos para limpiar cajas de texto. 'Opción 1 TextBox1.Clear() 'Opción 2 TextBox1.Text = Nothing 'Opción 3 TextBox1.Text = ""
Private Sub TextBox_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load 'Propiedad que asigna o dibuja el texto en el control TextBox TextBox1.Text = "Texto cualquiera" 'Coloca el texto en mayúsculas. TextBox1.CharacterCasing = CharacterCasing.Upper End Sub
Private Sub TextBox_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load 'Inhabilita el control TextBox1.Enabled = False End Sub
Private Sub Form1_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load 'Establece la propiedad Multiline en true. TextBox1.Multiline = True 'Añadir barras de desplazamiento vertical para el control TextBox. TextBox1.ScrollBars = ScrollBars.Vertical 'Permitir la tecla de retorno para ser introducido en el control TextBox. TextBox1.AcceptsReturn = True 'Permitir la tecla TAB para ser introducido en el control TextBox. TextBox1.AcceptsTab = True 'Set WordWrap en True para permitir que el texto se ajuste a la siguiente línea. TextBox1.WordWrap = True 'Establecer el texto predeterminado del control. TextBox1.Text = "¡Bienvenido a Desarrollo .Net!" & _ vbNewLine & "http://jenelenet.blogspot.com" End Sub