| Вопрос: Строку из текст.файла в Label в др.формате | Добавлено: 11.08.08 22:43 |
Автор вопроса:  An
|
|
Строку из текстового файла в Label понятно как
вставить. Но, не получается как-то переставить символы - неужели только через массив? Пример: 08/30/2008 19:52 - в текстовом файле в 30.08.2008 - в Label (и обрезать время) |
| Ответы | Всего ответов: 10 |
|
Номер ответа: 1 Автор ответа:    Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #1 | Добавлено: 11.08.08 23:23 |
|
label1.caption = format$(text1.text, "dd.mm.yyyy"
 |
||
|
Номер ответа: 2 Автор ответа: ArtyomРазработчик Вопросов: 130 Ответов: 6602 |
Профиль | | #2 | Добавлено: 13.08.08 07:16 |
| В рот мне ноги! Ты же говорил что уехал от нас! | ||
|
Номер ответа: 3 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #3 | Добавлено: 13.08.08 12:46 |
| Факмаймоск! Я же говорил, что вернулся к вам! | ||
|
Номер ответа: 4 Автор ответа: ArtyomРазработчик Вопросов: 130 Ответов: 6602 |
Профиль | | #4 | Добавлено: 14.08.08 07:05 |
| Ну ты уже определись все-таки. Ты УЕХАЛ или ВЕРНУЛСЯ? Народ ведь вводишь в заблюждение, и меня тоже. | ||
|
Номер ответа: 5 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #5 | Добавлено: 14.08.08 11:56 |
| Решено. Я вернулся. | ||
|
Номер ответа: 6 Автор ответа: An Вопросов: 4 Ответов: 11 |
Профиль | | #6 | Добавлено: 15.08.08 21:47 |
|
Сделал примерно так:
Dim a(9) As Char
Dim b(9) As Char Dim fileReaderELS As String fileReaderELS = My.Computer.FileSystem.ReadAllText("C:\Temp\ELS.log"
a = fileReaderELS b(0) = a(3) b(1) = a(4) b(2) = Char.Parse("."
b(3) = a(0) b(4) = a(1) b(5) = Char.Parse("."
b(6) = a(6) b(7) = a(7) b(8) = a(8) b(9) = a(9) fileReaderELS = b Label1.Text = fileReaderELS Вот так не получается: label1.caption = format$(text1.text, "dd.mm.yyyy"
Только вот вопрос, как правильнее заменить слэш? в 08/30/2008 работает и так: b(2) = Char.Parse("."
и так: b(2) = ("."
|
||
|
Номер ответа: 7 Автор ответа: ArtyomРазработчик Вопросов: 130 Ответов: 6602 |
Профиль | | #7 | Добавлено: 15.08.08 22:37 |
|
Что это за фигня????????????
Вместо Char.Parse("." просто пиши константу "."c (с буквой "c" на конце - компилятор поймет что это Char.
Чем не устраивает Now.ToString("dd.MM.yyyy"
? И кстати MM должны быть большими буквами - это месяц, если маленькими - mm - то это будут минуты. Если на компьютере какие-то хитрые региональные настройки то так: Now.ToString("dd.MM.yyyy", System.Globalization.CultureInfo.InvariantCulture)
|
||
|
Номер ответа: 8 Автор ответа: AnВопросов: 4 Ответов: 11 |
Профиль | | #8 | Добавлено: 19.08.08 01:22 |
|
Внимательнее...
Now.ToString("dd.MM.yyyy" - текущая дата мне не нужна.
1.Я считываю строку из текстового файла - повторюсь: 08/30/2008 19:52 2.Да, это английский формат даты и плюс время 3.Считываю строку из п.1 в массив и перегружаю в другой массив, где меняю месяц и число местами, "обрезаю" время, и заменяю слэши на точки Понятно? |
||
|
Номер ответа: 9 Автор ответа: ArtyomРазработчик Вопросов: 130 Ответов: 6602 |
Профиль | | #9 | Добавлено: 21.08.08 04:18 |
|
Dim Source = "08/30/2008 19:52"
Dim Result = Source.Substring(3, 2) + "."c + Source.Substring(0, 2) + "."c + Source.Substring(6, 4) Console.WriteLine(Result) |
||
|
Номер ответа: 10 Автор ответа: AnВопросов: 4 Ответов: 11 |
Профиль | | #10 | Добавлено: 21.08.08 23:24 |
|
Dim Source = "08/30/2008 19:52"
Dim Result = Source.Substring(3, 2) + "."c + Source.Substring(0, 2) + "."c + Source.Substring(6, 4) Console.WriteLine(Result) Краткость - сестра таланта! Просто красота! Спасибо Steel Brand! P.S. - кода раз в 10 меньше нужно будет |
||
Страница: 1 |