Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Заполнить большое количество textbox Добавлено: 02.06.11 13:02  

Автор вопроса:  Lesh
Всем добрый день!

У меня такая проблема:
Делаю прогу на vb10. Есть 100 текстбоксов. Нужно в каждый вставить случайное значение

textbox1.text = int(rnd()*1500)



100 раз копировать эту строчку и менять textbox1 на textbox2 итд. не вариант.
Как можно проделать все циклом? Как создать массив из текстбоксов не знаю =(

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 AgentFire



ICQ: 192496851 

Вопросов: 75
Ответов: 3178
  Профиль | | #1 Добавлено: 02.06.11 14:50
  1. for each box as textbox in form.controls.cast(of textbox)()
  2.     
  3. end for


это если vb10

Ответить

Номер ответа: 2
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
  Профиль | | #2 Добавлено: 02.06.11 15:32
Во-первых не Cast а OfType. Во-вторых, смотри в какой форум пишешь

Ответить

Номер ответа: 3
Автор ответа:
 Lesh



Вопросов: 2
Ответов: 2
  Профиль | | #3 Добавлено: 02.06.11 15:59
разобрался. Работает такой кож :)

  1.         For Each ctl In TabPage1.Controls
  2.             If TypeName(ctl) = "TextBox" Then ctl.Text = Int(Rnd() * x)
  3.         Next ctl

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам