Preguntas del examen final de primer año de vb
Preguntas de opción única, preguntas de verdadero y falso, preguntas para completar espacios en blanco, preguntas de programación
1) Después de ejecutar el siguiente programa, el resultado de salida es ______.
B=1
Hacer while (b<40)
b=b*(b+1)
Bucle p>
Imprimir b
a) 42
b) 39
c) 6
d) 1 Respuesta: A
2) Suponga que al ejecutar el siguiente segmento del programa, ingrese 1, 3 y 5 en secuencia, y el resultado de la ejecución es _____.
Dim a(4) como entero
Dim b(4) como entero
Para K =0 a 2
a( K+1) =Val(InputBox("Por favor, introduzca los datos: "))
b(3-K) =a(K+1)
Siguiente K
Imprimir b(K)
a) 1
b) 3
c) 5
d) 0 Respuesta: A
3) Después de ejecutar el siguiente programa, el valor de la variable s es ______.
Dim s Mientras ,x Como Entero
s=0:x=1
Hacer Mientras (x<10)
s=s+x
x=x+2
Bucle
Imprimir s
a) 10
b) 25
c) 50
d) 100 Respuesta: B
4) Escribe el siguiente proceso de evento:
Privado Sub Form_MouseDown(Botón como entero, Mayús como entero, X como único, Y como único)
Si Shift=6 y Button=2 entonces
Imprime "Hola"
End If
End Sub
Después de ejecutar el programa, para mostrar "Hola" en el formulario, se deben realizar las siguientes _______ operaciones en el formulario.
a) Pulsar la tecla Shift y el botón izquierdo del ratón al mismo tiempo
b) Pulsar la tecla Shift y el botón derecho del ratón al mismo tiempo
c) Presione Ctrl y Alt al mismo tiempo y el botón izquierdo del mouse
d) Presione Ctrl, Alt y el botón derecho del mouse al mismo tiempo Respuesta: D
5) Cuando las variables x=2, y=5, el siguiente programa La salida es ____.
Hacer hasta y>5
x=x*y
y=y+1
bucle
imprimir x
a) 2
b) 5
c) 10
d) 20 Respuesta: C
6) Cuando se ejecuta el siguiente programa, se mostrará _____ en el cuadro de etiqueta denominado lblResult.
Sub privado cmdlt_click()
Atenuar I,R
R=0
Para I=1 a 5 Paso 1 p>
R=R+I
Siguiente I
lblResult.Caption=Str(R)
Fin Sub
a) Cadena 15
b) Entero 15
c) Cadena 5
d) Entero 5 Respuesta: A
7 ) Allí es un segmento de programa incompleto de la siguiente manera. Si se requiere que el programa ejecute tres ciclos, se debe ingresar ______ entre paréntesis en el programa.
X=1
hacer
x=x+3
imprimir x
bucle hasta(___ )
a) x>=8
b) x<=8
c) x>=7
d) x <=7 Respuesta: A
8) Si el valor de la variable entera a es 2 y el valor de b es 3, entonces el valor de la variable entera c después de la ejecución del siguiente segmento del programa es ______.
Si a>5 entonces
si b<4 entonces
c=a-b
más
c =b-a
Fin si
elseif b>3 entonces c=a*b
else
c=a mod b p>
Termina si
a) 2
b) -1
c) 1
d) 6 Respuesta: A
9) Se proporciona la siguiente declaración:
str1=inputbox("input","","exercise")
Ingrese una cadena del teclado Después de "ejemplo", el valor de str1 es ___.
a) "Entrada"
b) ""
c) "Práctica"
d) "Ejemplo" Respuesta: D
10) Creamos dos cuadros de texto en un formulario, llamados Texto1 y Texto2 respectivamente. El proceso del evento es el siguiente,
Private Sub Text1_change()
. Text2.text=ucase(Text1.text)
End Sub
Ingrese "visual basic" en el cuadro de texto Texto1 y Texto2 ______.
a) No se muestra ningún contenido en Texto2.
b) Texto2 muestra "VISUAL BASIC".
c) Text2 muestra "visual basic"
d) Text1 muestra "visual basic" Respuesta: B
11) El valor de s después de ejecutar lo siguiente programa si_____.
S=0
Para x=99 a 1 Paso-2
s=s+x
Siguiente x
Imprimir s
a) 100
b) 500
c) 2500
d) 5000 Respuesta: C
12) El resultado de la ejecución del siguiente programa es ____.
K=0
Para I=1 a 3
a=I^I^K
imprime a;
Siguiente I
a) 1 1 1
b) 1 2 3
c) 0 0 0
d ) 1 4 9 Respuesta: A
13) El resultado de la ejecución del siguiente programa es _____.
Atenuar a(5) como cadena
Atenuar b como entero
Atenuar I como entero
Para I =0 a 5
a(I)=I+1
Imprimir a(I)
Siguiente I
a) 123456
b) 6
c) 654321
d) 0 Respuesta: A
14) El resultado de la ejecución del siguiente programa es _____.
Dim intsum como entero
Dim I como entero
intsum=0
Para I=20,2 a 5 paso -4,7 p>
intsum=intsum +I
Siguiente I
Imprimir intsum
a) 150
b) 200 p> p>
c) 50
d) 0 Respuesta: C
15) El resultado de la ejecución del siguiente programa es _____.
Atenuar S como entero,n como entero
S=0:n=1
Hacer mientras n<=100
S =S+n
n=n+1
Bucle
Imprimir S
a) 5050
b) 2500
c) 3000
d) 4000 Respuesta: A
16) El resultado de la ejecución del siguiente programa es _____.
A=100:b=50
Si a>b Entonces
a=a-b
De lo contrario
b=b+a
Finalizar si
Imprimir a
a) 50
b) 100
c) 200
d) 10 Respuesta: A
17) El resultado de la ejecución del siguiente programa es ________.
Dim intsum como entero
Dim I como entero
intsum=0
Para I=0 a 50 Paso 10
intsum=intsum+I
Siguiente I
Imprimir intsum
a) 150
b) 200
c) 50
d) 0 Respuesta: A
18) Después de ejecutar el siguiente programa, el resultado de X es _____.
X=0
Para I =1 a 5
Para j=I a 5
X=X+1 p>
Siguiente j
Siguiente I
Imprimir X
a) 5
b) 10
c) 15
d) 20 Respuesta: C
19) El resultado de la ejecución del siguiente programa es ____.
Sub privado Form_Click()
A$="123":B$="456"
C=Val(A$)+Val(B $)
Imprimir C\100
Fin Sub
a) 123
b) 3
c ) 5
d) 579 Respuesta: C
20) La siguiente instrucción de bucle se ejecutará ______ veces.
A=100
Hacer
Imprimir un
a=a+1
Bucle hasta que < =10
a) 1
b) 10
c) 100
d) Respuesta de bucle infinito: D
21) Después de ejecutar la estructura de bucle del siguiente segmento del programa, el valor de salida de es _____.
El segmento del programa es:
Para I=1 a 10 paso 2
y=y+I
Siguiente I p >
print I
a) 25
b) 10
c) 11
d) Porque la inicial valor de Y El valor no se conoce, por lo que no estoy seguro de la respuesta: C
22) Escribe el resultado de la ejecución del segmento del programa ____.
A="abbacddcba"
para I=6 a 2 paso -2
x=mid(a,I,I)
y=izquierda(a,I)
z=derecha(a,I)
z=x & y & z
siguiente I p>
print Ucase(z)
a) ABA
b) AABAAB
c) BBABBA
d) ABBABA Respuesta: C
23) El resultado de la siguiente declaración es (en la ventana inmediata) _____.
A="Pekín"
b="ShangHai"
Imprimir a;b
a) Pekín ShangHai
b) Abeijing ShangHai
c) BeijingShangHai
d) Abeijing Respuesta: C
24) Existe el siguiente procedimiento:
Para I=1 a 3
Para j=5 a 1 Paso-1
Imprimir I+j
Siguiente j,I
El número de veces que se ejecuta su bucle es______.
a) 12
b) 13
c) 14
d) 15 Respuesta: D
25) Existe el siguiente segmento de programa. Después de ejecutar el programa, el valor de la variable a es ______.
Para I=1 a 2
Para J=I a 2
Para K=1 a J
a=a+ 2
Siguiente K
Siguiente J
Siguiente I
a) 2
b) 8
p>c) 10
d) 20 Respuesta: C
26) Luego de ejecutar el siguiente programa, el valor de la variable a es ____.
Atenuar I como entero
Atenuar a como entero
a=0
para I=0 a 100 paso 2
a=a+1
siguiente I
a) 1
b) 10
c) 51 p>
d) 100 Respuesta: C
27) Después de ejecutar el siguiente programa, el valor de X es ______.
X=3
y=6
Hacer mientras y<=6
x=x*y
y=y+1
Bucle
a) 3
b) 6
c) 18
d) 20 Respuesta: C
28) Luego de ejecutar el siguiente segmento del programa, el valor de la variable entera c es ___.
A=24
b=328
seleccione caso b\10
caso 0
c= a*1b
caso 1 a 9
c=a*10b
caso 10 a 99
c= a*100b
finalizar selección
a) 537
b) 2427
c) 24328
d) 240328 Respuesta: C
29) Después de ejecutar el siguiente segmento del programa, el bucle se ejecutará ____ veces.
Para I=1.7 a 5.9 Paso 0.9
a=a+1
Imprimir a
Siguiente I
a) 3
b) 4
c) 5
d) 6 Respuesta: C
30) Existen los siguientes declaraciones, el número de bucles de esta declaración después de la ejecución es _____.
Dim s,I,j como entero
Para I =1 a 3
Para j=3 a 1 Paso-1
S=I*j
Siguiente j
Siguiente I
a) 9
b) 10
c) 3
d) 4 Respuesta: A
31) Existe el siguiente programa, el cual ______.
Para I=1 a 10 paso 0
K=k+2
Siguiente I
a) Formar un bucle infinito.
b) Se ejecuta el cuerpo del bucle y el bucle finaliza.
c) Error gramatical.
d) El bucle finalizará si no se ejecuta el cuerpo del bucle. Respuesta: A
32) Existe el siguiente segmento de programa. Después de ejecutar el segmento de programa, se realiza un bucle________.
Para I=1 a 5
Para j=1 a I
Para k=j a 4
Imprimir "a"
Siguiente k
Siguiente j
Siguiente I
a) 4
b) 5
c) 38
d) 40 Respuesta: D
33) Existe el siguiente programa, el resultado de ejecución de este programa es ______.
Dim k As Integer
n=5:m=1:k=1
Hacer mientras k<=n
m =m*2
k=k+1
Bucle
Imprimir m
a) 1
b) 5
c) 32
d) 40 Respuesta: C
34) El siguiente programa genera la suma de todos los números pares entre 1 y 1000. Por favor complete el programa.
Private Sub Command_Click()
Atenuar x como doble
Para I=0 a 1000
Si ____ entonces
x=x+I
Finalizar si
Siguiente I
Imprimir x
Finalizar sub
a) i Mod 2 = 0
b) x Mod 2 = 0
c) I Mod 2 <> 0
d) x Mod 2 < > 0 Respuesta: A
35) El siguiente es un programa para calcular el factorial de 10. Por favor complemente el programa.
Atenuar t como único
Atenuar k como entero
k=0:t=1
Mientras_______
k=k+1
t=t*k
Wend
Imprimir t
a) k<10
b) k>10
c) k=10
d) k>=10 Respuesta: A
36) _____ está dada por Una subrutina especializada proporcionada por Visual Basic, que es propiedad del propio objeto y refleja las funciones o procedimientos internos de la funcionalidad del objeto.
a) Archivo
b) Atributo
c) Método
d) Formulario Respuesta: C
37) Justo después de crear un nuevo proyecto EXE estándar, el control que no aparece en la caja de herramientas es _____.
a) Botón de opción
b) Cuadro de imagen
c) Cuadro de diálogo común
d) Cuadro de texto Respuesta: C
p>38) ¿Cuál de los siguientes no es un tipo de datos básico de Visual Basic es _____?
a) Carácter
b) Cadena
c) Entero
d) Respuesta doble: A
39) Entre los siguientes resultados de operación, el que tiene el valor más grande es ______.
a) 3\4
b) 3/4
c) 4 mod 3
d) 3 mod 4 Respuesta: D
40) Uno de los siguientes elementos que no es un control es _____.
a) Cuadro de texto
b) Cuadro de etiqueta
c) Cuadro de lista
d) Cuadro de mensaje Respuesta: D
41) Utilice la función InputBox para ayudar a generar _______.
a) Cuadro de mensaje
b) Cuadro de diálogo "Guardar"
c) Cuadro de entrada simple
d) Cuadro de diálogo "Color" respuesta: C
42) ______ los objetos no pueden responder a los eventos Click.
a) Cuadro de lista
b) Cuadro de imagen
c) Formulario
d) Temporizador Respuesta: D
43) El resultado de 17 mod 3 es _____.
a) 0,5
b) 1
c) 1,5
d) 2 Respuesta: D
44) Variable X=32769, entonces no se puede declarar como _____ al declarar la variable.
a) Intrger
b) Variante
c) Larga
d) Respuesta única: A
45) El valor de la expresión 2*3^2+2*8/4+3^2 es _____.
a) 64
b) 31
c) 49
d) 22 Respuesta: B
46) Si el objeto de cheque está seleccionado o no está determinado por su atributo _____.
a) Marcado
b) Valor
c) Habilitado
d) Respuesta seleccionada: B
47) Un control sin propiedad Caption es _____.
a) Etiqueta
b) Botón de opción
c) Marco
d) LisBox Respuesta: D
48) ¿Cuál de los siguientes símbolos es un nombre de variable legal en Visual Basic es _____?
a) SI
b) 7AB
c) A[B]7
d) AB_7 Respuesta: D
49) La instrucción que hace que el formulario se mueva automáticamente hacia abajo es Move_____.
a) Izquierda, Arriba+100
b) Arriba+100
c) Arriba+100
d) Arriba=Arriba +100 Respuesta: A
50) La función RGB produce un determinado color mezclando los tres colores primarios rojo, verde y azul. Su sintaxis es RGB (rojo, verde, azul), y los tres. Los colores rojo, verde y azul entre paréntesis son Utilice un número entero entre 0 y 255 para el componente de color base. Si usa 3 barras de desplazamiento para ingresar 3 colores básicos respectivamente, para asegurarse de que los valores de entrada sean válidos, debe configurar el atributo _____.
a) Máx. y Mín.
b) SmallChange y LargeChange
c) Desplazamiento y cambio
d) Valor Respuesta: A