Crear un Blog

Fecha: Agosto 11 de 2013

Asignatura: Tecnología e Informática.

Formación en Valor: Responsabilidad

Núcleo Integrador: Creación y Configuración de un Blog.

Objetivo: Crear, Configurar y  aplicar diseños  a un Blog.

Presione Clic para ir al enlace Crear un Blog

Taller Practico.

Fecha: Noviembre 21 de 2012

Asignatura: Tecnología e Informática.

Formación en Valor: Responsabilidad.

Núcleo Integrador: Taller Practico.

Objetivo: Desarrollo de actividades para afianzar conocimientos.

Teniendo en cuenta el siguiente enlace:
Clic para ver los pasos para crear Diapositivas y Publicarlas en la Web
Donde se explica como crear una presentación, desarrolle una presentación que explique un tema libre y publica la presentación:

Un mensaje para esta nueva etapa que comienzan en sus vidas:

Caminante no hay camino, se hace camino al andar.

Sigue intentando hasta que tengas éxito.

Mi felicidad consiste en que se apreciar lo que tengo y no deseo con exceso lo que no tengo.

Feliz Navidad y prospero Año Nuevo!!!

Crear Diapositivas en la Web y Publicarlas

Fecha: Noviembre 15 de 2012

Asignatura: Tecnología e Informática.

Formación en Valor: Responsabilidad.

Núcleo Integrador: Compartir archivos en la web.

Objetivo: Crear crear diapositivas en la Web.

Clic para ver los pasos para crear Diapositivas y Publicarlas en la Web

Compartir archivos en la web

Fecha: Noviembre 2 de 2012

Asignatura: Tecnología e Informática.

Formación en Valor: Responsabilidad.

Núcleo Integrador: Compartir archivos en la web.

Objetivo: Crear documentos con aplicaciones en línea.

Pasos para crear un documento en línea

Entradas en un Blog

Fecha: Octubre 5 de 2012

Asignatura: Tecnología e Informática.

Formación en Valor: Tolerancia.

Núcleo Integrador: Entradas en un Blog.

Objetivo: Adicionar información a un Blog.

Taller: 
Teniendo en cuenta el Núcleo anterior, donde se explica la creación, configuración y Nueva Entrada a un Blog, desarrolle un Blog que contenga 2 entradas las cuales deben contener texto que explique cada tema y una imagen del tema a tratar.
Nombre del Blog:
tecnoinfoCursoNroLista
Ejemplo: 
tecnoinfo11A01 = Este es el nombre del Blog de la primera estudiante de 11A

 - Primera Entrada explique los Valores Eucarísticos.
 - Segunda Entrada como usted aplica esos valores en su vida.

Notas:

* Taller no entregado a tiempo se le califica con un 50% menos al momento de la entrega.

* Les recuerdo los valores Eucarísticos son:
Trascendencia.

Autonomía.

Alegría.

Libertad.
Tolerancia.
Responsabilidad.
Liderazgo.

*** Cada entrada es una Nota.***

Creación y Configuración de un Blog.

Fecha: Agosto 11 de 2013

Asignatura: Tecnología e Informática.
Formación en Valor: Responsabilidad
Núcleo Integrador: Creación y Configuración de un Blog.
Objetivo: Crear, Configurar y  aplicar diseños  a un Blog.

Blog: Un weblog o bitácora es la forma más fácil de crear y actualizar una página Web.

Los weblogs, blogs o bitácoras son el fenómeno de mayor actualidad en la Red. Se trata de sitios web donde se recopilan cronológicamente mensajes de uno o varios autores sobre una de terminada temática a modo de diario personal.

Las bitácoras han conseguido que la publicación de contenidos en la Red esté al alcance de cualquier internauta. Y es que existen varios servicios gratuitos con herramientas sencillas que permiten poner un weblog en marcha en menos de cinco minutos, sin ningún conocimiento previo.

Básicamente, un Blog no es más que un espacio personal de escritura en Internet en el que su autor publica artículos o noticias (post) que pueden contener texto, imágenes e hipervínculos. Los nuevos contenidos se añaden vía web desde el propio navegador y sin necesidad de ningún otro programa auxiliar.

Están pensados para utilizarlos como una especie de diario on line que una persona usa para informar, compartir, debatir periódicamente de las cosas que le gustan e interesan.

Pasos para crear un Blog en Blogger

1. Entre a su cuenta de gmail

2. En versiones anteriores aparecía la Barra de Google y debia Seleccionar Más y luego Blogger

Actualmente, esta el botón aplicaciones y luego seleccione el Botón Blogger.

3. En algunas ocasiones nos pide la contraseña nuevamente, debemos digitar e iniciar sesión (Por lo general esto se presenta cuando no tenemos blogs creados).

4. Si es la primera vez nos dan la bienvenida a Blogger con esta pantalla:

Actualice su perfil si desea o le da clic en Continuar en Blogger

5. Crear Una entrada o Ver Blog

Se puede visualizar como esta el Blog hasta el momento o comenzar a escribir información en una Nueva Entrada.

6. Crear un Nuevo Blog

6.1. Titulo: Escriba su nombre, ejemplo: Diana Ferreira Dean. 

6.2. Escribir la dirección web del blog. Recuerde que al nombre asignado es único y será la forma de acceso a su Blog. Ejemplo: profe_euca_diana.
Al momento de acceder al blog recuerde que se adicionan la siguiente extensión: profe_euca_diana.blogspot.com

6.3. Es importante que seleccione la plantilla, la cual le da presencia a su Blog.

6.4. Clic en crear el Blog.

7. Opciones del Blog

8. Nueva Entrada

Taller:
Desarrolle un Blog con las siguientes características:


1. Nombre del Blog: profe_euca_su_nombre
Ejemplo:

• profe_euca_diana : Este blog es de la profesora del Eucarístico Diana
• profe_euca_betsauro : Este blog es del profesor del Eucarístico Betsauro.

2. Contenido o Entrada: el blog debe explicar un tema correspondiente a su área, debe tener imágenes, borrar los enlaces y resaltar los títulos y subtitulos  Si utiliza material de Internet debe especificar el sitio web de donde obtuvo la información.


Tenga en cuenta:

Para insertar imágenes  utilice este botón de la barra de herramientas para entradas, al presionar clic sobre este botón nos aparece la ventana siguiente la cual le permite buscar una imagen almacenada en el disco del computador (se supone que usted debe buscar la imagen en Internet y descargarla en su computador) e insertarla en el lugar donde se encuentra el cursor.

Luego de  elegir el archivo de imagen, debe dar clic en el botón "Añadir las imágenes seleccionas".


Borrar enlaces copiados:
Al copiar información de Internet encontramos que en muchas ocasiones esta contiene enlaces o vínculos a otras páginas, esta palabras están en color azul, para eliminar estos enlaces debe ubicarse sobre la palabra que contiene el enlace y nos aparece una lista de opciones de las cuales debemos seleccionar eliminar. Ejemplo:

Crear enlaces a otras páginas:
En la barra debe dar clic sobre el botón enlace: 
Este botón le permite añadir o eliminar un enlace existente.



Al dar clic sobre el botón enlace nos aparece la siguiente ventana:

Tenga en cuenta:

• En la opción texto para mostrar, usted debe escribir el texto que desea aparezca en el blog. Ejemplo: Buscardo
• En la opción dirección web, usted debe escribir la dirección de la página que desea mostrar al dar clic sobre la palabra que escribio en la anterior opción. Ejemplo: www.google.com

Note que en el blog se mostrara Buscador y al dar clic se mostrara la pagina de Google

Cambiar la Fuente o tipo de letra: utilice el botón Fuente

Recuerde que si el texto esta escrito usted debe primero seleccionarlo (Clic sostenido sobre el texto).

Tamaño de fuente: utilice el botón tamaño de fuente, nos ofrece tamaños definidos como son:

Nota Importante
Cuando copiamos información de un sitio web o página web, por lo generar también se copian elementos como el color de la letra el fondo y otras características las cuales llamamos FORMATO, para eliminar formato "OJO NO EL TEXTO", seleccionamos el texto que tiene el fondo o tipo de letra que NO deseamos y le damos clic al botón ELIMINAR FORMATO.

De forma inmediata aparece el texto con el formato básico, después debemos aplicar el formato deseado. 

Núcleos Integradores IV Periodo.

Eje Curricular: Contenidos Libres.

Estándar de desempeño:
Valoro e identifico las herramientas de Internet como medio de aprendizaje, apoyo y comunicación.

Núcleos Integradores IV Periodo

• Contenidos libres (Blogs).
• Configuración de un Blog.
• Entradas en un Blog.
• Compartir archivos en la web.

Menús

Fecha: 11B Septiembre 14 de 2012
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad
Núcleo Integrador: Menús.
Objetivo: Crear lista de opciones para un formulario.


Editor de Menús

Permite crear un menú









Modelo de Menús

Taller: Consulte cómo crear Menús en Visual Basic 6.0 y desarrolle un un ejemplo.

Control Timer

Fecha: 11B Septiembre 7 de 2012
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad
Núcleo Integrador: Control Timer.
Objetivo: Programar el control de Tiempo


Control Timer
Este control de activa por intervalo de tiempo.

Sus propiedades son:
Interval: Especifica el intervalo de tiempo en que se activa el control.


Objetos que deben agregar al formulario:

Control Timer

Label

Image

Adicione:

2 Control Timer

1 Label

1 Image

Debe quedar el formulario Así:

Grabe el Formulario y el Proyecto en una carpeta y copie estas 8 imágenes a esa misma carpeta: Deben tener el Nombre:

Caballo1.jpg, Caballo2.jpg, Caballo3.jpg, Caballo4.jpg, Caballo5.jpg, Caballo6.jpg, Caballo7.jpg, Caballo8.jpg, 

Luego copie el código y ejecute el programa.

Private Sub Form_Load()
  'Indica el intervalo de tiempo, 100 milésimas de segundo
  Timer1.Interval = 100
  
  Timer2.Interval = 100
  
  'Ancho y alto del formulario
  Me.Width = 16000
  Me.Height = 10000

  'ubica el formulario arriba
  Me.Top = 0
  
  'Cambia el tipo de letra, su tamaño
  Label1.Font.Name = "Magneto"
  Label1.Font.Size = 100

  'Auto ajusta el Label al tamaño de la letra
  Label1.AutoSize = True
  
End Sub

Private Sub Timer1_Timer()
  'Muestra la hora en el Label
  Label1 = Time
End Sub

Private Sub Timer2_Timer()
  'Se declara la Variable entera y Static es para que conserve el valor.
  Static Numero As Integer

  'Aumenta el valor de 1 en 1
  Numero = Numero + 1

  'Muestra la imagen 
  Image1.Picture = LoadPicture(App.Path + "\caballo" + Trim(Str(Numero)) + ".jpg")
  If Numero = 8 Then
    Numero = 0
  End If
End Sub

Taller - ComboBox y ListBox

Fecha: 11B Agosto-31-2012
Asignatura: Tecnología e Informática.
Formación en Valor: Libertad
Núcleo Integrador: Taller - ComboBox y ListBox.
Objetivo: Aplicar lista de opciones a un programa.

Taller - ComboBox y ListBox

Teniendo en cuenta los talleres anteriores de ComboBox y ListBox, desarrolle un programa que tenga las siguientes características:

Combo para Regiones (Caribe, Pacifico, Amazonia, Orinoquia, Andina, Insular), al seleccionar una región debe aparecer los municipios que la conforman.

ListBox

Fecha: 11B Agosto-24-2012
Asignatura: Tecnología e Informática.
Formación en Valor: Libertad
Núcleo Integrador: ListBox .
Objetivo: Utilizar listas de opciones en un programa.

ListBox:  Este objeto nos permite mostrar una lista de opciones 


Ejercicio Diseña el siguiente formulario:

Copia el siguiente código y muestra el resultado con F5.

Dim x As Integer
Private Sub Command1_Click()
 If List1.ListIndex = -1 Then
   MsgBox "Seleccione el elemento", vbInformation, "ListBox"
 Else
   List2.AddItem List1.Text
   List1.RemoveItem List1.ListIndex
 End If
End Sub

Private Sub Command2_Click()
 If List1.ListIndex = -1 Then
   MsgBox "Seleccione el elemento", vbInformation, "ListBox"
 Else
   For x = 0 To List1.ListCount
     List2.AddItem List1.List(x)
   Next x
   List1.Clear
 End If
End Sub

Private Sub Command3_Click()
If List2.ListIndex = -1 Then
   MsgBox "Seleccione el elemento", vbInformation, "ListBox"
 Else
   List1.AddItem List2.Text
   List2.RemoveItem List2.ListIndex
 End If
End Sub

Private Sub Command4_Click()
 If List2.ListIndex = -1 Then
   MsgBox "Seleccione el elemento", vbInformation, "ListBox"
 Else
   For x = 0 To List2.ListCount
     List1.AddItem List2.List(x)
   Next x
   List2.Clear
 End If
End Sub

Private Sub Form_Load()
  List1.AddItem "ELEMENTO 1"
  List1.AddItem "ELEMENTO 2"
  List1.AddItem "ELEMENTO 3"
  List1.AddItem "ELEMENTO 4"
End Sub

Taller: 
Teniendo en cuenta el ejercicio anterior, desarrolle un programa que permita realizar una venta de diferentes artículos.
Utilice el mismo código pero cambie los nombres de los artículos a vender (List1) y cuando de clic sobre la lista debe agregar este código

Private Sub List1_Click()

  Select Case List1.ListIndex
    Case 0
      Label1 = 100
    Case 1
      Label1 = 200
    Case 2
      Label1 = 150
    Case 3
      Label1 = 500
  End Select
End Sub

Al agregar un elemento adicione este código:
Label2 = Val(Label2) + Val(Label1)

NOTA: Note que debe adicionar dos Label (Label1 y Label2)

ComboBox

Fecha: 17-Ago-2012
Asignatura: Tecnología e Informática.
Formación en Valor: Libertad
Núcleo Integrador: ComboBox
Objetivo: Programar las listas desplegables.

COMBOBOX
Permite crear listas desplegables.

Agregue 2 comboBox al Formulario
y escriba el siguiente código



Private Sub Combo1_Click()
  Combo2.Clear
  Select Case Combo1.ListIndex
    Case 0
      Combo2.AddItem "CARTAGENA"
      Combo2.AddItem "TURBACO"
    Case 1
      Combo2.AddItem "BARRANQUILLA"
      Combo2.AddItem "BARANOA"
    Case 2
      Combo2.AddItem "SANTA MARTA"
      Combo2.AddItem "CIENAGA"
  End Select
End Sub

Private Sub Form_Load()
  Combo1.Clear
  Combo2.Clear
  Combo1.AddItem "BOLIVAR"
  Combo1.AddItem "ATLANTICO"
  Combo1.AddItem "MAGDALENA"
End Sub

Presione F5 y pruebe el programa.

TALLER.
Desarrolle un ejercicio donde aplique lo aprendido con 2 COMBOBOX

Manejo de Unidades de disco, carpetas y archivos.

11B:
Fecha:  Agosto 10 de 2012
Asignatura: Tecnología e Informática.
Formación en Valor: Libertad.
Núcleo Integrador: Manejo de Unidades de disco, carpetas y archivos.
Objetivo: Programar la exploración de unidades y carpetas.


Manejo de Unidades de disco, carpetas y archivos.

Visual Basic 6.0 le permite con una serie de objetos explorar las unidades de disco y mostrar los archivos que contengan las unidades de disco o carpetas.


Objetos a Utilizar:

DriveListBox: Muestra una lista de las unidades de disco del computador como son: Discos duros, USB, CD, etc.


DirListBox: Permite explorar las carpetas, mostrando las subcarpetas que estas contengan.


FileListBox: Muestra los archivos contenidos en una unidad de disco o carpeta.


Image: Muestra imágenes contenidas en el disco.


Taller:

Realice el siguiente diseño de formulario con los objetos anteriores:
Nota: al objeto Image debe cambiarle la propiedad Stretch a TRUE, para que se ajuste al tamaño del objeto cuando se muestra la imagen.

Debe copiar el siguiente código:

'La comilla sencilla al frente del código indica que es un comentario.

'Muestra los archivos al cambiar la carpeta.

Private Sub Dir1_Change()

  File1.Path = Dir1.Path

End Sub

'Al cambiar la unidad de disco muestra que carpetas contiene.

Private Sub Drive1_Change()

  Dir1.Path = Drive1.Drive

End Sub

'Muestra la imagen al dar un clic sobre el archivo de imagen.

Private Sub File1_Click()

  Image1.Picture = LoadPicture(File1.Path + "\" + File1.FileName)

End Sub

'Al momento de mostrar el formulario le indica al objeto FileListBox 

' que muestre solo los tipos de archivos jpg, bmp y gif 

Private Sub Form_Load()

  File1.Pattern = "*.jpg; *.bmp; *.gif"

End Sub

Ejecute el programa presionando la tecla F5 y explore el disco en busca de imágenes.

OptionButton

Fecha: Agosto 1 de 2012
Asignatura: Tecnología e Informática.
Formación en Valor: Libertad.
Núcleo Integrador: OptionButton
Objetivo: Manejo de opciones con botones.

OptionButton
Nos permite trabajar con una serie de opciones donde se puede seleccionar una sola opción.
Como por ejemplo:
Genero(Masculino, Femenino).
Empleado(Nuevo, Antiguo).
Tipo Articulo(Grande, Mediano, Pequeño).
etc.
En las anteriores opciones solo se puede seleccionar una opción.
OptionButton

Este objeto se le cambia la propiedad Caption.

La propiedad Value, puede tener dos valores que son:

TRUE  activado.

FALSE desactivado.

Desarrolle el siguiente formulario:

TEXTBOX (TEXT): borre la propiedad Text.

LABEL: Cambie la propiedad Caption por el texto mostrado.

OPTIONBUTTON (OPTION): Cambie la propiedad Caption por el texto mostrado.

COMMANDBUTTON (COMMAND): Cambie la propiedad Caption.

El programa siguiente debe calcular:

Transporte:

Empleados Nuevos 50.000

Empleados Antiguos 70.000

Total a Pagar: Suma de Salario + Transporte 

Para calcular la anterio doble CLIC sobre el botón CALCULAR.

Copie el siguiente código:

Private Sub Command1_Click()

  If Option1.Value = True Then

    Text3 = 50000

  ElseIf Option2.Value = True Then

    Text3 = 70000

  Else

    MsgBox "Debe Seleccionar el tipo de Empleado"

    Text3=0

    Text4=0

    Exit sub

  End If

  Text4 = Val(Text2) + Val(Text3)

End Sub.

PRUEBA EL FUNCIONAMIENTO DEL PROGRAMA ASÍ: 

Presione F5 e introduzca el NOMBRE y el SALARIO, seleccione el TIPO EMPLEADO  y presione el botón CALCULAR.

Taller:

Desarrolle un programa que capture:

Nombre Empleado

Valor Venta

Total Venta

Mostrar tres botones de opciones que tenga(PEQUEÑO, MEDIANO, GRANDE)

Se debe calcular el DESCUENTO en el botón CALCULAR, ASÍ:

PEQUEÑO: 10% VALOR VENTA

MEDIANO: 15 % VALOR VENTA

GRANDE: 20% VALOR VENTA.

NOTA1: para calcular el valor del descuento es así: 

TEXT3= VAL(TEXT2) * 10 / 100 si es PEQUEÑO

TEXT3= VAL(TEXT2) * 15 / 100 si es MEDIANO

TEXT3= VAL(TEXT2) * 20 / 100 si es GRANDE

NOTA2: para calcular el valor del Total Venta es así: 

TEXT4= VAL(TEXT2) - VAL(TEXT3)

CheckBox

Inicio III Periodo:

Ejes Curriculares: Programación de los controles básicos y desarrollo de Software                                     

                             didáctico.

Núcleos Integradores III Periodo:

• ChecBox.
• OptionButton. 
• Manejo de Unidades de disco, carpetas y archivos. 
• ComboBox. 
• ListBox. 
• Control Timer. 
• Menús. 
• Crear Software Didáctico.

=================================================================

Fecha: Julio 13 de 2012

Asignatura: Tecnología e Informática.

Formación en Valor: Alegría.

Núcleo Integrador: CheckBox

Objetivo: Manejo de opciones con Casillas de Verificación.

CheckBox: también conocidas como Casillas de Verificación, nos permite establecer una lista de opciones, de las cuales podemos seleccionar ninguna, una, algunas o todas.

Son opcionales.

Estos objetos trabajan con la propiedad Value:

Si tiene el valor de 1 indica que fue seleccionada.

Si tiene el valor de 0 indica que No se ha seleccionado.

Ejemplo:

Adicione un CHECKBOX  al formulario.

Cámbiele la propiedad  Caption por: “Esta Inactivo “

Doble clic sobre el CheckBox

Escriba el siguiente código sobre el evento Clic

Private Sub Check1_Click()

  If Check1.Value = 0 Then

     Check1.Caption = "Esta Inactivo"

  ElseIf Check1.Value = 1 Then

     Check1.Caption = "Esta Activo"

  End If

End Sub

Ejecute el programa presionando F5

Taller para 11A:

Desarrolle un ejercicio que aplique lo aprendido, de la siguiente forma:

Incorpore un  CheckBox al Formulario que tenga en la propiedad Caption IVA, al Activarlo que Sume el IVA y que al Desactivarlo lo Reste.

Nota: utilice dos cuadro de texto que tenga el Valor Venta y otro el Valor IVA.

Recuerde que el IVA es el 16% de la Venta.

1. DISEÑO DEL FORMULARIO, DEBE TENER LAS SIGUIENTES CARACTERÍSTICAS:

Para obtener el anterior diseño tenga en cuenta:
a. Los LABEL se les cambia la propiedad CAPTION..
b. Los TEXT se les debe borrar la propiedad TEXT, para que no muestren texto.
c. Los CHECKBOX se les cambia la propiedad CAPTION.
d. Los COMMANDBUTTON se les cambia la propiedad CAPTION.

2. Programar el botón CALCULAR.
  a. Doble Clic sobre el botón CALCULAR  y escribir el siguiente código:
Private Sub Command1_Click()
  If Check1.Value = 1 Then
    Text2 = Val(Text1) * 16 / 100
  Else
    Text2 = 0
  End If
  Text3 = Val(Text1) + Val(Text2)
End Sub

EJECUTE EL PROGRAMA CON F5

El usuario debe escribir el valor venta.
Si la venta tiene IVA, activar la casilla.
Clic en el botón CALCULAR.

Taller 10º - Funciones de Búsqueda

Grado: 10

Fecha: Junio 14 de 2012

Asignatura: Tecnología e Informática.

Formación en Valor: Alegría.

Núcleo Integrador: Taller Funciones de Búsqueda

Objetivo: Aplicar las funciones de Búsqueda en Excel.

Función BuscarV: Nos permite buscar un valor en un rango de celdas y devolver el valor de la columna paralela al valor encontrado.

Ejemplo:

Desarrolle la siguiente hoja

Después de escribir todo los datos en la hoja:

En la celda B8 debe escribir el código que desea buscar, si escribe un código mayor que el número de la lista siempre mostrara el último.

Taller:

Teniendo en cuenta el ejemplo anterior, desarrolle una hoja de cálculo que contenga los siguientes datos:

Código Artículo, Nombre Artículo, Valor Unidad, Existencia.

Debe crear una función que permita mostrar con solo digitar el código del artículo, el nombre del artículo, Valor unidad y la existencia.

Nota: El ejemplo y el taller son la primera nota del tercer periodo. cada uno tiene un valor del 50% de la nota.

Fecha: Junio 8 de 2012

Asignatura: Tecnología e Informática

Formación en Valor: Alegría.

Núcleo Integrador: Eventos LostFocus y GotFocus.

Objetivo: Programar salida y entrada del Cursor.

Desarrollo:

GotFocus: es un evento que ocurre al momento de caer el cursor sobre un objeto.

LostFocus: es un evento que ocurre al momento de salir el cursor.

En la pantalla de Visual Basic 6.0 agregar al formulario 2 cuadros de textos.

Debe agregar 2 cuadros de textos y un Boton de Comando CommandButton 

El formulario queda de la siguiente forma:

Borrar la propiedad Text, para que los cuadros de textos queden en blanco.

Recuerde seleccionar el cuadro de texto (Con un Clic sobre el cuadro) para que se muestren las propiedades y Borrar la propiedad Text.

Muestre la ventana Formulario (Form)

Aparece el siguiente código

Private Sub Text1_Change()

End Sub

Debe cambiar al Evento LostFocus

Escriba el siguiente código, que valida que tenga información el cuadro de texto, si no tiene información no deja salir el cursor del cuadro de texto.

Private Sub Text1_LostFocus()

  If Text1 = "" Then

    MsgBox "Escriba un dato"

    Text1.SetFocus

  End If

End Sub

Luego debe realizar lo mismo Doble Clic sobre el botón de comando COMMAND1 y seleccionar el evento GotFocus y escribir el siguiente código:

Private Sub Command1_GotFocus()

If Text2 = "" Then

    MsgBox "Escriba un dato"

    Text1.SetFocus

  End If

End Sub

Ejecute el programa y pruebe, la salida del cursor sin escribir datos.