ngthtra Ответов: 3

Как изменить ширину и выровнять поля datagrid в VB6?

У меня есть приложение с datagrid, которое написано на VB6. Я хочу отредактировать ширину и выровнять(по центру или справа) поля datagrid. Я не могу этого сделать.

Вы не могли бы мне помочь?
Спасибо.

3 Ответов

Рейтинг:
2

Amit Kumar Tiwari

Для ширины -> DataGrid.Столбцы(n).Ширина = 1200

Для выравнивания -> Так как у меня нет visual basic 6.0 в моей системе, я не могу вспомнить это.

Рейтинг:
2

Prerak Patel

Разве это не работает?!

DataGrid1.Columns(0).Alignment = dbgCenter
DataGrid1.Columns(0).Alignment = dbgRight

ngthtra

Спасибо!
ваш код хорош, но строка заголовка не выравнивается по центру или выравнивается справа. Вы можете дать новый код для решения этой проблемы
спасибо

Рейтинг:
1

Prerak Patel

Вы можете попробовать этот обходной путь для выравнивания заголовка столбца.

Dim W As Long
Dim SpaceWidth As Long
Dim NumOfSpaces As Long
Dim ColumnHeaderText As String
ColumnHeaderText = "Hello"
With DataGrid1
  SpaceWidth = Me.TextWidth(" ")
  W = .Columns(1).Width
  NumOfSpaces = (W - Me.TextWidth(ColumnHeaderText)) \ SpaceWidth \ 2
  .Columns(1).Caption = Space$(NumOfSpaces) & ColumnHeaderText
End With


Это то, что я нашел на первой ссылке из Гугл[^].