Visual Basic.NET - visual .net

si alguien tiene o sabe donde pueda encontrar codigo para hacer un traductor en visual.net le encargo me lo hga saber lo mas pronto posible ya que esoy realizando para mi proyecto de tesis un traductor de lenguaje nativo a sintaxis de motor de base de datos interbase.

Gracias

Mi problema es que tengo un formulario de tipo proveedor al cual lo tengo relacionado con otra tabla "caja" y no se como guardar los datos del formularios ya que tengo un combo el cual muestra el numero de cajas pero como estoy guardando solo dentro de la tabla proveedor aqui lo tengo como id_caja como clave foranea;
aqui te muestro el codigo del boton guardar:
Dim comando1 As New SqlCommand("insert into proveedor values(@id_proveedor,@id_caja,@nombre,@direccion,@telefono,@cedula,@activo,@ciudad,@observacion) ", conexion1)
comando1.Parameters.Add("@id_proveedor", Data.SqlDbType.Int, 4)
comando1.Parameters.Add("@id_caja", Data.SqlDbType.Int, 4)
comando1.Parameters.Add("@nombre", Data.SqlDbType.VarChar, 50)
comando1.Parameters.Add("@direccion", Data.SqlDbType.VarChar, 50)
comando1.Parameters.Add("@telefono", Data.SqlDbType.VarChar, 50)
comando1.Parameters.Add("@cedula", Data.SqlDbType.VarChar, 50)
comando1.Parameters.Add("@activo", Data.SqlDbType.VarChar, 1)
comando1.Parameters.Add("@ciudad", Data.SqlDbType.VarChar, 50)
comando1.Parameters.Add("@observacion", Data.SqlDbType.VarChar, 50)
comando1.Parameters("@id_proveedor").Value = CInt(Me.txt_codigo.Text)
comando1.Parameters("@id_caja").Value = Me.cmb_caja.
comando1.Parameters("@nombre").Value = Me.txt_nombre.Text
comando1.Parameters("@direccion").Value = Me.txt_nombre.Text
comando1.Parameters("@telefono").Value = Me.txt_telefono.Text
comando1.Parameters("@cedula").Value = Me.txt_cedula.Text
comando1.Parameters("@activo").Value = Me.chk_activo.Text
comando1.Parameters("@ciudad").Value = Me.txt_ciudad.Text
comando1.Parameters("@observacion").Value = Me.txt_observacion.Text
conexion1.Open()
comando1.ExecuteNonQuery()

no estoy seguro de lo que estoy haciendo mal
de antemano muy agradecido a su humilde respuesta