| |
 27 Кб. |
|
| | Добрый вечер!
Прошу Вас помочь разобраться в ситуации. Моя проблема заключается в следующем: как убрать пробелы между кавычек? C пробелами в строке функции Trim, LTtim, RTrim, Replace всё ясно. Кавычки в Visual Basic используют ASCII-символ (34). Но как это завернуть и во что?
В графике поля Field 2-это то, что мне нужно.
За ранее блогадарю | |
| |
| |
| |
10 Кб. |
|
| | + mdb | |
| |
| |
| |
|
|
| |
Public Function ClearText(s As String) As String
Dim arr
arr = Split(s, Chr(34))
If UBound(arr) = 2 Then
arr(0) = Trim(arr(0))
arr(1) = Trim(arr(1))
ClearText = arr(0) & Space(1) & Chr(34) & arr(1) & Chr(34)
End If
End Function
|
| |
| |
| |
| |
40 Кб. |
|
| | Добрый день,
Что то не так прикрутил? | |
| |
| |
| |
|
|
| | Объяснить причину не смогу, переименовал модуль ClearText на ModulClearText, все заработало, Lukas, Спасибо! | |
| |
| |
