Crear juego
Crear juego
Todos los juegos

Examen 4a. Unidad

Completar frases

Complete el programa

Descarga la versión para jugar en papel

Duplicar
Crear reto Crear reto
Imprimir PDF
Sobre Completar frases
tecnologías de la información y comunicación 4º - bachillerato Edad recomendada: 16 años
0 veces realizada

Creada por

Isaías A. Cuá Dubón
Isaías A. Cuá Dubón
Guatemala

Top 10 resultados

Todavía no hay resultados para este juego. ¡Sé el primero en aparecer en el ranking! Inicia sesión para identificarte.
Crea tu propio juego gratis desde nuestro creador de juegos
Crear completar frases
Compite contra tus amigos para ver quien consigue la mejor puntuación en esta actividad
Crear reto

0 Comentarios

Inicia sesión para escribir un comentario.

Top juegos

  1. tiempo
    puntuacion
  1. tiempo
    puntuacion
tiempo
puntuacion
tiempo
puntuacion
Has superado el número máximo de juegos que puedes imprimir con tu Plan actual.
Para imprimir tantos juegos como quieras, necesitas un Plan Académico o un Plan Comercial.
Obtener Plan Académico

Imprime tu juego

game-icon

Completar

Examen 4a. Unidad

Complete el programa

Isaías A. Cuá Dubón
game-qr
1

Select Case Dim AddItem Caption planeta SelText planeta Caption vbInformation MsgBox Clear Unload End Integer

Private Sub BtnBorrar_Click ( )
Lbl3 . = " "
CboPlaneta .
End Sub

'Buscamos el planeta con un select Case
Private Sub BtnBuscar_Click ( )
planeta As

= CboPlaneta .

Case

1
Lbl3 . = " Mercurio "
" El planeta seleccionado es : Mercurio " , , " El planeta "
Case 2

Case 3
Lbl3 . Caption = " Tierra "

Case 4
Lbl3 . Caption = " Marte "

Case 5
Lbl3 . Caption = " Jupiter "

Case 6
Lbl3 . Caption = " Saturno "

Case 7
Lbl3 . Caption = " Urano "

Case 8
Lbl3 . Caption = " Neptuno "

Case 9
Lbl3 . Caption = " Plutón "

Select
End Sub

Private Sub BtnSalir_Click ( )
Me
End Sub

'Llenamos el combobox con los números
Private Sub UserForm_Activate ( )
CboPlaneta . " 1 "
CboPlaneta . AddItem " 2 "
CboPlaneta . AddItem " 3 "
CboPlaneta . AddItem " 4 "
CboPlaneta . AddItem " 5 "
CboPlaneta . AddItem " 6 "
CboPlaneta . AddItem " 7 "
CboPlaneta . AddItem " 8 "
CboPlaneta . AddItem " 9 "
End Sub

Imprimir PDF