Dim ts1 As New DataGridTableStyle
ts1.MappingName = "driver"
Dim myDataCol As New DataGridTextBoxColumn
myDataCol = New DataGridTextBoxColumn
myDataCol.HeaderText = "نام خانوادگي"
myDataCol.MappingName = "dfam"
myDataCol.Width = 110
ts1.GridColumnStyles.Add(myDataCol)
myDataCol = New DataGridTextBoxColumn
myDataCol.HeaderText = "نام"
myDataCol.MappingName = "dname"
myDataCol.Width = 75
ts1.GridColumnStyles.Add(myDataCol)