ขอถามเรื่อง Data Binding ใน VB.Net เวลากด save ข้อมูลDateDateTimePickerมันไม่ insert ลงใน Table ให้ครับ

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Validate()
        Me.MEMBERBindingSource1.AddNew()
        Me.TableAdapterManager1.UpdateAll(Me.Housing_FundDataSet1)
    End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      DateDateTimePicker.Value = now

       Me.Validate()
       Me.MEMBERBindingSource1.AddNew()
       Me.TableAdapterManager1.UpdateAll(Me.Housing_FundDataSet1)
   End Sub

using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Diagnostics;
using System.Drawing;
using System.Windows.Forms;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

#region _GridDateControl
public class GridDateControl : DataGridViewColumn
{

    public GridDateControl()
        : base(new CalendarCell())
    {
    }

    public override DataGridViewCell CellTemplate
    {
        get { return base.CellTemplate; }

        set
        {
            // Ensure that the cell used for the template is a CalendarCell.
            if ((value != null) && !value.GetType().IsAssignableFrom(typeof(CalendarCell)))
            {
                throw new InvalidCastException("Must be a CalendarCell");
            }
            base.CellTemplate = value;

        }
    }

}

public class CalendarCell : DataGridViewTextBoxCell
{

    public CalendarCell()
    {
        // Use the short date format.
      //  this.Style.Format = "dd MMMM yyyy  hh:mm:ss tt"; 

    }

    public override void InitializeEditingControl(int rowIndex, object initialFormattedValue, DataGridViewCellStyle dataGridViewCellStyle)
    {
        // Set the value of the editing control to the current cell value.
        base.InitializeEditingControl(rowIndex, initialFormattedValue, dataGridViewCellStyle);

        CalendarEditingControl ctl = (CalendarEditingControl)DataGridView.EditingControl;
        if ((!object.ReferenceEquals(this.Value, DBNull.Value)))
        {
            if ((this.Value != null))
            {
                ctl.Value = (DateTime)this.Value;
            }
        }
    }

    public override Type EditType
    {
        // Return the type of the editing contol that CalendarCell uses.
        get { return typeof(CalendarEditingControl); }
    }

    public override Type ValueType
    {
        // Return the type of the value that CalendarCell contains.
        get { return typeof(DateTime); }
    }
}

class CalendarEditingControl : DateTimePicker, IDataGridViewEditingControl
{

    private DataGridView dataGridViewControl;
    private bool valueIsChanged = false;
    private int rowIndexNum;
    public CalendarEditingControl()
    {
        this.Format = DateTimePickerFormat.Short;
    }

    public object EditingControlFormattedValue
    {
        get { return this.Value.ToShortDateString(); }
        set
        {
            if (value is String)
            {
                this.Value = DateTime.Parse(Convert.ToString(value));
            }
        }
    }


    public object GetEditingControlFormattedValue(DataGridViewDataErrorContexts context)
    {

        return this.Value.ToShortDateString();

    }


    public void ApplyCellStyleToEditingControl(DataGridViewCellStyle dataGridViewCellStyle)
    {
        this.Font = dataGridViewCellStyle.Font;
        this.CalendarForeColor = dataGridViewCellStyle.ForeColor;
        this.CalendarMonthBackground = dataGridViewCellStyle.BackColor;

    }

    public int EditingControlRowIndex
    {

        get { return rowIndexNum; }
        set { rowIndexNum = value; }
    }


    public bool EditingControlWantsInputKey(Keys key, bool dataGridViewWantsInputKey)
    {

        // Let the DateTimePicker handle the keys listed.
        switch (key & Keys.KeyCode)
        {
            case Keys.Left:
            case Keys.Up:
            case Keys.Down:
            case Keys.Right:
            case Keys.Home:
            case Keys.End:
            case Keys.PageDown:
            case Keys.PageUp:


                return true;
            default:
                return false;
        }

    }


    public void PrepareEditingControlForEdit(bool selectAll)
    {
        // No preparation needs to be done.

    }

    public bool RepositionEditingControlOnValueChange
    {

        get { return false; }
    }


    public DataGridView EditingControlDataGridView
    {

        get { return dataGridViewControl; }
        set { dataGridViewControl = value; }
    }


    public bool EditingControlValueChanged
    {

        get { return valueIsChanged; }
        set { valueIsChanged = value; }
    }


    public Cursor EditingControlCursor
    {

        get { return base.Cursor; }
    }
    Cursor IDataGridViewEditingControl.EditingPanelCursor
    {
        get { return EditingControlCursor; }
    }



    protected override void OnValueChanged(EventArgs eventargs)
    {
        // Notify the DataGridView that the contents of the cell have changed.
        valueIsChanged = true;

        this.EditingControlDataGridView.NotifyCurrentCellDirty(true);
        base.OnValueChanged(eventargs);
    }

}
#endregion

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      DateDateTimePicker.Value = now

       Me.Validate()
       Me.MEMBERBindingSource1.AddNew()
       Me.TableAdapterManager1.UpdateAll(Me.Housing_FundDataSet1)
   End Sub