How to Bind ComboBox using DataTable?

Dim countryNameColumn As DataColumn = dataTable.Columns.Add("data", GetType(String))
        dataTable.Rows.Add("One")
        dataTable.Rows.Add("Two")
        dataTable.Rows.Add("Three")
        dataTable.Rows.Add("Four")
        dataTable.Rows.Add("Five")


        ComboBox1.DataSource = dataTable
        ComboBox1.DisplayMember = "data"