SQLCA.DBMS = "ODBC" SQLCA..AutoCommit = False SQLCA.DBParm = "ConnectString=‘DSN=firebird;UID=sysdba;PWD=masterkey‘" CONNECT Using sqlca; if sqlca.sqlcode <> 0 then messagebox(‘‘,sqlca.sqlerrtext) return else messagebox(‘‘,‘成功‘) end if
PB可以连接多种数据库，可以自己选择，增删改查语句和SQL语句有点区别，像查询、删除，可以自己细细研究
原文：https://www.cnblogs.com/zxf100/p/10988151.html