Access - consultas

 
Vista:

consultas

Publicado por sera74 (2 intervenciones) el 22/09/2013 09:41:46
Hola.

Estoy creando una base de datos para un centro de estudios y me encuentro algo atascado en una cuestión

Tengo una tabla en las que hay creado tres campos:

CURSO | HORAS | MENSUALIDAD

Primaria 1º 2 55

Esta tabla es un ejemplo pero mas o menos es así.

Al crear el formulario, el campo CURSO se crea como cuadro combinado despelgable y el campo HORAS como numérico. Hay creado en formularios en cuadro numérico el cual se llama MENSUALIDAD; pues bien, necesito que el cuadro MENSUALIDAD me muestre la misma dependiendo del curso que actualmente se encuentre el alumno y las horas que contrate.

Para dejar zanjada esta Base de datos necesito esta información. GRACIAS

Aaaaaaah se me olvidaba, estoy trabajando con Access2003
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Neckkito
Val: 529
Plata
Ha mantenido su posición en Access (en relación al último mes)
Gráfica de Access

consultas

Publicado por Neckkito (1157 intervenciones) el 22/09/2013 20:40:22
Hola!

Voy a suponer que tienes una tabla TPrecios donde tienes el precio por hora de cada curso, y que ese campo con el precio por hora se llama [PrecioHora]. En esta tabla también habrá un campo que llamaré [NomCurso], con el nombre del curso.

En tu formulario, en el evento "Después de actualizar" de tu campo [HORAS], generas este código:

...
Private Sub...
Dim miPrecio as currency 'Suponiendo que tienes [PrecioHora] definido como moneda
Dim miCurso as string 'Suponiendo que el combo te devuelve un valor tipo texto
Dim misHoras as integer
miCurso=nz(me.CURSO.value,"")
misHoras=nz(me.HORAS.value,0)
If miCurso="" then exit sub
miPrecio=nz(dlookup("PrecioHora","TPrecios","NomCurso='" & miCurso & "'"),0)
miPrecio=miPrecio*misHoras
me.MENSUALIDAD.value=miPrecio
End Sub
...

Saludos,


http://neckkito.siliconproject.com.ar
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar