急小弟我刚接触VB.net，用的vs2005，sql server 2005，现在想知道在程序中如何来实现select,update,delete,insert的功能

急急急急！我刚接触VB.net，用的vs2005，sql server 2005，现在想知道在程序中怎么来实现select,update,delete,insert的功能？
我刚接触VB.net，用的vs2005，sql   server   2005，现在想知道在程序中怎么来实现select,update,delete,insert的功能？
我写了这段select的函数，不知道对否？
        Private   mvarAdoCmd   As   OdbcConnection

        Private   Function   ExecuteCommandSQL(ByVal   SQL   As   String)   As   DataSet
                Dim   AdoCmd   As   OdbcDataAdapter
                ExecuteCommandSQL   =   Nothing
                AdoCmd   =   New   OdbcDataAdapter(SQL,   mvarAdoCmd)
                Try
                        AdoCmd.Fill(ExecuteCommandSQL)
                        ExecuteCommandSQL.Clear()
                Catch   ex   As   Exception
                        'mvarSystemInitObject.OutMsg   =   Err.Description
                End   Try
                AdoCmd.Dispose()
        End   Function
其它的三个不知道有什么方法，可以实现的。希望大家多多帮忙？

------解决方案--------------------
应该先打开数据库联接吧，
select 应该和Update，Delete，Insert分开写。
------解决方案--------------------
你还没有连接数据库呢
现在给你一个示范
Module MdlCommon
Public strSQL As String '存放SQL语句
Public ds As DataSet '查询得到的记录集
Public ErrorMsg As String '存放错误信息

Public Function ExecuteSQL(ByVal strSQL As String, ByRef errMsg As String) As DataSet
Dim conn As OleDb.OleDbConnection
Dim comm As New OleDb.OleDbCommand
Dim da As OleDb.OleDbDataAdapter
Dim ds As New DataSet()
Dim SplitSQL() As String
ErrorMsg = " "
Try
SplitSQL = Split(strSQL)
conn = New OleDb.OleDbConnection( "Provider=Microsoft.Jet.OleDb.4.0;Data Source=App_Data/UserInfo.mdb ")

If InStr( "INSERT,DELETE,UPDATE ", UCase$(SplitSQL(0))) Then
comm.Connection = conn
comm.Connection.Open()
comm.CommandText = strSQL
comm.ExecuteNonQuery()
Else
da = New OleDb.OleDbDataAdapter(strSQL, conn)
da.Fill(ds)
ExecuteSQL = ds
End If
Catch ex As Exception
ErrorMsg = ex.Message
Finally
ds = Nothing
conn = Nothing
End Try
End Function
End Module