请问这个方法的含义是什么??

Question

Public Sub SetUpdatable(ByVal strSQL As String)            m_objAdapter.SelectCommand.CommandText = strSQL
            m_objAdapter.DeleteCommand = New OleDbCommandBuilder(m_objAdapter).GetDeleteCommand()
            m_objAdapter.DeleteCommand.Connection = m_objConnection
            m_objAdapter.InsertCommand = New OleDbCommandBuilder(m_objAdapter).GetInsertCommand()
            m_objAdapter.InsertCommand.Connection = m_objConnection
            m_objAdapter.UpdateCommand = New OleDbCommandBuilder(m_objAdapter).GetUpdateCommand()
            m_objAdapter.UpdateCommand.Connection = m_objConnection End Sub