Thiết lập caption, datafiled và withcolumn của datagrid luôn trong code (form VB6) (2 người xem)

[maytinhvp01]

Mình đã làm được điều chỉnh độ rộng, caption, tên của datafiled của cột trên datagrid/form/VB6 thong qua bảng thiết lập property pages.
Nhưng giờ do caption và ten của datafiled lấy theo trên file của excel (sheet1) có ghi trên file up (không cố định có sự thay đổi)
Vậy mình muốn tùy biến caption và datafiled trong code khi form_load() không muốn lại vào thiết lập property pages của datagrid

 

[maytinhvp01]

Vâng cái em cần cuối cùng là điều chỉnh được độ rộng của cột trong datagirid khi form hoạt động.
lần trước có hỏi trên diễn đàn được anh HAI LUA MIEN TAY hướng dẫn nhưng bằng cách làm trong property nên phải thiết lập luôn cả caption và datafield nên khó tuỳ biến.
Giải pháp của em đã được giải quyết như sau:
thiết lập độ rộng của cột ngay trong khi form hoạt động

Private Sub Form_Initialize()
dim i as long
For i = 0 To DataGrid1.Columns.Count
DataGrid1.Columns(i).Width = 1000
Next
' với cột không cùng độ rộng có thể thiết lập riêng
'DataGrid1.Columns([COLOR=#ff0000]Số cột ở đây[/COLOR]).Width = 2000
End Subb

và dùng

HDR=Yes

để lấy tiêu đề cột