Непонятная проблема с добавлением полей

[berkyt]

У меня есть форма с Поле0, Поле1,Поле и ПолемСоСписком1, когда я выбираю из списка,
то идёт запрос в таб. и я получаю результат
но когда я пытаюсь занести в другую таблицу уже данные из Поле0 и результата запроса, то ругается на несоответсвие типов
вот код:
strsql = "select Норма_расхода from Ведомость_детали where Номер_детали='" + ПолемСоСписком1 + "'"
Set sum = dbs.OpenRecordset(strsql)
Set fld = sum.Fields!Норма_расхода
massa = fld.Value
sqlstr = "INSERT INTO Ведомость_изделий(Номер_изделия,Наименование,Масса,Цена) values('" + Поле0 + "','" + Поле1 + "','" + massa + "','" + Поле3 + "')"
я уже и конвертил cvar и менял поле с числоввого на текстовое и нехотит?
помогите?Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!