Как создать поле 12х5 из кнопок, чтобы нумерация индекса шла по порядку?

@Rad0n · Регистрация: 12.01.2014

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

Помогите создать поле из кнопок размером 12 на 5

Т.е Кнопки должны идти по порядку по индексу но в виде 12 x 5

первая строка идет до 12 потом на следущей строке идет 13 14 15 и так далее ? НИкак не получается спасибо ((

@gaw · 22.02.2017, 22:43

для 60 Вы обозначили 5х12
сделайте это для от 60 до 128

@MMZ111 · 23.02.2017, 08:56

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

очему то они очень близко друг к другу ! И не могу понять твой код! добавил это
cmd(n).Left = HCmd + 120 все равно близко друг на друге
Добавлено через 6 минут
cmd(n).Left = cmd(n).Left + 1000 так тоже нифига!
Сделай чтобы размеры все были как у первой Кнопки!!! 0 индекса у тебя все мудрено можно ведь проще! подальше друг от друга чтобы можно было сделать! Ибо очень все запутано
КСТАТИ и от 60 до 120 не считает уже!!!
Добавлено через 6 минут
А все пришлось отсчет от 60 тоже поставить и заработало!
Добавлено через 2 минуты
Чтобы они СТАЛИ ДРУГ ОТ ДРУГА ДАЛЬШЕ Надо растягивать кнопку на всю форму что за бред ? Почему он на команду не реагирует cmd(n).left=cmd(n).left +1000

И причем здесь бред? А чуть полегче на поворотах, а, дружище?
Я предложил тебе универсальный код для любого количества столбцов/рядов кнопок, с любым начальным индексом, любым зазором между кнопками и ОЧЕНЬ УДОБНЫМ размещением блока кнопок на форме. Всего-то надо было немного осмыслить код, прочитать комменты в нем и заменить прописанные параметры на переменные.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub Form_Load()
Dim КРядов, КСтолбцов, ННач, Зазор, HCmd, WCmd, X1, Y1, n, x, y As Integer
 
Cmd(0).Visible = False
 
'подставьте свои значения :)
КРядов = 10 'кол-во рядов кнопок
КСтолбцов = 8 'кол-во столбцов кнопок
ННач = 3 'начальный индекс создаваемых кнопок
Зазор = 50 'величина зазора между кнопками
 
 
'HCmd - высота кнопок. WCmd - ширина кнопок- нам нужно уложить КСтолбцов штук по длине блока и КРядов штук по высоте.
HCmd = Cmd(0).Height / КРядов: WCmd = Cmd(0).Width / КСтолбцов
 
'X1, Y1 координаты верхнего левого угла блока кнопок
X1 = Cmd(0).Left: Y1 = Cmd(0).Top
 
n = ННач - 1  'n - номер выводимой кнопки
'x, y - координаты верхнего левого угла текущей кнопки. Задаем координату верхнего левого угла блока - там будет угол 1-й кнопки
x = X1: y = Y1
For i = 1 To КРядов
    x = X1
        For j = 1 To КСтолбцов
            n = n + 1: Load Cmd(n)
            Cmd(n).Height = HCmd - Зазор: Cmd(n).Width = WCmd - Зазор
            Cmd(n).Visible = True: Cmd(n).Caption = n: Cmd(n).Top = y: Cmd(n).Left = x
            x = x + WCmd
        Next j
    y = y + HCmd
Next i
 
End Sub

@Catstail · 23.02.2017, 09:59

Когда я читаю темы с примерно таким названием, как "Создать 100 кнопок...", в моем сознании возникает вопрос: "Зачем?". Что это за интерфейс, который требует такого к-ва кнопок?

echs · 23.02.2017, 10:35

Catstail
Это может быть игровая программа. Например всем
известная игра "Сапёр". Кнопки располагаются впритык
друг другу.

Новые блоги и статьи Все статьи Все блоги /
Вступаем в новую фазу генерации favicons, векторную. russiannick 02.11.2026 Теперь нет нужды скрывать что используется простой svg. Исходный код изображения помещаем в поле и жмем кнопку. Исходник преобразуется в вид корректный для помещения в favicon или в url(). Нажатие. . .	Генератор паролей (вариант №4) Maks 01.11.2026 После публикации 3-го варианта генератора паролей, разослал его своим коллегам (с целью оценки), в итоге были получены следующие рекомендации: 1. Вернуть возможность использования знаков \| 1 l I;. . .	Генератор паролей (вариант №3) Maks 30.10.2026 Финальная версия генератора паролей 1С. Доработка решения в этот раз коснулась только визуальной части, а именно, добавлен реквизит ДопПараметры (тип Булево), который скрывает/ отображает реквизиты:. . .	Магическое мышление и магия, современная наука не отличима от магии (говорит ИИ Джемени) zorxor 30.10.2026 Джемени, расскажи, пожалуйста, что такое магическое мышление, что такое магия, почему современная наука чем-то напоминает магию? Фраза «Любая достаточно развитая технология неотличима от магии». . .
За какое время ИИ может подобрать пароль по хешу (рассказывает Джемени ИИ) zorxor 30.10.2026 Расскажи, Джемени, если известен хэш МД5, например, за сколько ИИ сможет подобрать соответствующий пароль? Искусственный интеллект (ИИ) может подобрать простой или средний по сложности пароль по. . .	Кто убил Suno? Почему наше солнышко погасло? (диалог с ИИ Джемени) zorxor 30.10.2026 Как убивали Suno. Хронология. «Убийство» музыкальной нейросети Suno — это затяжной процесс, в котором технологический хайп стартапа разбился о жесткую реальность судебных исков от гигантов. . .	Генератор паролей (вариант №2) Maks 30.10.2026 Обновленная версия ранее созданной обработки. Добавлены следующие реквизиты типа Булево: - Буквы; - Цифры; - Символы. Изменена логика команды "Сгенерировать" и процедуры "ПриОткрытии":. . .	Генератор паролей (вариант №1) Maks 29.10.2026 Реализация из решения ниже выполнена исключительно по моей инициативе, дабы облегчить себе работу в создании паролей для администрируемых мною сервисов и пользователей. Самым главным критерием для. . .

@gaw 6644 / 1511 / 169 Регистрация: 09.01.2010 Сообщений: 4,298
	22.02.2017, 22:43
	для 60 Вы обозначили 5х12 сделайте это для от 60 до 128 0

@Catstail Супер-модератор 38228 / 21160 / 4314 Регистрация: 12.02.2012 Сообщений: 34,774 Записей в блоге: 14
	23.02.2017, 09:59
	Когда я читаю темы с примерно таким названием, как "Создать 100 кнопок...", в моем сознании возникает вопрос: "Зачем?". Что это за интерфейс, который требует такого к-ва кнопок? 1

echs Регистрация: 23.10.2013 Сообщений: 5,076 Записей в блоге: 8
	23.02.2017, 10:35
	Catstail Это может быть игровая программа. Например всем известная игра "Сапёр". Кнопки располагаются впритык друг другу. 1