Доброго времени суток!
cdMyDialog.ShowOpen
Files = cdMyDialog.FileName
FilesName = Array(Split(Files, ""))
Какой разделитель должен быть у Split(), если Files строчка со всеми выбранными файлами из cdMyDialog.ShowOpen (в названиях файлов есть пробелы). На квадратик, скопированный через клиборд, Split() не реагирует.
Помогите, а то ботва какая-то получается.
Разделитель у Split()
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 4
• Страница 1 из 1
- alex78
- Начинающий
- Сообщения: 9
- Зарегистрирован: 19.11.2003 (Ср) 12:40
- Откуда: Санкт-Петербург
Разделитель у Split()
alex78 » 24.11.2003 (Пн) 20:38
- gaidar
- System Debugger
- Сообщения: 3152
- Зарегистрирован: 23.12.2001 (Вс) 13:22
gaidar » 24.11.2003 (Пн) 20:45
Код символа надо использовать, а не вставлять квадратик, который, между прочим, может означать какой-то другой символ.
- Код: Выделить всё
Chr(SYMBOL_CODE)
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali
- alex78
- Начинающий
- Сообщения: 9
- Зарегистрирован: 19.11.2003 (Ср) 12:40
- Откуда: Санкт-Петербург
alex78 » 24.11.2003 (Пн) 21:14
А как в данном контексте определить код символа?
C = Mid(Files, 32, 1)
Ch = Chr(C)
Такой способ не помогает:
C = Mid(Files, 32, 1)
C = Asc(C)
C = Chr(C)
FilesName = Array(Split(Files, "C"))
ANSI код "0", a после C = Chr(C) - С снова квадратик
C = Mid(Files, 32, 1)
Ch = Chr(C)
Такой способ не помогает:
C = Mid(Files, 32, 1)
C = Asc(C)
C = Chr(C)
FilesName = Array(Split(Files, "C"))
ANSI код "0", a после C = Chr(C) - С снова квадратик
- Vi
- Постоялец
- Сообщения: 739
- Зарегистрирован: 25.01.2002 (Пт) 11:03
- Откуда: Россия, Ижевск
Vi » 25.11.2003 (Вт) 7:55
FilesName = Array(Split(Files, vbNullChar))
или
FilesName = Array(Split(Files, Chr(0)))
PS
ИМХО, Array здесь лишнее: Split уже возвращает массив.
или
FilesName = Array(Split(Files, Chr(0)))
PS
ИМХО, Array здесь лишнее: Split уже возвращает массив.
Vita
Выше головы не прыгнешь, ниже земли не упадешь, дальше границы не убежишь! (с) КВН
Выше головы не прыгнешь, ниже земли не упадешь, дальше границы не убежишь! (с) КВН
Сообщений: 4
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7