• Domingo 22 de Diciembre de 2024, 23:09

Autor Tema:  Codigo Para Matriz De Control  (Leído 1701 veces)

sombra_71

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Codigo Para Matriz De Control
« en: Jueves 29 de Julio de 2004, 20:35 »
0
Gracias a quien de seguimiento a mi duda....

Soy novato por lo q espero entiendan el problema.

Alguien me puede explicar como usar botones de control y q cada uno de ellos realice ciertas funciones al ser usados ???

O como usar uno de ellos para la busqueda en una base de datos?..

Gracias de atemano

Jose Arriagada

  • Miembro MUY activo
  • ***
  • Mensajes: 373
    • Ver Perfil
Re: Codigo Para Matriz De Control
« Respuesta #1 en: Jueves 29 de Julio de 2004, 23:59 »
0
1° Inserta en tu form, controles COMMAND y haz doble click sobre ellos.
    Aparecera una ventana de edicion, donde podras colocar el codigo que deseas que el control realice dependiendo del evento que selecciones.

Para que muestre un mensaje al hacer click sobre el

Private Sub Command1_Click()
MsgBox "Mensaje que quiero que aparezca"
End Sub


Para que muestre un mensaje al hacer pasar el mouse sobre el

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.ToolTipText = "Mensaje explicativo del control"
End Sub

2° La busqueda dependera de que tipo de coneccion realizas a la base de datos, y que tipo de base de datos estamos hablando.

sombra_71

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Re: Codigo Para Matriz De Control
« Respuesta #2 en: Viernes 30 de Julio de 2004, 00:49 »
0
Jose Arriaga....

Muy amable con tu respuesta. pero lo q necesito es usarlos con el comando index.... o sea q los botones sean una matriz de control.

Ejemplo.

Si mi botones son el abecedario, si se teclea en A q haga cierta funcion, si se teclea en W haga otra funcion, pero q cada boton sea parte de la matriz de control.

Tengo dificultad en ese especto

La busqueda de bases ya estoy investigando..Agradezco me puedas ayudar en ese aspecto.....del index.

Saludos

Shiquilla

  • Miembro MUY activo
  • ***
  • Mensajes: 188
  • Nacionalidad: es
    • Ver Perfil
    • http://www.songesoft.com
Re: Codigo Para Matriz De Control
« Respuesta #3 en: Viernes 30 de Julio de 2004, 09:07 »
0
Hola sombra_71, para saber qué botón estás pulsando en la matriz de controles, simplemente tienes que mirar el indice de botón que es... de esta forma:

Código: Text
  1. Private Sub Command1_Click(Index As Integer)
  2.     Select Case Index
  3.         Case 0
  4.             MsgBox "Estoy en el primer botón"
  5.         Case 1
  6.             MsgBox "Estoy en el segundo botón"
  7.         Case 2
  8.             MsgBox "Esto es un ejemplo"
  9.     End Select
  10. End Sub
  11.  

Saludos.
« §hÿqµïllæ »

sombra_71

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Re: Codigo Para Matriz De Control
« Respuesta #4 en: Viernes 30 de Julio de 2004, 17:02 »
0
Shiquilla

Te doy las gracias por el tip... lo probare y espero me funcione.

Este codigo tambien sirve si es para buscar en una base de datos? claro q cada boton haga la busqueda, o hay alguna otra manera de resolverlo?

Sombra_71

Shiquilla

  • Miembro MUY activo
  • ***
  • Mensajes: 188
  • Nacionalidad: es
    • Ver Perfil
    • http://www.songesoft.com
Re: Codigo Para Matriz De Control
« Respuesta #5 en: Viernes 30 de Julio de 2004, 17:18 »
0
Hola de nuevo, si va a ser una búsqueda igual pero sólo cambiando un parámetro en la Select podrías hacer una función que haga lo siguiente:

Código: Text
  1. Private Sub Command1_Click(Index As Integer)
  2.    Select Case Index
  3.        Case 0
  4.            Consulta a 'a = Parametro de la funcion
  5.        Case 1
  6.            Consulta b 'b = Parametro de la funcion
  7.        Case 2
  8.            Consulta c 'c = Parametro de la funcion
  9.    End Select
  10. End Sub
  11.  
  12. Private Function Consulta(Parametro As String)
  13.     Dim rs As New ADODB.Recordset
  14.     Dim SQL As String
  15.     SQL = "SELECT Campo FROM Tabla WHERE Clave = '" & Parametro & "'"
  16.     ' todo lo demás
  17. End Function
  18.  

Saludos.
« §hÿqµïllæ »

sombra_71

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Re: Codigo Para Matriz De Control
« Respuesta #6 en: Viernes 30 de Julio de 2004, 20:27 »
0
Shiquilla.

Mil gracias por ayudarme.... pondre en marcha lo q me comentas.

Espero aplicar bien el codigo, espero tengas algun correo para consultarte, claro si tienes el tiempo....

Saludos.

Sombra_71