Visual Basic - Combobox uso Matematico

Hola, de antemano muchas gracias a la persona que me ayude con lo siguente:
Tengo un combobox el cual lo estoy usando con numeros enteros cargados en el del 1 al 5. La idea es que el usuario elija entre esos numeros, la eleccion que el usuario realice debe multiplicarce por un valor númerico entero (que es un precio de un producto) al realizar esta operacion me da un error por que no coinciden los tipos. La pregunta es como hacer esta multiplicación de terminos.

dim n as numeric
dim total as double

n= VAL(combobox1.text)

total = cdbl(n) * cdbl(precio)

el precio es el precio x el cual deseas multiplicar

Muchas gracias por la informacion voy a ver si funciona