С Новым годом! Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
1 / 1 / 0
Регистрация: 18.11.2010
Сообщений: 139

"Размножение" "клонов" Image (index = 1).

28.03.2011, 13:52. Показов 1337. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Чтой-то я повис.
Есть один Image (index = 1).
А мне нужно програмным путём получить из него 10 шт (Index = 10)

Заранее спасибо.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.03.2011, 13:52
Ответы с готовыми решениями:

Три файла,(index.coo, index.doc, index.lex) а что за БД не знаю
Мне дали файловую БД(о-очень много файлов) и три файла: index.coo, index.doc и index.lex. ни doc, ни lex не открываются ни Word-ом ни...

index.html на index.aspx (index.php...)
Вот, собственно, мучаясь с проблемой вылета сайта из топа 1000 (до этого было более 10 топовых (#1) позиций и около тридцати топ 10 позиций...

Надо что бы при нажатии на какой либо Image с картинкой, картинка перекидывалась в пусто Image, а Image на который нажали исчезал.
Имеется 4 Image в 3 из них находятся картинки, а 4 пустой. Надо что бы при нажатии на какой либо Image с картинкой, картинка перекидывалась...

4
1 / 1 / 0
Регистрация: 18.11.2010
Сообщений: 139
29.03.2011, 11:09  [ТС]
Т. е. 10 шт. (Index 1-10)
0
0 / 0 / 0
Регистрация: 23.11.2010
Сообщений: 71
29.03.2011, 11:22
Visual Basic
1
2
3
4
5
MaxId = MaxId + 1
Load CBut(MaxId)
CBut(MaxId).Top = CBut(MaxId - 1).Top + CBut(MaxId).Height
CBut(MaxId).Visible = True
CBut(MaxId).Caption = 'CBut ' & MaxId + 1
Пот такому же принцыпу делай с имиджем !
0
1 / 1 / 0
Регистрация: 18.11.2010
Сообщений: 139
30.03.2011, 11:05  [ТС]
Слухай. Что-то не пашет. Мож я что-то не так делаю. Напиши поподробнее, plz.

Заранее спасибо.
0
1 / 1 / 0
Регистрация: 19.03.2007
Сообщений: 123
30.03.2011, 17:44
Я по-быстрому склепал работающий пример:
Есть кнопка на форме Command1(0), а дальше её событие
Visual Basic
1
2
3
4
5
6
7
8
9
10
Private Sub Command1_Click(Index As Integer)
If Index = 0 Then
For i = 1 To 10
Load Command1(i)
Command1(i).Enabled = True
Command1(i).Visible = True
Command1(i).Top = 700 + (i * 200)
Next
End If
End Sub
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
30.03.2011, 17:44
Помогаю со студенческими работами здесь

Как мне добавить ссылки в элементы image[0], image[1], image[2]
var a = Math.round(Math.random() * 2); image = new Array(); image = "./images/v01.png"; image = "./images/v02.gif"; ...

Сеть из клонов
Здравствуйте форумчане! Я установил удалённый доступ на домашний комп и ноут, и меня посетила идея, а возможно ли слелать клонированное...

атака клонов
интересный разговор у меня выходит с одним товарищем вот в этом топике http://**************/topic57968.html и думается этот разговор...

Ошибка image style не может создать изображения ( image style error cannot create image)
Существует проблема при загрузке изображения более 5M с высоким качеством, стиль изображения не может создать образ или что-то еще (я...

Ссылки с клонов и с одного IP
Кто-то штампует ГС (_aaqas.com_,_vluiv.com_,_xluaq.com_) все они находятся на одном IP их как грязи, ссылок на свой сайт, нашел с десятков...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru