Visual Basic

Pregunta 1 de 20

1

¿Esto es una CheckBox?

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 2 de 20

1

Seleccione la(s) correctas de ingresar el código de limpiar dentro de un botón:

Selecciona una o más de las siguientes respuestas posibles:

txt.text=" "
txt.Clear()
txt.Clear
txt.text=

Explicación

Pregunta 3 de 20

1

Completa el código;

❌ n1, n2, n3, n4, v, p ❌ Double
n1 = TextBox1.Text
n2 = ❌.Text
n3 = TextBox3.Text
n4 = TextBox4.Text
v = n1
❌ n2 < v Then
v = n2
End If
If ❌ < v Then
v = n3
End If
If n4 < v ❌
v = n4
❌ If
p = (n1 + n2 + n3 + n4 - ❌) / 3
❌

Arrastra y suelta para completar el texto.

As

TextBox2

TextBox5.Text = p

v

If

Then

End

n3

Dim

Explicación

Pregunta 4 de 20

1

¿Este código es para colocar mensajes en el programa?

MessageBox.Show()

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 5 de 20

1

Rellena los espacios en blanco para completar el texto.

Complete;

Dim n1, n2 As n1 = .Text
n2 = TextBox2.Text
If n1 > n2 Then
MessageBox.Show("El número mayor es "& )
Else
.Show("El número mayor es "& n2)
End If

Explicación

Pregunta 6 de 20

1

Selecciona la opción correcta del menú desplegable para completar el texto.

Seleccione la respuesta correcta;

Dim C As ( Integer, Double )

Explicación

Pregunta 7 de 20

1

¿Es un Progress Bar?

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 8 de 20

1

Rellena los espacios en blanco para completar el texto.

Dim x, y, z, r As
x =
= TexBox2.Text
z = TexBox3.Text
r = ((2 * Pow(x, 4)) + Math.Pow(x, 2) * (y, 2)) / (y+(Math.(4 * x * y * Math.Pow)) - 2 * z)
TexBox4.Text =

Explicación

Pregunta 9 de 20

1

El siguiente código sirve para resolver ecuaciones de 3 variables?

Dim x, y, z, r As Double
x = TexBox1.Text
y = TexBox2.Text
z = TexBox3.Text
r = ((2 * Math.Pow(x, 4)) + 3 * Math.Pow(x, 2) * Math.Pow(y, 2)) / (y+(Math.Sqrt(4 * x * y * Math.Pow(z, 2))) - 2 * z)
TexBox4.Text = r

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 10 de 20

1

Complete;

❌ Me.BackColor = Color.❌ Then
Me.BackColor = Color.Red
ElseIf Me.❌Color = ❌.Red Then
❌ = Color.Blue

Arrastra y suelta para completar el texto.

Color

Blue

Me.BackColor

If

Back

Explicación

Pregunta 11 de 20

1

El siguiente fragmento de código sirve para cambiar de color el formulario;

If Me.BackColor = Color.Blue Then
Me.BackColor = Color.Red
ElseIf Me.BackColor = Color.Red Then
Me.BackColor = Color.Blue

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 12 de 20

1

¿El siguiente código sirve para calcular promedios y eliminar la nota menor?

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

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 13 de 20

1

Rellena los espacios en blanco para completar el texto.

n1, n2, n3, n4, v, p As
n1 = Box1.Text
= TextBox2.Text
n3 = TextBox3.Text
= .Text
v = n1
n2 < v
v = n2
End If
If n3 < v Then
v = n3
If
If n4 < v Then
v = n4
End If
p = (n1 + n2 + n3 + n4 - v) / 3

Explicación

Pregunta 14 de 20

1

¿Está bien estructurado este código?

Dim n1, n2 As Doublen1 = TextBox1.Text
n2 = TextBox2.Text
If n1 > n2 Then
MessageBox.Show("El número mayor es "& n1)
Else
MessageBox.Show("El número mayor es "& n2)
End If

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 15 de 20

1

❌ C As ❌C = 0
If ❌.Checked Then
C = C + 1
If CheckBox2.❌ Then
❌
End If
If CheckBox3.Checked ❌
C = C + 1
End If
MessageBox.Show("Han sido seleccionados " + Strc(C) + ❌)
❌

Arrastra y suelta para completar el texto.

Dim

CheckBox1

Intinger

Checked

C = C + 1

Then

" checkbox"

End If

Explicación

Pregunta 16 de 20

1

¿El siguiente código esta bien estructurado?

Dim C As Intinger
C = 0
If CheckBox1.Checked
C = C + 1
CheckBox2.Checked Then
C = C + 1
End If
If CheckBox3.Checked Then
C = C + 1
MessageBox.Show("Han sido seleccionados " + Strc(C) + " checkbox")
End If

Selecciona uno de los siguientes:

VERDADERO
FALSO

Explicación

Pregunta 17 de 20

1

Selecciona la opción correcta de los menús desplegables para completar el texto.

Dim C As IntingerC = 0
If Check( Box1, Box2, Box3 ).Checked Then
C = C + 1
If Check( Box2, Box1, Box3 ).Checked Then
C = C + 1
End If
If CheckBox3.( Checked, Selec ) Then
C = C + 1
End If
( MessageBox, Form2, Form3 ).Show("Han sido seleccionados " + Strc(C) + " checkbox")
End If

Explicación

Pregunta 18 de 20

1

¿Qué opciones podemos ver en el siguiente Form?

Selecciona una o más de las siguientes respuestas posibles:

Label
TextBox
Button
Progress Bar
Check Box
Combo Box

Explicación

Pregunta 19 de 20

1

Complete

CheckBox1.

Selecciona una de las siguientes respuestas posibles:

Show
Checked
Text

Explicación

Pregunta 20 de 20

1

¿Cómo se llama ésta parte de Visual Basic?

Selecciona una de las siguientes respuestas posibles:

ToolBox
Form
Orígenes de datos

	Creado por rafgss hace casi 8 años

Examen de Visual Basic

Visual Basic

Pregunta 1 de 20

¿Esto es una CheckBox?

Selecciona uno de los siguientes:

Explicación

Pregunta 2 de 20

Seleccione la(s) correctas de ingresar el código de limpiar dentro de un botón:

Selecciona una o más de las siguientes respuestas posibles:

Explicación

Pregunta 3 de 20

Completa el código; ❌ n1, n2, n3, n4, v, p ❌ Double n1 = TextBox1.Text n2 = ❌.Text n3 = TextBox3.Text n4 = TextBox4.Text v = n1 ❌ n2 < v Then v = n2 End If If ❌ < v Then v = n3 End If If n4 < v ❌ v = n4 ❌ If p = (n1 + n2 + n3 + n4 - ❌) / 3 ❌

Arrastra y suelta para completar el texto.

Explicación

Pregunta 4 de 20

¿Este código es para colocar mensajes en el programa? MessageBox.Show()

Selecciona uno de los siguientes:

Explicación

Pregunta 5 de 20

Rellena los espacios en blanco para completar el texto.

Complete; Dim n1, n2 As n1 = .Text n2 = TextBox2.Text If n1 > n2 Then MessageBox.Show("El número mayor es "& ) Else .Show("El número mayor es "& n2) End If

Explicación

Pregunta 6 de 20

Selecciona la opción correcta del menú desplegable para completar el texto.

Seleccione la respuesta correcta; Dim C As Integer Double( Integer, Double )

Explicación

Pregunta 7 de 20

¿Es un Progress Bar?

Selecciona uno de los siguientes:

Explicación

Pregunta 8 de 20

Rellena los espacios en blanco para completar el texto.

Dim x, y, z, r As x = = TexBox2.Text z = TexBox3.Text r = ((2 * Pow(x, 4)) + Math.Pow(x, 2) * (y, 2)) / (y+(Math.(4 * x * y * Math.Pow)) - 2 * z) TexBox4.Text =

Explicación

Pregunta 9 de 20

El siguiente código sirve para resolver ecuaciones de 3 variables? Dim x, y, z, r As Double x = TexBox1.Text y = TexBox2.Text z = TexBox3.Text r = ((2 * Math.Pow(x, 4)) + 3 * Math.Pow(x, 2) * Math.Pow(y, 2)) / (y+(Math.Sqrt(4 * x * y * Math.Pow(z, 2))) - 2 * z) TexBox4.Text = r

Selecciona uno de los siguientes:

Explicación

Pregunta 10 de 20

Complete; ❌ Me.BackColor = Color.❌ Then Me.BackColor = Color.Red ElseIf Me.❌Color = ❌.Red Then ❌ = Color.Blue

Arrastra y suelta para completar el texto.

Explicación

Pregunta 11 de 20

El siguiente fragmento de código sirve para cambiar de color el formulario; If Me.BackColor = Color.Blue Then Me.BackColor = Color.Red ElseIf Me.BackColor = Color.Red Then Me.BackColor = Color.Blue

Selecciona uno de los siguientes:

Explicación

Pregunta 12 de 20

Selecciona uno de los siguientes:

Explicación

Pregunta 13 de 20

Rellena los espacios en blanco para completar el texto.

n1, n2, n3, n4, v, p As n1 = Box1.Text = TextBox2.Text n3 = TextBox3.Text = .Text v = n1 n2 < v v = n2 End If If n3 < v Then v = n3 If If n4 < v Then v = n4 End If p = (n1 + n2 + n3 + n4 - v) / 3

Explicación

Pregunta 14 de 20

¿Está bien estructurado este código? Dim n1, n2 As Doublen1 = TextBox1.Text n2 = TextBox2.Text If n1 > n2 Then MessageBox.Show("El número mayor es "& n1) Else MessageBox.Show("El número mayor es "& n2) End If

Selecciona uno de los siguientes:

Explicación

Pregunta 15 de 20

❌ C As ❌C = 0 If ❌.Checked Then C = C + 1 If CheckBox2.❌ Then ❌ End If If CheckBox3.Checked ❌ C = C + 1 End If MessageBox.Show("Han sido seleccionados " + Strc(C) + ❌) ❌

Arrastra y suelta para completar el texto.

Explicación

Pregunta 16 de 20

¿El siguiente código esta bien estructurado? Dim C As Intinger C = 0 If CheckBox1.Checked C = C + 1 CheckBox2.Checked Then C = C + 1 End If If CheckBox3.Checked Then C = C + 1 MessageBox.Show("Han sido seleccionados " + Strc(C) + " checkbox") End If

Selecciona uno de los siguientes:

Explicación

Pregunta 17 de 20

Selecciona la opción correcta de los menús desplegables para completar el texto.

Explicación

Pregunta 18 de 20

¿Qué opciones podemos ver en el siguiente Form?

Selecciona una o más de las siguientes respuestas posibles:

Explicación

Pregunta 19 de 20

Complete CheckBox1.

Selecciona una de las siguientes respuestas posibles:

Explicación

Pregunta 20 de 20

¿Cómo se llama ésta parte de Visual Basic?

Selecciona una de las siguientes respuestas posibles:

Explicación

Completa el código;

❌ n1, n2, n3, n4, v, p ❌ Double
n1 = TextBox1.Text
n2 = ❌.Text
n3 = TextBox3.Text
n4 = TextBox4.Text
v = n1
❌ n2 < v Then
v = n2
End If
If ❌ < v Then
v = n3
End If
If n4 < v ❌
v = n4
❌ If
p = (n1 + n2 + n3 + n4 - ❌) / 3
❌

¿Este código es para colocar mensajes en el programa?

MessageBox.Show()

Complete;

Dim n1, n2 As n1 = .Text
n2 = TextBox2.Text
If n1 > n2 Then
MessageBox.Show("El número mayor es "& )
Else
.Show("El número mayor es "& n2)
End If

Seleccione la respuesta correcta;

Dim C As ( Integer, Double )

Dim x, y, z, r As
x =
= TexBox2.Text
z = TexBox3.Text
r = ((2 * Pow(x, 4)) + Math.Pow(x, 2) * (y, 2)) / (y+(Math.(4 * x * y * Math.Pow)) - 2 * z)
TexBox4.Text =

El siguiente código sirve para resolver ecuaciones de 3 variables?

Dim x, y, z, r As Double
x = TexBox1.Text
y = TexBox2.Text
z = TexBox3.Text
r = ((2 * Math.Pow(x, 4)) + 3 * Math.Pow(x, 2) * Math.Pow(y, 2)) / (y+(Math.Sqrt(4 * x * y * Math.Pow(z, 2))) - 2 * z)
TexBox4.Text = r

Complete;

❌ Me.BackColor = Color.❌ Then
Me.BackColor = Color.Red
ElseIf Me.❌Color = ❌.Red Then
❌ = Color.Blue

El siguiente fragmento de código sirve para cambiar de color el formulario;

If Me.BackColor = Color.Blue Then
Me.BackColor = Color.Red
ElseIf Me.BackColor = Color.Red Then
Me.BackColor = Color.Blue

n1, n2, n3, n4, v, p As
n1 = Box1.Text
= TextBox2.Text
n3 = TextBox3.Text
= .Text
v = n1
n2 < v
v = n2
End If
If n3 < v Then
v = n3
If
If n4 < v Then
v = n4
End If
p = (n1 + n2 + n3 + n4 - v) / 3

¿Está bien estructurado este código?

Dim n1, n2 As Doublen1 = TextBox1.Text
n2 = TextBox2.Text
If n1 > n2 Then
MessageBox.Show("El número mayor es "& n1)
Else
MessageBox.Show("El número mayor es "& n2)
End If

❌ C As ❌C = 0
If ❌.Checked Then
C = C + 1
If CheckBox2.❌ Then
❌
End If
If CheckBox3.Checked ❌
C = C + 1
End If
MessageBox.Show("Han sido seleccionados " + Strc(C) + ❌)
❌

¿El siguiente código esta bien estructurado?

Dim C As Intinger
C = 0
If CheckBox1.Checked
C = C + 1
CheckBox2.Checked Then
C = C + 1
End If
If CheckBox3.Checked Then
C = C + 1
MessageBox.Show("Han sido seleccionados " + Strc(C) + " checkbox")
End If

Complete

CheckBox1.