¿Preguntas del examen final de VB?
El primer conjunto
1. Preguntas de verdadero o falso
1. La característica del desarrollo de programas en Visual Basic es la orientación a objetos y el control de eventos. (√)
2. Print_Text es un nombre de variable ilegal. (×)
3. La propiedad AutoRedraw del formulario realiza la reconstrucción de la imagen de la pantalla. (√)
4. El atributo Fuente debe usarse para establecer el tamaño de fuente (×)
5. El proceso Sub puede implementar llamadas anidadas (√)
6. Ninguno de los tres parámetros de la función IIF se puede omitir. (√)
7. Las declaraciones condicionales de estructura de bloque terminan con End If, mientras que las declaraciones condicionales de estructura de una sola línea no tienen End IF. (√)
8. Cuando el valor final es menor que el valor inicial, el tamaño del paso es un número negativo. (√)
9. Al ejecutar un bucle While-Wend, si la condición no es verdadera al principio, el bloque de instrucciones no se ejecutará una vez. (√)
10 En cuanto a la referencia de matrices, en el programa, las referencias a elementos de una matriz pueden aparecer dondequiera que puedan aparecer variables simples (√)
2. p>
1. El resultado después de la ejecución de Formato de impresión (123, "####") es
A) #123 B) 123 C) 123# D) ####
Respuesta B
2. Lo siguiente puede representar el comienzo de la declaración del comentario:
A) Re B) R C) Rem D) dim
Respuesta C
3. Entre las siguientes opciones, el evento de carga del formulario es
A) Evento de carga B) Evento de clic C) Evento DblClick D) Evento de descarga
Respuesta A
4 . ¿Cuál de los siguientes eventos puede ser utilizado por el control del temporizador?
A) Evento de clic B) Evento de temporizador C) Evento de doble clic D) Evento de cambio
Respuesta B
5. Qué parámetro se requiere en la función InputBox
A) Mensaje B) Botones C) Título D) Contexto
Respuesta A
6. Lo que está mal en la siguiente descripción es:
A) Si un procedimiento se define como tipo estático, entonces las variables locales en el procedimiento son de tipo estático
B) Los subprocedimientos no pueden estar anidados Definir procedimientos Sub
C) Los procedimientos Sub pueden anidar llamadas a procedimientos Sub
D) Los procedimientos de eventos pueden tener nombres de procedimiento definidos por el usuario como procedimientos generales
Respuesta C
7. Para agregar un módulo estándar, use el comando "Agregar módulo" en el menú "_____".
A) Archivo B) Vista C) Proyecto D) Herramienta
Respuesta C
8. En la estructura de bloque declaración condicional If-Then / Endif
(A) debe haber al menos una declaración Elseif
(B) Puede haber cualquier número de declaraciones ElseIf-Then
(C) Si no hay una declaración Else, se producirá un error durante el tiempo de ejecución
(D) La condición dada solo puede ser una expresión relacional o una expresión lógica
Respuesta B
9. Las siguientes declaraciones de caso son incorrectas:
(A) Caso 10 a 1
(B) Caso es>10
(C)Caso es>10, Is<50
(D) Caso 3,5,Is>10
Respuesta A
10. Para el bucle Do Until...Loop, el correcto es ().
A. Si la condición del bucle es constante 0, el bucle no se ejecutará una vez
B. Si la condición del bucle es constante 0, ejecute el bucle al menos una vez
C. Si la condición del bucle es una constante distinta de 0, ejecute el bucle al menos una vez
D. Independientemente de si la condición del bucle es "Verdadera", el bucle se ejecutará al menos una vez
Respuesta B
11. La declaración Dim arr(-3 To 5, 2 To 6) As Integer define una matriz de _______ elementos.
A) 45 B) 40 C) 11 D) 54
Respuesta A
12. La siguiente declaración sobre la declaración Option Base es incorrecta______D
A) La declaración Option Base solo puede aparecer en el nivel de formulario o nivel de módulo
B) La declaración Option Base no puede aparecer en el procedimiento
C) La declaración Option Base debe colocarse antes de la definición del arreglo
D) La declaración Option Base solo es válida para arreglos unidimensionales
Respuesta D
13. Las características de Visual Basic no incluyen lo siguiente (A)
A No requiere programación B Programación para elefantes frijol
C Visual programación D Programación controlada por tiempo
14. Se pueden ingresar dos cadenas desde el teclado y almacenarlas en las variables str1 y str2 respectivamente. La función que determina la posición inicial de la segunda cuerda en la primera cuerda es (D)
A Left B Mid
C String D Instr
15. Si el valor de la constante booleana Verdadero se asigna a una variable entera, el valor de la variable entera es (B)
A 0 B -1
C Verdadero D falso
16. Entre las siguientes declaraciones de constantes simbólicas, (C) es ilegal.
A Const a Como Simple = 1.1 B Const a Como Entero = “12”
C Const a Como Doble = Sin(1) D Const a =”OK”
17. El valor de código ASCII más grande de los cuatro caracteres "E", "y", "B" y "8" es (B)
A "E" B "y"
C “B” D “8”
18. La expresión para redondear la variable k a 2 decimales es (C)
A Int((k + 0.5)*100)/100 B Int((k*100)/100)+0.5
C Int(k*100.5)/100 D Int(k*(100.5)) / 100”
19, 30. Escribe la expresión matemática Cos2(a+b)+5e2 como una expresión de Visual Basic. Su forma correcta es (A)
A) Cos(a. +b)^2+5*exp(2) B) Cos^2(a+b)+5*exp(2)
C) Cos(a+b)^2+ 5*ln (2) D) Cos^2(a+b)+5*ln(2)
20. En un archivo secuencial, cuando se utiliza la instrucción Write#, el archivo debe abrirse de la siguiente manera. : (B)
A Salida y Entrada B Salida y Anexar
C Salida D Anexar
Preguntas de análisis del programa
1. El resultado de salida de la siguiente declaración es (Nota: ■ representa un espacio)
a = 123
b = 456
Imprimir b
A) 123■456 B) ■123■456 C) ■123■456■ D) ■123■■456
La respuesta D
2. /p>
x = -6 ^ 2
Imprimir Sgn(x) + Abs(x) + Int(x)
A)-36 B) 1 C) -1 D)-72
Respuesta C
3. Dibuje un botón de comando llamado Comando1 y una etiqueta llamada Etiqueta1 en el formulario y luego escriba el siguiente procedimiento de evento:
Private Sub Command1_Click()
s = 0
Para i = 0 a 15
X = 2 * i - 1
Si X Mod 3 = 0 Entonces s = s + 1
Siguiente i
Label1.Caption = s
End Sub
Después de ejecutar el programa, haga clic en el botón de comando y el contenido que se muestra en la etiqueta es
p>A) 1 B) 5 C) 27 D) 45
Respuesta B
4. Dibuje un botón de comando llamado Comando1, una etiqueta llamada Etiqueta1, Etiqueta2 y Etiqueta3 en el formulario y luego escriba el siguiente procedimiento de evento:
Privado x como entero
Privado Su
b Command1_Click()
Estático y como entero
Dim z como entero
n = 10
z = n + z p>
y = y + z
x = x + z
Etiqueta1.Caption = x
Etiqueta2.Caption = y
Label3.Caption = z
End Sub
Después de ejecutar el programa y hacer clic en el botón de comando tres veces seguidas, los contenidos que se muestran en las tres etiquetas son
A) 10 10 10 B) 30 30 30 C) 30 30 10 D) 10 30
Respuesta C
5. Dibuje un botón de comando llamado Comando1, etiquetas llamadas Etiqueta1 y Etiqueta2 en el formulario y luego escriba el siguiente procedimiento de evento:
Privado x como entero
Subcomando privado1_Clic ()
x = 5: y = 3
Llamar a Proc(x, y)
Etiqueta1.Caption = x
Etiqueta2 .Caption = y
End Sub
Proc sub privado(ByVal a como entero, ByVal b como entero)
x = a * a
y = b + b
End Sub
Después de ejecutar el programa, los contenidos que se muestran en las dos etiquetas son
A) 5 y 3 B) 25 y 3 C ) 25 y 6 D) 5 y 6
Respuesta B
6. El siguiente segmento del programa encuentra el mayor de dos números. El incorrecto es
(. A)Si x>y Entonces Max=x De lo contrario Max=y
(B) Max=IIf(x>y,x,y)
(C)Si y>= x Entonces Max=y
Max=x
(D)Si y>x Entonces Max=y
Max=x
Respuesta D
7. Si el valor de x es mayor o igual que el cubo de y, imprima "OK". La declaración If de una sola línea que indica esta condición es
A) If x>=y^3 Imprima ". OK"
B) Si x>=y*y*y entonces “OK”
C) Si x>=y^3 entonces imprime “OK”
D) Si x>=y*y*y Entonces imprima “OK” Finalice si
Respuesta C
8. El resultado de la ejecución del siguiente segmento del programa es
x = 5
y = -6
Si no x < 0 Entonces x = y - 3 De lo contrario y = x + 3
Imprimir y - x; x - y
A) 3 -3
B) -9 5
C) - 3 3
D) 5-6
Respuesta A
9. Dado el valor de x, calcule la función por partes f(x), de la siguiente manera
Las opciones incorrectas son
Cuando x>=1, f(x)=;
Cuando x<1, f(x)= x2+3
(A) Seleccione Caso x
Caso es<1
f= x^2+3
Caso más
f =sqr (x+1 )
Finalizar Selección
(B) Seleccionar Caso x
Caso x>=1
f= sqr( x+1 )
Caso x<1
f= x^2+3
Finalizar selección
(C ) Seleccionar caso x
Caso es>=1
f=sqr(x+1 )
Caso es<1
f= x^ 2+3
Fin Seleccionar
(D) IF x>=1 entonces f=sqr(x+1 ) else f= x^2+3
Respuesta B
10. Después de ejecutar el siguiente segmento del programa, el bucle se ejecuta ( ) veces.
Para i = 1.7 a 5.9 Paso 0.9
a = a + 1
Imprimir a
Siguiente I
A. 3B. 4C. 5D. 6
Respuesta C
11. El resultado de la ejecución del siguiente segmento del programa es ().
n = 0
j = 1
Hacer hasta n > 2
n = n + 1
j = j + n * (n + 1)
Bucle
Imprimir n; 0 1 B. 3 7 C. 3 21D. 3 13
Respuesta C
12. La siguiente estructura correcta para...La siguiente es
(A) Para x=1 a 10
para y=1 a 10
…
Siguiente
(B) Para x=1 a 10
para y=1 a 10
…
Siguiente y , x
(C) Para x=1 a 10
para y=1 a 10
Siguiente x
Siguiente y p>
(D) Para x=1 a 10
para y=1 a 10
Siguiente x , y p>
Respuesta B
13. En el siguiente programa, la primera instrucción Do *** ejecuta bucles ( ).
Atenuar i como entero, j como entero
i = 1
Hacer
j = 1
Hacer
Suma = Suma + j
j = j + 2
Imprimir j;
Bucle hasta j > 3
i = i + 2
Recorrer hasta i > 10
Imprimir suma
A. 10B. 20C. 5D. 7
Respuesta A
14. En las siguientes declaraciones, a es una matriz, entonces la correcta a usar es______
A) Opción Base 2
B) Redimificar a
C) Borrar a
D) a = Array()
Respuesta C
15. Dibuje un cuadro de texto llamado Texto1 y un cuadro de texto llamado Comando1 en el botón de comando del formulario. y luego escriba el siguiente procedimiento de evento:
Private Sub Command1_Click()
Dim array1(10, 10) As Integer
Dim i As Integer, j Como entero
Para i = 1 a 3
para j = 2 a 4
array1(i, j) = i + j
siguiente j
siguiente i
Texto1.Texto = arrry1(2, 3) + matriz(3, 4)
Fin Sub
Después de ejecutar el programa, haga clic en el botón de comando y el valor que se muestra en el cuadro de texto es______
A) 12 B) 13 C) 14 D) 15
Respuesta A
16. Dibuje un botón de comando llamado Comando1 en el formulario y luego escriba el siguiente procedimiento de evento:
Private Sub Command1_Click()
Dim a ( 10 ,10) Como entero
Atenuar i como entero, j como entero
Para i = 1 a 3
para j = 1 a 3
a (i, j) = (i – 1) * 3 + j
Imprimir a(i, j);
siguiente j
Imprimir
siguiente i
Fin Sub
Después de que se ejecute el programa, haga clic en el botón de comando y se mostrará ______ en el formulario
A) 1 2 3
2 4 6
3 6 9
B) 2 3 4
3 4 5 p >
4 5 6
C) 1 4 7
2 5 8
3 6 9
D) 1 2 3
4 5 6
7 8 9
Respuesta D
17. Se proporcionan los siguientes procedimientos:
Opción Base 0
Sub privado Form_Click()
Dim a
Dim i como entero
a = Array(1, 2,3,4,5,6,
7,8,9)
Para i = 0 a 3
Imprimir a(5 – i);
Siguiente
Fin Sub
Después de ejecutar el programa, haga clic en el formulario y lo que se muestra en el formulario es ______
A) 4 3 2 1 B) 5 4 3 2 C) 6 5 4 3 D) 7 6 5 4
Respuesta C
18. Ejecute el siguiente procedimiento de evento Click de Comando1 para mostrar _______ en el formulario.
Subcomando privado1_Click()
Dim a
a = Array("a","b","c","d","e ","f,","g")
Imprimir a(1); a(3); a(5)
End Sub
A ) a b c B) b d f C) a c e D) Error
Respuesta B
19. Con declaración
Abra "c:\Test.Dat" para obtener salida como #1
La siguiente descripción del error es (B)
A) Esta declaración abre un archivo Test.Dat existente en el directorio raíz de la unidad C
B ) Esta declaración crea un archivo llamado Test.Dat en el directorio raíz de la unidad C
C) El número de archivo del archivo creado por esta declaración es 1
D) Ejecute esto después la declaración, puede escribir información en el archivo Test.Dat a través de la declaración Print#
20 El siguiente código completa la apertura adicional del archivo secuencial test1.txt (C)
B) Abra test1.txt para salida como n.° 1
C) Abra test1.txt para anexar como n.° 1 p >
D) Abra test1.txt para Redom como #1
4 Preguntas sobre informática
1. Xiao Wang tiene un depósito de A yuanes, la tasa de interés anual es P y el tiempo de almacenamiento es T años. Escriba un programa para calcular el capital y los intereses totales. (A, P y T se ingresan usando Inputbox)
2. Encuentra un número primo hasta 100. Un número primo se refiere a un número x que no se puede dividir por ningún otro número entero excepto 1 y él mismo. Se requiere generar 10 números primos en cada línea.
Haga clic en el formulario y el resultado de ejecución se muestra en la figura:
Respuesta
Agregue código en el proceso de evento de hacer clic en el formulario. El código es el siguiente:
Private Sub Form_click()
Const N = 100
Dim i, j, Line, a(N) As Integer p>
Para i = 0 Para N - l ' Establecer valor inicial
a(i) = i
Siguiente i
Para i = 2 A Sqr(N)
Para j = i + 1 A N
Si a(i) <> 0 y a(j) <> 0 Entonces
Si a(j ) Mod a(i) = 0 Entonces a(j) = 0 ' Si es divisible, asigna 0
Fin
Siguiente j
Siguiente i
p>Imprimir "Mostrar números primos hasta 100"
Para i = 2 a N - 1
Si a(i) < > 0 Entonces
Imprimir a(i); Spc(1);
Línea = Línea + 1
Fin
Si Línea <> 0 y Mod de línea 10 = 0 Luego imprima 'Mostrar 10 números en cada línea
Siguiente i
Fin del sub
Criterios de puntuación:
1. Dar correctamente la asignación de matriz (2 puntos)
2. Determinar correctamente los números primos (3 puntos)
3. Generar correctamente el resultado de la pantalla (2 puntos)
4. Guarde el archivo (2 puntos)
5. La estructura del programa es razonable y clara (1 punto)