[求助]如何使用VB语言实现SQL语句的查询，插入，更新，删除？

Question

小弟初学VB，现正做课程设计，做一个简单的管理信息系统，需要用到SQL数据库，SQL语句小弟学过，但不知道如何运用VB语句进行SQL的操作，请达人赐教！

Answer 1

'首先要建立連接,連接到數据庫
Dim AdoCon as ADODB.ConnectionPrivate Function ConenctToDatabase() As Boolean
  On Error GoTo ErrorHandler
  Dim DBName As String, ServerAdd As String, UserName As String, UserPwd As String
  '設置連接信息字符串的參數
  ServerAdd = txt(0)
  DBName = "數據庫名"
  UserName = "sa"
  UserPwd = "Password"
  '連接數据庫
  Set AdoCon = New ADODB.Connection
  AdoCon.ConnectionTimeout = 10
  AdoCon.CursorLocation = adUseServer
  AdoCon.ConnectionString = "uid=" & UserName & ";pwd=" & UserPwd & _
                            ";driver={SQL Server};server=" & ServerAdd & _
                            ";database=" & DBName & ";dsn=''"
  AdoCon.Open
  '返回值
  ConenctToDatabase = True
  Exit Function
ErrorHandler:
  MsgBox "連接到數据庫出錯", vbCritical, "出現錯誤"
  Exit Function
End Function
'===================================
連接到數據庫以后,就可以用Connection的Execute方法來執行SQL語句
AdoCn.Execute "Insert TableName Values(....)"

Answer 2

看你使用的什么连接数据库，实现的方法有很多，比如数据环境，ADO等，不过语句都差不多