Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: string functions in query
 
 автор: Bruno   (03.05.2016 в 21:34)   личное сообщение
27 Кб.
 
 

Добрый вечер!


Прошу Вас помочь разобраться в ситуации. Моя проблема заключается в следующем: как убрать пробелы между кавычек? C пробелами в строке функции Trim, LTtim, RTrim, Replace всё ясно. Кавычки в Visual Basic используют ASCII-символ (34). Но как это завернуть и во что?

В графике поля Field 2-это то, что мне нужно.

За ранее блогадарю

  Ответить  
 
 автор: Bruno   (03.05.2016 в 21:39)   личное сообщение
10 Кб.
 
 

+ mdb

  Ответить  
 
 автор: Lukas   (03.05.2016 в 22:57)   личное сообщение
 
 


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

  Ответить  
 
 автор: Bruno   (04.05.2016 в 10:15)   личное сообщение
40 Кб.
 
 

Добрый день,
Что то не так прикрутил?

  Ответить  
 
 автор: Bruno   (04.05.2016 в 16:53)   личное сообщение
 
 

Объяснить причину не смогу, переименовал модуль ClearText на ModulClearText, все заработало, Lukas, Спасибо!

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList