VB และ C# จัดรูปแบบ DataGridview, เปลี่ยนชื่อคอลัมน์ ใน Datagrid view

——————C#———————-

private void FormatDatagridView()
{
//เปลี่ยนสี datagridview1.AlternatingRowsDefaultCellStyle.BackColor = Color.Bisque
//กำหนดให้อ่านอย่างเดียว 
datagridview1.ReadOnly = True
//กำหนดให้ 
Autosize datagridview1.AutoSizeColumnsMode = dataGridViewAutoSizeColumnsMode.DisplayedCells
//กำหนดชื่อคอลัมน์ใหม่ 
datagridview1.Columns("ColumnName").HeaderText = "NewColumnName"
//ซ่อนคอลัมน์บางช่อง 
datagridview1.Columns("TimeHStart").Visible = False
}

—————–VB———————-

With dgvEmp
                .AlternatingRowsDefaultCellStyle.BackColor = Color.Bisque
                .ReadOnly = True
                .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.DisplayedCells
                .DataSource = dsDataAll.Tables("DataAll")
                'WorkOrderId,ACReg,Serial,TaskCardNo,TaskCardSubject,
                'WorkPackage,
                 'ปรับแต่งรูปแบบ datagride
                'กำหนดหัวคอลลัมน์ให้เป็นภาษาไทย
                .Columns("WorkOrderId").HeaderText = "WorkOrder Ref."
                .Columns("ACReg").HeaderText = "A/C Reg."
                .Columns("DateStart").HeaderText = "Date Start"
                .Columns("Serial").HeaderText = "Serial No."
                .Columns("TaskCardNo").HeaderText = "TaskCard No."
                .Columns("TaskCardSubject").HeaderText = "TaskCard Subject"
                .Columns("WorkPackage").HeaderText = "Work Package"
                'AMMChapter, Page, TaskCardRev, MPDRev, Customer, Station
                .Columns("AMMChapter").HeaderText = "AMM Chapter"
                .Columns("Page").HeaderText = "Page"
                .Columns("TaskCardRev").HeaderText = "TaskCard Rev"
                .Columns("MPDRev").HeaderText = "MPD Rev"
                .Columns("Customer").HeaderText = "Customer"
                .Columns("Station").HeaderText = "Station"
                'TaskSkill,PlanTime,PlanMechanic,PlanTotal,
                .Columns("TaskSkill").HeaderText = "Task Skill"
                .Columns("PlanTime").HeaderText = "Time Plan"
                .Columns("PlanMechanic").HeaderText = "Mechanic Plan"
                .Columns("PlanTotal").HeaderText = "Total Plan"
                'ActualTime,ActualMechanic,ActualTotal,Dayref
                .Columns("ActualTime").HeaderText = "Actual Time"
                .Columns("ActualMechanic").HeaderText = "Actual Mechanic"
                .Columns("ActualTotal").HeaderText = "Actual Total"
                .Columns("DayRef").HeaderText = "Day"
                'TimeStart,TimeStop,TimeHStart,TimeMStart,TimeHStop,TimeMStop,DateStop
                .Columns("DateStop").HeaderText = "Date Stop"
                .Columns("TimeStart").HeaderText = "Time Start"
                .Columns("TimeStop").HeaderText = "Time Stop"
                .Columns("TimeHStart").Visible = False
                .Columns("TimeMStart").Visible = False
                .Columns("TimeHStop").Visible = False
                .Columns("TimeMStop").Visible = False
                .Refresh()            
End With

———————-VB—————————————-

With Me.dgvScheduled
          .EnableHeadersVisualStyles = False
          .RowHeadersDefaultCellStyle.Format = "M/yyyy"
End With

 

About the author