vb使用execsql實示例：1、'引用ADO庫ImportsSystem.Data.SqlClientSubExecSQL()2、'數據庫連接字符串DimconnStringAsString="DataSource=數據庫服務器地址;InitialCatalog=數據庫名稱;UserID=用戶名;Password=密碼;"3、'SQL語句DimsqlAsString="INSERTINTO表名(列1,列2,列3)VALUES('值1','值2','值3')"4、'建立數據庫連接DimconnAsNewSqlConnection(connString)Try5、'打開數據庫連接conn.Open()6、'創建命令對象DimcmdAsNewSqlCommand(sql,conn)7、'執行SQL語句cmd.ExecuteNonQuery()8、'執行成功MessageBox.Show("SQL語句執行成功！")CatchexAsException9、'執行失敗MessageBox.Show("SQL語句執行失敗："&ex.Message)Finally10、'關閉數據庫連接conn.Close()EndTryEndSub。將上面的示例代碼中的數據庫服務器地址、數據庫名稱、用戶名和密碼替換為實際的值，然后調用ExecSQL方法執行SQL語句。這個示例演示了如何執行一個插入數據的SQL語句，你可以根據需要修改SQL語句的內容和執行的操作。