Альбом

@david142 · Регистрация: 14.04.2011

Студворк — интернет-сервис помощи студентам

Какой код надо прописать чтобы при каждом нажатии кнопки поочередно менялись картинки ?

например

Visual Basic
1
2
Image1.Picture = LoadPicture("C:\01.bmp")
Image1.Picture = LoadPicture("C:\02.bmp")

@YuraAAA · 06.05.2011, 18:55

Image1.Picture = LoadPicture("C:\0 & i & ".bmp")
i=i+1
?)

@david142 · 06.05.2011, 19:03 **[ТС]**

и что это????

@YuraAAA · 06.05.2011, 19:07

аа, та ничё. Забей)

@david142 · 06.05.2011, 19:11 **[ТС]**

Дружище если знаешь помоги пожалуйсто

@YuraAAA · 06.05.2011, 19:19

Известно ли точное количество картинок? Их имена?

@david142 · 06.05.2011, 19:24 **[ТС]**

Да известно 4 Фотографии (01,02,03,04)

@YuraAAA · 06.05.2011, 19:50

Visual Basic
1
2
3
4
5
6
7
8
Dim i As Byte
Private Sub Command1_Click()
i = i + 1
Image1.Picture = LoadPicture("C:\0" & i & ".bmp")
End Sub
Private Sub Form_Load()
i = 0
End Sub

@david142 · 06.05.2011, 20:02 **[ТС]**

спасибо но при нажатии кнопки он дальше начинает искать 05 фотографию (которой нету) и из-за этого ошибку делает...а что нужно написать чтобы он занова начал пролистывать?

@kres · 06.05.2011, 20:07

Сообщение от david142

спасибо но при нажатии кнопки он дальше начинает искать 05 фотографию (которой нету) и из-за этого ошибку делает...а что нужно написать чтобы он занова начал пролистывать?

допиши

PureBasic
1
if i=5 then i=1

после i=i+1

@david142 · 06.05.2011, 20:11 **[ТС]**

спасибо)

Новые блоги и статьи Все статьи Все блоги /
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .

@YuraAAA 1605 / 1337 / 291 Регистрация: 25.10.2009 Сообщений: 3,487 Записей в блоге: 2
	06.05.2011, 18:55
	Image1.Picture = LoadPicture("C:\0 & i & ".bmp") i=i+1 ?) 0

@david142 0 / 0 / 0 Регистрация: 14.04.2011 Сообщений: 46
	06.05.2011, 19:03 [ТС]
	и что это???? 0

@YuraAAA 1605 / 1337 / 291 Регистрация: 25.10.2009 Сообщений: 3,487 Записей в блоге: 2
	06.05.2011, 19:07
	аа, та ничё. Забей) 0

@david142 0 / 0 / 0 Регистрация: 14.04.2011 Сообщений: 46
	06.05.2011, 19:11 [ТС]
	Дружище если знаешь помоги пожалуйсто 0

@YuraAAA 1605 / 1337 / 291 Регистрация: 25.10.2009 Сообщений: 3,487 Записей в блоге: 2
	06.05.2011, 19:19
	Известно ли точное количество картинок? Их имена? 0

@david142 0 / 0 / 0 Регистрация: 14.04.2011 Сообщений: 46
	06.05.2011, 19:24 [ТС]
	Да известно 4 Фотографии (01,02,03,04) 0

@david142 0 / 0 / 0 Регистрация: 14.04.2011 Сообщений: 46
	06.05.2011, 20:02 [ТС]
	спасибо но при нажатии кнопки он дальше начинает искать 05 фотографию (которой нету) и из-за этого ошибку делает...а что нужно написать чтобы он занова начал пролистывать? 0

@david142 0 / 0 / 0 Регистрация: 14.04.2011 Сообщений: 46
	06.05.2011, 20:11 [ТС]
	спасибо) 0