Visual Basic

Question 1 of 20

1

¿Esto es una CheckBox?

Select one of the following:

True
False

Explanation

Question 2 of 20

1

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

Select one or more of the following:

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

Explanation

Question 3 of 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
❌

Drag and drop to complete the text.

As

TextBox2

TextBox5.Text = p

v

If

Then

End

n3

Dim

Explanation

Question 4 of 20

1

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

MessageBox.Show()

Select one of the following:

True
False

Explanation

Question 5 of 20

1

Fill the blank spaces to complete the text.

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

Explanation

Question 6 of 20

1

Select from the dropdown list to complete the text.

Seleccione la respuesta correcta;

Dim C As ( Integer, Double )

Explanation

Question 7 of 20

1

¿Es un Progress Bar?

Select one of the following:

True
False

Explanation

Question 8 of 20

1

Fill the blank spaces to complete the text.

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 =

Explanation

Question 9 of 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

Select one of the following:

True
False

Explanation

Question 10 of 20

1

Complete;

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

Drag and drop to complete the text.

Color

Blue

Me.BackColor

If

Back

Explanation

Question 11 of 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

Select one of the following:

True
False

Explanation

Question 12 of 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

Select one of the following:

True
False

Explanation

Question 13 of 20

1

Fill the blank spaces to complete the text.

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

Explanation

Question 14 of 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

Select one of the following:

True
False

Explanation

Question 15 of 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) + ❌)
❌

Drag and drop to complete the text.

Dim

CheckBox1

Intinger

Checked

C = C + 1

Then

" checkbox"

End If

Explanation

Question 16 of 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

Select one of the following:

True
False

Explanation

Question 17 of 20

1

Select from the dropdown lists to complete the text.

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

Explanation

Question 18 of 20

1

¿Qué opciones podemos ver en el siguiente Form?

Select one or more of the following:

Label
TextBox
Button
Progress Bar
Check Box
Combo Box

Explanation

Question 19 of 20

1

Complete

CheckBox1.

Select one of the following:

Show
Checked
Text

Explanation

Question 20 of 20

1

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

Select one of the following:

ToolBox
Form
Orígenes de datos

	Created by rafgss over 8 years ago

Examen de Visual Basic

Visual Basic

Question 1 of 20

¿Esto es una CheckBox?

Select one of the following:

Explanation

Question 2 of 20

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

Select one or more of the following:

Explanation

Question 3 of 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 ❌

Drag and drop to complete the text.

Explanation

Question 4 of 20

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

Select one of the following:

Explanation

Question 5 of 20

Fill the blank spaces to complete the text.

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

Explanation

Question 6 of 20

Select from the dropdown list to complete the text.

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

Explanation

Question 7 of 20

¿Es un Progress Bar?

Select one of the following:

Explanation

Question 8 of 20

Fill the blank spaces to complete the text.

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 =

Explanation

Question 9 of 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

Select one of the following:

Explanation

Question 10 of 20

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

Drag and drop to complete the text.

Explanation

Question 11 of 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

Select one of the following:

Explanation

Question 12 of 20

Select one of the following:

Explanation

Question 13 of 20

Fill the blank spaces to complete the text.

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

Explanation

Question 14 of 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

Select one of the following:

Explanation

Question 15 of 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) + ❌) ❌

Drag and drop to complete the text.

Explanation

Question 16 of 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

Select one of the following:

Explanation

Question 17 of 20

Select from the dropdown lists to complete the text.

Explanation

Question 18 of 20

¿Qué opciones podemos ver en el siguiente Form?

Select one or more of the following:

Explanation

Question 19 of 20

Complete CheckBox1.

Select one of the following:

Explanation

Question 20 of 20

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

Select one of the following:

Explanation

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.