Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RFpro.ru: Программирование на Basic / VBA


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный платный хостинг на базе Windows 2008

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Чемпионы рейтинга экспертов в этой рассылке

Vasiliy83
Статус: Практикант
Рейтинг: 1036
∙ повысить рейтинг »
Ashotn
Статус: Практикант
Рейтинг: 974
∙ повысить рейтинг »
Megaloman
Статус: Бакалавр
Рейтинг: 871
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И ПО / Программирование / Basic/VBA

Номер выпуска:971
Дата выхода:03.01.2010, 16:00
Администратор рассылки:Калашников О.А., Руководитель
Подписчиков / экспертов:370 / 100
Вопросов / ответов:1 / 2

Вопрос № 175703: Здравствуйте эксперты, вот встала такая проблема: В LisBoks в одну строку добавляется несколько переменных (Номер для примера заказа, Имя клиента , Название заказа) и так как в разных переменных разное количество знаков но визуально в ListBo...



Вопрос № 175703:

Здравствуйте эксперты, вот встала такая проблема:

В LisBoks в одну строку добавляется несколько переменных (Номер для примера заказа, Имя клиента , Название заказа) и так как в разных переменных разное количество знаков но визуально в ListBox это отображается так:

Заказ №: 000001 клиент: Вася пупкин Название заказа: заказ №1
Заказ №: 000002 клиент: Супер Вася Пупкин Название заказа: Партия оружия из тайланда
Заказ №: 000003 клиент: Вася название заказа: президентский заказ

Но это не удобно, возможно ли сделать что бы в ListBox отпображалось так:

Заказ №: 000001 клиент: Вася пупкин Название заказа: заказ №1
Заказ №: 000002 клиент: Супер Вася Пупкин Название заказа: Партия оружия из тайланда
Заказ №: 000003 клиент: Вася Название заказа: президентский заказ


Необходимо выравнить длину переменных.
Пытался ограничивать длину переменных и к переменным у которых не хватае т знаков добавлял нужное количество пробелов, но всё равно очень приблизительное выравнивание

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

Отправлен: 28.12.2009, 17:31
Вопрос задал: Lexap, Посетитель
Всего ответов: 2
Страница вопроса »


Отвечает DrakoN, Практикант :
Здравствуйте, Lexap.
В минифоруме все верно сказали следует использовать ListView и ListViewItem
добавляйте в ваш ListView нужные итемы посрдеством метода Add (new ListViewItem( object[] {коллекция итемов});


-----
От Винта!

Ответ отправил: DrakoN, Практикант
Ответ отправлен: 28.12.2009, 18:04

Оценка ответа: 5

Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 258221 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Вам помогли? Пожалуйста, поблагодарите эксперта за это!
    Отвечает Evgenijm, 10-й класс :
    Здравствуйте, Lexap.

    Вот так можно сделать, чтобы Ваша программа выглядела прилично:
    1 Если в списке контролов нет ListView, добавьте туда Microsoft Windows Common Controls. И поместите его на форму
    2 Установите свойство View в Report
    3 Правой кнопкой на ListView на форме и выберите пункт Properties - откроется большое диалоговое окно.
    4 На вкладке Columns добавьте 3 столбца и установите их текст в Заказ №, Клиент, Название заказа.
    5 Еще желательно отметить свойство FullRowSelect на первой вкладке.
    6 Добавляем строки в таблицу следующим образом:

    Код:
    Private Sub Form_Load()
    Dim L As ListItem
    Set L = ListView1.ListItems.Add(, , "000001")
    L.SubItems(1) = "Вася пупкин"
    L.SubItems(2) = "зака з №1"
    End Sub


    3 последние строчки обычно вставляются в цикл, который заполняет таблицу из массива, файла, БД или еще откуда. Еще есть очень полезное свойство Tag. Там можно сохранить ссылку на исходные данные, чтобы не пришлось мучаться с поиском исходных данных для выбранной строки. В данном случае номер заказа уже ключ, так что использовать его нет необходимости.

    Ответ отправил: Evgenijm, 10-й класс
    Ответ отправлен: 28.12.2009, 20:00

    Оценка ответа: 5

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 258227 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Вам помогли? Пожалуйста, поблагодарите эксперта за это!


    Оценить выпуск »
    Нам очень важно Ваше мнение об этом выпуске рассылки!

    Задать вопрос экспертам этой рассылки »

    Скажите "спасибо" эксперту, который помог Вам!

    Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
    на короткий номер 1151 (Россия)

    Номер ответа и конкретный текст СМС указан внизу каждого ответа.

    Полный список номеров »

    * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
    ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
    *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.


    © 2001-2009, Портал RFpro.ru, Россия
    Авторское право: ООО "Мастер-Эксперт Про"
    Автор: Калашников О.А. | Программирование: Гладенюк А.Г.
    Хостинг: Компания "Московский хостер"
    Версия системы: 2009.6.13 от 28.12.2009

    В избранное