SQL Server - Cambiar una Variable tipo Long a Tipo Money

Hola

Tengo un problema con VB cuando trato de ingresar un valor tipo long a un campo tipo money, para mas claridad lo tengo de la siguiente forma
''''''''''''''''''''''inicio'''''''''''''''''''''''''
''''''''''Referencia %Activate data object 6 Library% '''''''''''''''''
Public Conx As ADODB.Connection
Public RsDms As ADODB.Recordset
Public Valor As Long,To as Currency
Valorr=200000
To = Ccur(val)
Set Conx = New ADODB.Connection
Set RsDms = New ADODB.Recordset
Conx.Open "dsn=pruebas"
Set RsDms=Conx.Execute("Insert Tabla (Valor,Nombre VALUES ('"& To &"',"Luis")
'''''''''''''''''''''''''''''''''Fin''''''''''''''''''''

y me presenta que el siguiente error

"Implict Conversion from data type varcha to data type money"

es para una aplicacion que compramos y no se le puede cambiar el campo

Atentamente

Kevin Harnolld Vechara Aguila
ElVirux