Объединение ячеек в MSHFlexGrid - VB
Формулировка задачи:
Добра всем!
Веду небольшую работу в VB 6.0 и вот появилась необходимость слепить несколько записей в виде таблицы, где имеется 2 столбца (поля) и множество строк из которых каждая 3-я строка объединяет обе ячейки. Использую MSGFlexGrid, но при создании 2-ой и последующих записей (по 3 строки каждая), объединение ячеек происходит только в первой строке, а остальные как были разбитыми так ими и остались.
Подскажите пожалуйста в каком направлении надо копать или есть вариант использовать что-то иное?
Спасибо.
Прилагаю пример того, как должно выглядеть (изображение) и как это выглядит в моём проекте + исходник.
Все имена являются вымышленными и не имеют отношения к реальным людям. Любое совпадение с реальными людьми случайное.
Заранее прошу прощения, если кого-то обидел.
Решение задачи: «Объединение ячеек в MSHFlexGrid»
textual
Листинг программы
Private Sub Command1_Click() Dim n With msh .Rows = 14 .Cols = 4 .MergeCells = flexMergeFree For n = 2 To 11 Step 3 .TextMatrix(n, 1) = "Шифр" .TextMatrix(n, 2) = "Шифр" .TextMatrix(n, 3) = "Шифр" .MergeRow(n) = True .ColAlignment(1) = 4 Next n Exit Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д