At overfører listarrays til et datagrid?

Jeg har lavet en ugekalender som viser aftaler for hele ugen.
Nu vil jeg gerne have lidt mere styr på designet af denne windows applikation. Så jeg prøver at bruge bla. "DataGridTextBoxColumn" istedet for. Men det virker ik. Så jeg har nedenfor klikket kodestykke ud fra det gamle og kodestykke for det jeg har forsøgt.

Er der nogen der kan hjælpe og mangler du mere info, så giv besked.

Mvh CP
    Private mydataset As DataSet
    Private myDataColumn As DataColumn

    Private myDataRow As DataRow
    Private myDataTable As DataTable = New DataTable("ParentTable")

………..
        ' Create 6. column.
        myDataColumn = New DataColumn
        myDataColumn.ColumnName = "Fredag " & denneUgeStartDato.Date.AddDays(4)
        myDataColumn.ReadOnly = True
        myDataTable.Columns.Add(myDataColumn)

        mydataset = New DataSet
        mydataset.Tables.Add(myDataTable)

……………………..

DataGrid1.SetDataBinding(mydataset, "ParentTable")

………………………………..

selv ugens aftaler holder jeg styr på ved arraylister.
  Private dagensAftaler As New ArrayList
    Private AftalerMandag As New ArrayList
    Private AftalerTirsdag As New ArrayList
    Private AftalerOnsdag As New ArrayList
    Private AftalerTorsdag As New ArrayList
    Private AftalerFredag As New ArrayList

……………………………
AftalerFredag.Sort() ’ sorter dagens aftaler så kl. passer
Dim ifr As Integer = 0
Do While ifr < AftalerFredag.Count
  ugeplaner(4) = ugeplaner(4) & AftalerFredag.Item(ifr) & vbCrLf
  ifr = ifr + 1
Loop

………………………………………………..
‘ overfører hele ugens aftaler til en ny række
myDataRow("Fredag " & denneUgeStartDato.Date.AddDays(4)) = ugeplaner(4)
myDataTable.Rows.Add(myDataRow)


------ datagrid ??????? -------------

Så vil jeg udskifte det “Almindelige datagrid” med en datagrid hvor jeg kan bestemme breden af kolonderne. Således at de kan starte app. Med en bestemt størrelse.

    Private myGridTable As DataGridTableStyle
    Private myGridColumn As DataGridTextBoxColumn
    Private myGridRow As DataGridTextBox
    Private myset As DataSet
………………………………

      myGridColumn = New DataGridTextBoxColumn
        myGridColumn.MappingName = "Fredag"
        myGridColumn.HeaderText = "Fredag " & denneUgeStartDato.Date.AddDays(4)
        myGridColumn.Width = 100
        myDataTable.Columns.Add(myGridColumn.MappingName)

        ' Instantiate the DataSet variable.
        myset = New DataSet
        ' Add the new DataTable to the DataSet.
        myset.Tables.Add(myDataTable)
………………

DataGrid1.DataSource = myset

………………………………

Hvad er det lige jeg ikke kan se? ? ?? ? ? ?