ник: snipe
вот этот кусок по определению не правильный
z = c & d
k1 = z * 8
k2 = z * 20
k3 = z * 39
|
в данном случае z (так как Variant) после команды & (объединить строки) становится text
текст умножить на 8 нельзя отсюда ошибка - несоответствие данных
так что я не знаю чему равно z
если вы расскажете что вы хотите в конечном итоге получить может быть найдутся и решения вашей проблемы (отличные от ваших) - мне допустим не понятно зачем выдергивать DriveSerial потом их объединять да еще умножать на какие-то числа, к чему такие сложности