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:

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

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