![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы
![]() |
Поиск в этой теме
![]() |
![]() |
#1 |
Новичок
Джуниор
Регистрация: 11.05.2016
Сообщений: 2
|
![]()
Добрый день!
Уважаемые форумчане подскажите как создать запись в vba для .ControlSource, что бы получилась строка в форме. ="D:\_АРХИВ_" & Left([txtFileName]; Len([txtFileName]) - 4) & "" & [txtFileName] Я запутался в кавычках. Данная конструкция пишет путь к файлу исходя из переменной [txtFileName] Начал так Text0.ControlSource = "=""D:\_АРХИВ_""" Text0.ControlSource = Text0.ControlSource & """ & Left([txtFileName], Len([txtFileName]) - 4) & """ Text0.ControlSource = Text0.ControlSource & """""" '& """ & """ Text0.ControlSource = Text0.ControlSource & """&[txtFileName]""" |
![]() |
![]() |
![]() |
#2 |
Новичок
Джуниор
Регистрация: 11.05.2016
Сообщений: 2
|
![]()
После прохождения кода получается
="D:\_АРХИВ_"" & Left([txtFileName], Len([txtFileName]) - 4) & """"&[txtFileName]" как убрать лишние кавычки на начальном этапе кода Двойные изменить на одинарные и в конце строки убрать иначе не работает строка |
![]() |
![]() |
![]() |
#3 | |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,371
|
![]() Цитата:
Это в какой версии VBA? Если нет, то переменная txtFileName имеет строковое значение или или эта строка и есть имя файла?
Как-то так, ...
|
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Задать начальное значение полю объекта | Kronos913 | Общие вопросы Delphi | 3 | 11.02.2022 01:41 |
Рассчитать итог по вычисляемому полю | Podolsky | Microsoft Office Access | 0 | 25.07.2019 12:31 |
Сортировка по вычисляемому полю | azzzazzzelDEAN | БД в Delphi | 16 | 20.12.2013 23:24 |
Установить значение полю связи | Xaenar | БД в Delphi | 1 | 21.02.2012 01:59 |
Как задать border определенному полю? | makar3000 | Общие вопросы Delphi | 4 | 03.05.2011 23:09 |