Diseño de subprograma Vb: establezca el contenido que se muestra en el espacio de etiquetas llamado lblDate en la fecha actual.
1. lblDate.Text = CStr(Now.Date)
2. btOK.Image = Image.FromFile("ruta")
3. >
4. No entiendo. ¿Está arriba? ¿Quiere mover el sexto elemento al primer elemento del cuadro combinado?
5. Pruebe si se presiona la tecla de letra en el evento KeyDown (declare la variable booleana global booIsLetter de antemano) y luego configure e.Handle en Verdadero o Falso en el evento KeyPress para decidir si acepta. la pulsación de la tecla.
Sub privada txtNum_KeyPress(ByVal remitente como objeto, ByVal e As System.Windows.Forms.KeyPressEventArgs) Maneja txtNum. Si booIsLetter = False, entonces
e.Handled = True
Else
e.Handled = False