Правиш в цикъла проверка на числото. Ако то е едноцифрено му прилепяш отляво "0", ако е двуцифрено го оставяш.
| Микроконтролери и електроника http://mcu-bg.com/mcu_site/ |
|
| Въпрос за VB и ComboBox http://mcu-bg.com/mcu_site/viewtopic.php?f=7&t=7660 |
Страница 1 от 1 |
| Автор: | E1 [ Съб Мар 20, 2010 11:49 am ] |
| Заглавие: | Въпрос за VB и ComboBox |
Необходимо ми е вyw VB да направя десетина ComboBox, в които да се изписва 00,01,02... Първонаално направих цикъл, който да добавя числа, но до 10 ми генерира само по една цифра, а изскам да се вижда двуцифрено. Как може да се изпълни? |
|
| Автор: | darkshy [ Съб Мар 20, 2010 12:12 pm ] |
| Заглавие: | |
Правиш в цикъла проверка на числото. Ако то е едноцифрено му прилепяш отляво "0", ако е двуцифрено го оставяш.
|
|
| Автор: | valioman [ Съб Мар 20, 2010 12:25 pm ] |
| Заглавие: | |
Не съм писал на VB но няма начин да няма форматираща string функция ( както е printf в С или String.Format() или нещо подобно ) |
|
| Автор: | syscop [ Съб Мар 20, 2010 12:45 pm ] |
| Заглавие: | |
Не слагай числа, а стрингове. |
|
| Автор: | E1 [ Съб Мар 20, 2010 6:05 pm ] |
| Заглавие: | |
Значи, това не го написах, но опитах да сложа стринг и ми изкарва съобщение, че не може броячът да е от този тип. Опитах с прилепяне, но извежда грешка. Какъв е начинът за прилепяне във VB2010? For j As integer = 0 To 9 ComboBox2.Items.Add("0", j) ComboBox5.Items.Add("0", j) ComboBox7.Items.Add("0", j) ComboBox9.Items.Add("0", j) ComboBox11.Items.Add("0", j) ComboBox13.Items.Add("0", j) ComboBox15.Items.Add("0", j) ComboBox17.Items.Add("0",j) ComboBox19.Items.Add("0",j) ComboBox21.Items.Add("0",j) ComboBox23.Items.Add("0",j) ComboBox25.Items.Add("0",j) ComboBox29.Items.Add("0",j) Next |
|
| Автор: | syscop [ Съб Мар 20, 2010 6:43 pm ] |
| Заглавие: | |
То броячът едва ли ще може да бъде стринг. Що не вземеш да провериш какви функции поддържа езика - потърси какво пише в MSDN за Str ? |
|
| Автор: | bateAz [ Съб Мар 20, 2010 6:44 pm ] |
| Заглавие: | |
Tоя код е пълна боза, може би защото езикът го толерира, може и за друго да е. Не става ли така: DIM J As Integer ComboBoxX.Items.Clear() For j=0 To N ComboBoxX.Items.Add(Right(IntToStr(100 + j), 2) Next ComboBox2.Items = ConboBoxX.Items . . . . на ЖБ не съм писал 100 години, та може да има някоя тъпа грешка 
|
|
| Автор: | E1 [ Съб Мар 20, 2010 6:59 pm ] |
| Заглавие: | |
Стана по друг начин - вместо запетая & и работи. Благодаря на отзовалите се |
|
| Автор: | darkshy [ Съб Мар 20, 2010 8:04 pm ] |
| Заглавие: | |
Точно за & ти говорех. Това е слепване на стрингове (конкатинация) 
|
|
| Автор: | E1 [ Съб Мар 20, 2010 8:11 pm ] |
| Заглавие: | |
Ами бяха дали някакви запетаи в примерите. И с тях генерираше грешки. Опитвах още някакви методи от примерите, но не работеха. Накрая започнах да слагам какво ли не... и така до &. |
|
| Страница 1 от 1 | Часовете са според зоната UTC + 2 часа [ DST ] |
| Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |
|