vb.net 物理数据库更新问题

    Dim olecn As New OleDb.OleDbConnection
    Dim oleDA As New OleDb.OleDbDataAdapter
    Dim olecomm As New OleDb.OleDbCommand
    Dim oledS As New DataSet
    Dim xxtable As New DataTable

    Public Sub bindgridview()
        olecn.ConnectionString = cnn ' 获取联接地址,"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=F:\原F盘\vs2015-access引擎\技术流程系统数据库.accdb"
        olecomm.Connection = olecn '建立联接
        xxtable.Clear()
         = "select * from 登陆信息 where 简称 = '" & UsernameTextBox.Text & "'" '执行查询语句
        oleDA.SelectCommand = olecomm '设配器获取查询命令
        olecn.Open() '打开数据库
        oleDA.Fill(oledS, "登陆信息") '对设配器填充数据
        xxtable = oledS.Tables("登陆信息")
        ' Dim myrow As DataRow = xxtable.NewRow
        olecn.Close()
        DataGridView1.DataSource = xxtable ' oledS.Tables("登陆信息") 'oledS.Tables("登陆信息") '将设配器上取到的数据表内容显示到 显示器上

       DataGridView1.Rows(0).DataBoundItem("密码") = NewPasswordtextbox.Text

        'oleDA.Update(oledS.Tables("登陆信息"))
        oleDA.Update(DataGridView1.DataSource)
        ' xxtable.Clear()

    End Sub
 datagridview数据能改过来，但只要刷新下，又是原来的数据，也就是说物理数据库根本没被修改，哪位大大指导下，到底是怎么回事！谢谢！急等！！