преобразование массива в строку и наоборот
У меня есть byte массив мне нужно его преобразовать в cтроку и потом назад в массив. Каким образом это можно сделать??
Function Convert(ByVal Array As Variant) As String
Dim l as Long
For l = LBound(Array) to UBound(Array)
Convert = Convert & Chr$(Array(l))
Next l
End Function
ну и наоборот.
Цитата:
Originally posted by USA-Lesh
Написать процедуру преобразования типа:
Function Convert(ByVal Array As Variant) As String
Dim l as Long
For l = LBound(Array) to UBound(Array)
Convert = Convert & Chr$(Array(l))
Next l
End Function
ну и наоборот.
Написать процедуру преобразования типа:
Function Convert(ByVal Array As Variant) As String
Dim l as Long
For l = LBound(Array) to UBound(Array)
Convert = Convert & Chr$(Array(l))
Next l
End Function
ну и наоборот.
------------------------
Если уточнить то выйдет следующее:
Есть байтовый массив, который содержит цифровые представления символов, мне нужно записать его в Access базу а потом его считать обратно в массив.
Вот собственно, что требуется. Я хотел это сделать без лишних преобразований символов в буквы и назад, так как в проге очень важна производительность
А откуда берешь массив, из файла? Может есть возможность не использовать массив, а сразу строку? Другого преобразования из массива в строку вроде нет.
Преобразование символ <=> код символа и объединение двух строк - очень быстрые операции с точки зрения производительности (ведь это в сущности просто перемещение данных из одной ячейки памяти в другую).