vb与access用oledb连接如何实现基本的查询，添加，修改功能？？？？

窗体上有五个文本框，分别用来对应显示：编号，姓名，性别，出生日期，籍贯；两个命令按钮：分别为“查询”和“结束运行”，我想实现的功能是在显示“编号”的文本框里输入1，2等等，（1）单击“查询”按钮则在其它几个文本框里分别显示对应字段的信；（2）在各个文本框中输入相应的信息，单击“添加”，则在数据库的表中增加一条记录；（3）“修改”已存在的记录，确认后将修改的结果保存在数据库的表中。
程序如下： 
       dim rs as ADODB.Recordset
       private sub form_load()
       dim conn as ADODB.Connection, str as string
       set conn=new ADODB.Connection
       set rs=new ADODB.Recordset
       
       str="provider=microsoft.jet.OLEDB.4.0;Data source="& App.path &"\fff.mdb"
       sql="select * from qe"
       conn.Open str
       rs.Open sql,conn,1,1
        
       end sub
      希望各位高手给与指导，因本人刚开始学习，很是惭愧！！！谢谢了！！！