Ayúdenme a responder algunas preguntas sobre programación de VB.
Ejercicio 1-12:
Sub privado Form_Click()
Text1.Move 0, 0
Fin Sub
Sub privado Text1_Change()
Text1.Move Me.Width - Text1.Width, 0
Fin Sub
Ejercicio 1-13: p>
Sub privado C1_Click()
Texto1.Text = LCase(Text1.Text)
Texto2.Text = UCase(Text1.Text)
Fin de Sub
Ejercicio 1-14:
Comando secundario privado1_Click()
Si Text1.Text <> "Examen de nivel de computadora" entonces salga de Sub p>
Texto1.Visible = False
Etiqueta1.Caption = Texto1.Text
Etiqueta1.Visible = Verdadero
End Sub
Ejercicio 1-15:
1) Establezca la propiedad MultiLine de Text1 en True
2) Establezca la propiedad ScroolBars de Text1 en 2 - Vertical
3) Establezca la propiedad Texto de Texto1 en Programación
4) Haga clic en el pequeño botón a la derecha de la propiedad Fuente de Texto1 y configure las fuentes en negrita y tamaño 3 en el cuadro de diálogo que aparece
5 )Establezca la propiedad Caption de Form1 para configurar la propiedad del cuadro de texto
Ejercicio 1-16:
Private Sub Form_Load()
Text1. PasswordChar = "*"
End Sub
Sub privado Text1_Change()
Text2.Text = Text1.Text
End Sub
Ejercicio 1-17:
Sub privado C1_Click()
Text1.Text = "Examen de nivel"
Fin Sub
Privado Sub C2_Click()
T1.Ancho = T1.Ancho * 2
T1.Alto = T1.Alto * 2
T1. FontSize = T1.FontSize * 3
End Sub
Ejercicio 1-18:
Dibuje una Forma1 en Form1, luego establezca su atributo Forma en 3 - Círculo y luego establezca las propiedades Alto y Ancho de Forma1 en 1500, luego establezca la propiedad Título del formulario en Círculo y finalmente establezca las propiedades MinButton y MaxButton del formulario en Falso.
Espero que mi la respuesta puede ayudarte Ayudarte a resolver problemas