Prueba corta

¿Es una acción que realiza el usuario hacia un objeto?

¿Controles que colocamos en un formulario que poseen propiedades, métodos y eventos se les llama?

¿Se produce al intentar grabar un registro que contenga algún campo vacío?

¿Para que se utiliza el CommandButton?

¿Que realiza el siguiente codigo? Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim n1, n2, n3, n4, v, p As Double n1 = TextBox1.Text n2 = TextBox2.Text n3 = TextBox3.Text n4 = TextBox4.Text v = n1 If n2 < v Then v = n2 End If If n3 < v Then v = n3 End If If n4 < v Then v = n4 End If p = (n1 + n2 + n3 + n4 - v) / 3 TextBox5.Text = p End Sub End Class

¿Que realiza el siguiente codigo? Public Class Form1 Private Sub Form1_mousedoubleclick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDoubleClick If MeBackColor = Color.Blue MeBackColor = Color.Red ElseIf MeBackColor = Color.Red MeBackColor = Color.Blue End If End Sub End Class

Rellena los espacios en blanco para completar el texto Public Class Form3 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim cod, [blank_start]nomb[blank_end], g, dpi, puesto, direccion, tel As [blank_start]String[blank_end] cod = TextBox1.Text nomb = TextBox2.Text dpi = [blank_start]TextBox4.Text[blank_end] direccion = TextBox5.Text tel = TextBox6.Text [blank_start]If[blank_end] RadioButton1.[blank_start]Checked[blank_end] = True [blank_start]Then[blank_end] puesto = "Administracion" [blank_start]Else[blank_end] puesto = "Ventas" End If If RadioButton3.Checked = [blank_start]True[blank_end] Then g = "Hombre" Else g = "mujer" [blank_start]End If[blank_end] Form4.[blank_start]Show()[blank_end] Form4.TextBox1.Text = TextBox1.Text [blank_start]Form4.[blank_end]TextBox2.Text = TextBox2.Text Form4.TextBox8.Text = [blank_start]puesto[blank_end] End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End End Sub End Class

Rellena los espacios en blanco Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click [blank_start]Dim[blank_end] Usuario, Clave As String Usuario = TextBox1.Text Clave = TextBox2.Text [blank_start]If[blank_end] Usuario = "Myldret" And Clave = "1807" [blank_start]Then[blank_end] ProgressBar1.Value = 0.0 ProgressBar1.[blank_start]Maximum[blank_end] = 100 For contador = 1 To 100 contador = contador + 1 [blank_start]ProgressBar1[blank_end].Value = contador Next If ProgressBar1.Value = ProgressBar1.Maximum Then MsgBox("Acceso Autorizado") [blank_start]Form2.Show()[blank_end] End If [blank_start]Else[blank_end] ProgressBar1.[blank_start]Value[blank_end] = 0.0 ProgressBar1.Maximum = 100 [blank_start]For[blank_end] contador = 1 To 100 contador = contador + 1 ProgressBar1.Value = contador [blank_start]Next[blank_end] MsgBox("Usuario o Clave Incorrecta.") TextBox1.Clear() TextBox2.Clear() [blank_start]End If[blank_end] End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click End [blank_start]End Sub[blank_end]

¿Es correcto el siguiente codigo? Public Class Form4 Private Sub IngresoDeEmpleadosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Form3.Show() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim bonif, incent, Hextras, i, unif, ant, Odes, Ingreso, Egreso, total As Double CheckBox1.Checked = True Then bonif = 250 End If CheckBox2.Checked incent = 350 End If CheckBox3.Checked Hextras = 250 Hextras = TextBox4.Text * Hextras End If Ingreso = bonif + incent + Hextras + TextBox7.Text If CheckBox4.Checked Then i = 4.83 * TextBox7.Text CheckBox5.Checked Then unif = 150 End If CheckBox6.Checked Then ant = TextBox5.Text End If CheckBox7.Checked Then Odes = TextBox6.Text End If Egreso = i + unif + ant + Odes total = Ingreso - Egreso Form5.Show() Form.TextBox1.Text = TextBox1.Text Form.TextBox2.Text = TextBox2.Text Form.TextBox3.Text = TextBox8.Text Form.TextBox5.Text = TextBox7.Text Form.TextBox6.Text = bonif Form.TextBox7.Text = incent Form.TextBox8.Text = Hextras Form.TextBox11.Text = i Form.TextBox12.Text = unif Form.TextBox13.Text = ant Form.TextBox14.Text = Odes Form.TextBox10.Text = total Form.TextBox9.Text = Ingreso Form.TextBox15.Text = Egreso End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End End Sub End Class

¿La extension de Textbox es .Text?

¿Visual basic es un lenguaje de programacion dirigido por formularios?

Rellena los espacios en blanco Public Class Form4 Private Sub Button1_[blank_start]Click[blank_end](ByVal sender As System.Object, ByVal e As System.EventArgs) Handles [blank_start]Button1.[blank_end]Click [blank_start]Dim[blank_end] n1, n2 As [blank_start]Double[blank_end] n1 = TextBox1.Text n2 = TextBox2.Text [blank_start]If[blank_end] n1 [blank_start]>[blank_end] n2 [blank_start]Then[blank_end] MessageBox.Show("El número mayor es " [blank_start]&[blank_end] n1) Else MessageBox.Show("El número mayor es " [blank_start]&[blank_end] n2) [blank_start]End If[blank_end] End Sub End Class

¿El evento del boton es click?

¿La propiedad que se utiliza para cambiar el estilo de letra o de fuente es caption?

¿Es un documento, ya sea físico o digital, diseñado con el propósito de que el usuario introduzca datos estructurados?

¿Se utiliza generalmente para listar opciones y que el usuario pueda elegir entre ellas, y dependiendo del valor?

¿Es el que nos permite que un usuario pueda seleccionar una opción de entre varias?

¿Nos da el valor que se ha seleccionado del combo?

¿El siguiente codigo es erroneo? Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim VSB, VDES As Double VDES = 0 VSB = CDbl(TextBox4.Text) If CheckBox1.Checked Then VDES = VDES + VSB * 0.11 End If If CheckBox2.Checked Then VDES = VDES + 15 End If If CheckBox3.Checked Then VDES = VDES + CDbl(TextBox1.Text) End If TextBox2.Text = VDES TextBox3.Text = CStr(VSB - VDES) End Sub Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged TextBox1.Enabled = CheckBox3.Checked End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Enabled = False End Sub Private Sub TextBox1_EnabledChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.EnabledChanged TextBox1.Clear() End Sub End Class

¿ Es el que nos permite incluir palabras, letras o frases en la pantalla?