http://www.daypo.com/test-visual-basic-6-0.html
COMPLEXFILO
complexivo
jueves, 24 de marzo de 2016
ESTRUCTURA SELECTIVA IF THEN Y SELECT CASE
ESTRUCTURA SELECTIVA IF THEN
If NUM > 0 Then
MsgBox "POSITIVO"
ElseIf NUM = 0 Then
MsgBox "NEUTRO"
Else
MsgBox "NEGATIVO"
End If
ESTRUCTURA SELECTIVA SELECT CASE
Private Sub Combo1_Click()
Select Case Combo1.Text
Case "CHEVROLET"
Combo2.Clear
Combo2.AddItem "SPARK"
Combo2.AddItem "OPTRA"
Combo2.AddItem "SAIL"
Combo2.AddItem "AVEO"
Case "HYUNDAI"
Combo2.Clear
Combo2.AddItem "TUCSON"
Combo2.AddItem "SANTA FE"
Combo2.AddItem "ACCENT"
Case "MAZDA"
Combo2.Clear
Combo2.AddItem "ALLEGRO"
Combo2.AddItem "BT50"
End Select
End Sub
If NUM > 0 Then
MsgBox "POSITIVO"
ElseIf NUM = 0 Then
MsgBox "NEUTRO"
Else
MsgBox "NEGATIVO"
End If
ESTRUCTURA SELECTIVA SELECT CASE
Private Sub Combo1_Click()
Select Case Combo1.Text
Case "CHEVROLET"
Combo2.Clear
Combo2.AddItem "SPARK"
Combo2.AddItem "OPTRA"
Combo2.AddItem "SAIL"
Combo2.AddItem "AVEO"
Case "HYUNDAI"
Combo2.Clear
Combo2.AddItem "TUCSON"
Combo2.AddItem "SANTA FE"
Combo2.AddItem "ACCENT"
Case "MAZDA"
Combo2.Clear
Combo2.AddItem "ALLEGRO"
Combo2.AddItem "BT50"
End Select
End Sub
ESTRUCTURA DE CONTROL REPETITIVA
ESTRUCTURA REPETITIVA FOR/NEXT
Dim X As Integer
For X = 1 To 20 Step 1
List1.AddItem X
Next
Otra forma***************
Dim X As Integer
For X = INICIAL To FINAL Step SALTO
List1.AddItem X
Next
*************************************
ESTRUCTURA REPETITIVA DO WHILE/UNTIL LOOP - DO LOOP WHILE/UNTIL
EJEMPLO CON DO WHILE LOOP
Dim T As Byte
Do While T < 20
T = T + 1
List1.AddItem T
Loop
EJEMPLO CON DO UNTIL LOOP
'Do Until T >= 20
'T = T + 1
'List1.AddItem T
'Loop
EJEMPLO CON DO LOOP WHILE
'Do
'T = T + 1
'List1.AddItem T
'Loop While T < 20
EJEMPLO CON DO LOOP UNTIL
Do
T = T + 1
List1.AddItem T
Loop Until T >= 20
miércoles, 23 de marzo de 2016
Modelos de Preguntas
ANALIZA ANTES DE CONTESTAR
Planteamiento "¿Cuál
es el orden correcto de las instrucciones para completar en los espacios con
una raya?.
En la tabla Ventas mostrar todos los registros que ganen 800
dólares en adelante.
__________ * _________ VENTAS _________SUELDOS ______800
Opcion A A) DELETE, FROM, ORDER BY, =
Opcion B B) UPDATE, FROM, INSERT, >
Opción C C) SELECT, FROM, WHERE, <=
Opción D D) SELECT, FROM, WHERE, >=
LA
RESPUESTA CORRECTA ES LA ...................
Planteamiento:
"Dim
sql As String = "SELECT * FROM Ventas WHERE sector=norte"
1. Asigna un
nombre de variable.
2.
Asigna el sector norte como contraseña.
3.
Selecciona todas las filas de una tabla.
4.
Selecciona datos que tengan relación con el sector norte
5.
Selecciona todos los vendedores excepto los que trabajan al norte
6. Asigna el sector norte como usuario y
hace una consulta
Opcion A A)
1, 2, 3
Opcion B B)
3, 4, 6
Opción C C)
1, 3, 4
Opción D D)
1, 4, 5
LA RESPUESTA CORRECTA ES LA
……………….
lunes, 21 de marzo de 2016
!!!!MUY IMPORTANTE!!!
REVISAR TEMAS DE CONSULTAS SQL
https://es.wikipedia.org/wiki/SQL
http://historiaybiografias.com/sql/
REVISAR TEMAS DE CONSULTAS SQL
https://es.wikipedia.org/wiki/SQL
http://historiaybiografias.com/sql/
PREGUNTAS PARA PRACTICAR & ENLACES
PREGUNTA 1
| Planteamiento | La sintaxis correcta para consultar todos los registros de una tabla: |
| Opcion A | A) SELECT * FROM TABLA |
| Opcion B | B) SELECT ALL FROM TABLA |
| Opción C | C) SELECT TABLA FROM * |
| Opción D | D) SELECT FROM TABLA |
Respuesta
correcta:..............PREGUNTA 2 |
| Planteamiento | Con SQL, como se puede Seleccionar una columna llamada "FirstName" de la tabla llamada Persons? |
| Opcion A | |
| Opcion B | |
| Opción C | |
| Opción D | D) Ninguna de las anteriores |
| Respuesta correcta......... |
| PREGUNTA 3 | ||||||||||||
PREGUNTA 4 |
|
Suscribirse a:
Comentarios (Atom)



