Debes poner anchura cero a la columna que quieras ocultar no al combo
Propiedades > Formato > Ancho de las columnas (p.e. 2,54cm;
0cm)
Supongamos que tienes los siguientes objetos
Menu1 (combo con dos columnas la segunda es la que se multiplicará)
Menu2 (combo idem)
Menu3 (combo idem)
Producto (cuadro de texto)
En Propiedades > Otras > Nombre de cada uno de ellos estan esos nombres.
Para hacer lo que quieres debes hacer que despues de actualizar el combo te calcule el producto, para ello
En el primer combo
Propiedades > Eventos > Despues de actualizar > [Procedimiento de evento]
Luego le das a ...
Te aparecera el editor de módulos con el módulo del formulario cargado con este texto
Código vb:
Ver originalPrivate Sub Menu1_AfterUpdate()
End Sub
repites este paso para cada combo, entre esas dos lineas debes programar tu producto....
Vamos a hacerlo, debajo del ultimo End Sub creamos una funcion para no tener que repetir codigo
Código vb:
Ver originalPrivate Sub Menu1_AfterUpdate()
fproducto
End Sub
Private Sub Menu2_AfterUpdate()
fproducto
End Sub
Private Sub Menu3_AfterUpdate()
fproducto
End Sub
Function fproducto()
Me.producto = Me.Menu1.Column(1) * Me.menu2.Column(1) * Me.menu3.Column(1)
End Function
finalmente como puedes ver llamamos la función en el AfterUpdate de cada combo.
Recuerda darle a grabar del editor de módulos.
No mostrará ningun valor hasta que los tres combos tengan una selección.
Lo de usar una función en este caso parece poco justificado, pero si la sofisticas es aconsejable no tener codigo repetido....
Quim