visualbasic與資料庫

Ⅰ 為什麼用VB開發資料庫

用Visual Basic作為資料庫開發平台有以下優點：
(1)簡單性。Visual Basic提供了數據控制項，利用該控制項，用戶只要編寫少量的代碼甚至不編寫任何代碼就可以訪問資料庫，對資料庫進行瀏覽。
(2)靈活性。Visual Basic不像一般的資料庫(如Access)那樣局限於特定的應用程序結構，也不需要用某些指令對當前打開的資料庫進行操作，因而比較靈活。
(3)可擴充性。Visual Basic是一種可以擴充的語言，其中包括在資料庫應用方面的擴充。在Visual Basic中，可以使用ActiveX控制項(以前版本中稱為VBX或OLE控制項)，這些控制項可以由Microsoft公司提供，也可以由第三方開發者提供。有了這些控制項，可以很容易地在Visual Basic中增加新功能，擴充Visual Basic數據存取控制的指令系統。在其它資料庫開發平台中，目前還不具備ACtiveX控制項。

Ⅱ visual basic是資料庫管理系統嗎

Visual Basic當然不死資料庫管理系統，常見的資料庫管理系統有: SQL Server, Oracle, MySQL, PostgreSQL等。
Basic是一種編程語言，而Visual Basic則是以Basic為編程語言的一個可視化的集成開發工具。

Ⅲ 鍦╒isual Basic涓鐢―AO瀹炵幇鏁版嵁搴撶紪紼

DAO(DataAccessObject)鍏ㄧО涓烘暟鎹璁塊棶瀵硅薄錛屽畠鏄鏁版嵁搴撶紪紼嬬殑閲嶈佹柟娉曚箣涓銆侱AO鐨勪竴縐嶉潰鍚戝硅薄鐨勭晫闈㈡帴鍙,鐗硅壊涓哄畠涓嶆槸鍙瑙嗗寲鐨勫硅薄錛屼嬌鐢ㄥ畠鍏ㄩ儴閮借侀潬緙栫爜鏉ュ畬鎴愶紝DAO鏄璁捐″叧緋誨瀷鏁版嵁搴撶郴緇熺粨鏋勭殑瀵硅薄綾葷殑闆嗗悎銆傚畠鎻愪緵浜嗗畬鎴愮＄悊榪欐牱涓涓緋葷粺鎵闇鐨勫叏閮ㄦ搷浣滅殑灞炴у拰鏂規硶錛屽寘鎷鍒涘緩鏁版嵁搴擄紝瀹氫箟琛ㄣ佸瓧孌靛拰緔㈠紩錛屽緩絝嬭〃闂寸殑鍏崇郴錛屽畾浣嶅拰鏌ヨ㈡暟鎹搴撶瓑宸ュ叿銆傜敱浜嶢DO(ActiveXDataObjectActiveX鏁版嵁瀵硅薄)鐨勫嚭鐜幫紝DAO鐨勪嬌鐢ㄥ凡澶уぇ鍑忓皯錛屼絾瀹冩棤欏諱嬌鐢∣DBC(寮鏀炬暟鎹搴撹繛鎺)渚垮彲榪炴帴鍚勪釜鏁版嵁婧愶紝鍥犺屾垜浠浠嶇粡甯哥敤緇忓吀鐨凞AO銆備笅闈㈡垜鍚戝ぇ瀹惰︾粏浠嬬粛濡備綍浣跨敤DAO緙栫▼銆
DAO浣跨敤涔嬪墠蹇呴』鍏堝紩鐢ㄣ傛柟娉曚負鎵撳紑VB6.0,浠嶸B鐨"宸ョ▼"鑿滃崟涓錛岄夋嫨"寮曠敤"欏癸紝褰"寮曠敤"瀵硅瘽妗嗗嚭鐜板悗錛屼粠搴撶殑鍒楄〃涓錛岄夋嫨"MicrosoftDAO3.51ObjectLibrary",鍗曞嚮"紜瀹"銆傜幇鍦ㄤ究鍙浠ヤ嬌鐢―AO瀵硅薄搴撴彁渚涚殑鎵鏈夊硅薄榪涜岀紪紼嬩簡銆
涓銆佸壋寤烘暟鎹搴擄細
鍦―AO涓鐢–reatDataBase鏂規硶鍙浠ユ牴鎹鐢ㄦ埛闇奼傚姩鎬佺殑鍒涘緩鏁版嵁搴撱傝繖涓鐐瑰湪紼嬪簭涓鏄闈炲父鏈夌敤鐨勩傜敤鎴峰彲浠ユ牴鎹瑕佹眰瀹炴椂寤虹珛鏁版嵁搴撱傚緩絝嬭繃紼嬪備笅錛氥
PrivateSubCom_creat_Click()
OnErrorGoToErr100
CreatDataBase"鏁版嵁搴撳悕縐.mdb"錛宒bLangGeneral
Msgbox"鏁版嵁搴撳緩絝嬪畬姣"
ExitSub
Err100:
MsgBox"涓嶈兘寤虹珛鏁版嵁搴!"vbCrLfvbCrLfErr.Description,vbInformation
EndSub
榪欐牱錛屾暟鎹搴撲究鍦ㄥ綋鍓嶉粯璁ょ殑璺寰勪笅寤虹珛浜嗐
浜屻佸壋寤鴻〃涓庡瓧孌碉細
寤虹珛鏁版嵁搴撳悗錛屽垯闇瑕佸湪璇ユ暟鎹搴撲腑寤虹珛琛錛岃繖瑕佺敤鍒癟ableDef瀵硅薄銆傚厛瀹氫箟涓涓猅ableDef綾誨瀷鐨勫硅薄錛岀劧鍚庣敤TableDef闆嗗悎涓瑼ppend鏂規硶灝嗕箣榪藉姞鍒版暟鎹搴撳綋涓鍘匯傚苟涓斿悓鏃跺畾涔変竴涓狥ield瀵硅薄錛岀敤CreatFiele鐨勬柟娉曞壋寤轟竴涓狥ield瀵硅薄錛屽悜琛ㄤ腑娣誨姞瀛楁點備緥濡:
PrivateSubCom_table_Click()
OnErrorGoToErr100
DimDefdbAsDataBase
DimNewTableAsTableDef
DimNewFieldAsField
SetDefdb=Workspaces(0).OpenDatabase(App.path"鏁版嵁搴撳悕縐.mdb",0,False)
SetNewTable=DefDataBase.CreateTableDef("琛ㄥ悕")
SetNewField=DefTable.CreateField("瀛楁靛悕",dBText,6)鈥插壋寤轟竴涓瀛楃﹀瀷鐨勫瓧孌碉紝闀垮害涓6涓瀛楃
DefTableFields.AppendNewField鈥插瓧孌佃拷鍔
DefDatabase.TableDefs.AppendNewTable鈥茶〃榪藉姞
Msgbox"琛ㄥ緩絝嬪畬姣"
ExitSub
Err100:
MsgBox"瀵逛笉璧鳳紝涓嶈兘寤虹珛琛ㄣ傝峰厛鍐嶅緩琛ㄥ墠寤虹珛鏁版嵁搴擄紵",vbCritical
EndSub
涓涓鏁版嵁搴撳彲鑳芥湁鍗佸嚑涓鐢氳嚦鍑犲嶮涓瀛楁碉紝涓涓琛ㄤ腑鏈夊氬皯涓瀛楁碉紝鍒欒佸壋寤哄氬皯嬈″苟瑕佽拷鍔犲埌琛ㄤ腑銆傛瘡寤虹珛涓涓瀛楁靛悗閮借佺敤鍒板瓧孌佃拷鍔犲懡浠わ紝浣嗘槸琛ㄨ拷鍔犲彧闇鍦ㄦ墍鏈夊瓧孌靛緩絝嬪畬鎴愬悗鐢ㄤ竴鏉″懡浠ゅ嵆鍙瀹屾垚銆
涓夈佹墦寮鏁版嵁搴擄細
鍦╒B涓錛屽逛竴涓瀵硅薄鍙橀噺寮曠敤涔嬪墠蹇呴』鍔犱互璇存槑銆侱AO涔熸槸濡傛わ紝蹇呴』鍏堝０鏄庢暟鎹搴撳彉閲忥紝渚嬪傦細DimdbaseAsDatabase銆傚緩絝嬩簡鏁版嵁搴撳硅薄鍙橀噺鍚庯紝鎴戜滑渚垮彲鎵撳紑鏁版嵁搴撲簡錛屽湪涓鑸鎯呭喌涓嬮兘鍙鏄璁塊棶涓涓鏁版嵁搴擄紝褰撴墦寮鏁版嵁搴撳悗鍐嶅規暟鎹搴撲腑鐨勫悇涓璁板綍榪涜屾搷浣滐紝榪欏氨瑕佺敤鍒癛ecordset瀵硅薄寤虹珛璁板綍闆嗐備緥濡傦細銆
PrivateSubCommand_OpenDatabase_Click()
DimdbaseasDatabase
DimrsAsRecordset
Setdbase=OpenDatabase(App.path"鏁版嵁搴撳悕縐.mdb")
Setrs=dbase.OpenRecordset("select*from琛ㄥ悕")
EndSub
榪欐牱錛屾暟鎹搴撲腑鐨勮板綍渚挎斁鍒癛ecordset涓錛屽彲浠ヨ繘琛屽悗緇鎿嶄綔浜嗐
鍥涖佷嬌鐢ㄦ暟鎹搴擄細
褰撴墦寮鏁版嵁搴擄紝寤虹珛Recordset璁板綍闆嗗悗錛屼究鍙嫻忚堛佸垹闄ゃ佹坊鍔犮佹煡鎵炬暟鎹搴撲腑鐨勫唴瀹廣
1錛夊悜鍓嶆祻瑙
PrivateSubcmd_previous_Click()
rs.MovePrevious
ifrs.BOF=Truethen
rs.Movelast
Endif
fori=0to11
label(i).caption=rs.F
2錛夊悜鍚庢祻瑙
PrivateSubcmd_next_Click()
rs.MoveNext
Ifrs.EOF=Truethen
rs.MoveFirst
Endif
fori=0to11
label(i).caption=rs.Fields(i)""
next
EndSub
3錛夊垹闄よ板綍
PrivateSubcmd_del_Click()
OnErrorGoTohandle
Dimmsgasstring
msg="鏄鍚﹁佸垹闄よ板綍"Chr$(10)
msg=msglabel(0)鈥叉妸鍒犻櫎璁板綍鐨勪唬鍙峰姞鍏msg涓
IfMsgbox(msg,17,"鍒犻櫎璁板綍")1ThenExitsub
rs.delete
rs.Movenext
Ifrs.EOF=TrueThen
rs.MovePrevious
Endif
fori=0to11
label(i).caption=rs.Fields(i)""
next
handle:
MsgBox"璇ヨ板綍鏃犳硶鍒犻櫎!!!"
ExitSub
EndSub
4錛夋坊鍔犺板綍
鍚戞暟鎹搴撲腑娣誨姞璁板綍姣旇緝楹葷儲涓鐐癸紝澶ц嚧鍒嗕負涓夋ワ細棣栧厛錛岀敤AddNew鏂規硶鍚戞暟鎹搴撴坊鍔犱竴涓鏂扮殑絀虹櫧璁板綍錛涘叾嬈★紝灝嗚佽緭鍏ョ殑鏁版嵁鍒嗗埆璧嬪埌鏁版嵁搴撶殑鍚勪釜瀛楁典腑錛涙渶鍚庯紝鐢║pdata鐨勬柟娉曪紝鎶婅板綍鍐欏埌鏁版嵁搴撲腑鍘匯備緥濡傦細
PrivateSubcmd_new_Click()
rs.AddNew
Fori=0to11
rs.Fields(i)=TextBox(i).Text
Next
rs.Updata
EndSub
5錛夋煡鎵捐板綍
鏌ユ壘璁板綍鍙浠ョ敤Find鏂規硶錛屼緥濡傦細銆
PrivateSubCmd_search_Click()
Setrs=dbase.openRecordset("琛ㄥ悕"錛宒bopenDynaset)
rs.findfirst"瀛楁靛悕='"Text.Text"'"鈥睺ext.Text鏄杈撳叆鐨勫叧閿瀛
ifrs.Nomatch=Truethen
Msgbox"瀵逛笉璧鳳紝娌℃湁璇ヨ板綍"
else
Fori=0to11
label(i).caption=rs.Fields(i)""
Next
Endif
rs.close
EndSub
浠ヤ笂鍙鏄澶ц嚧浠嬬粛浜咲AO鐨勪竴浜涙渶甯哥敤銆佹渶鍏稿瀷鐨勭敤娉曪紝鐪熸ｈ佺啛緇冩帉鎻″畠闇瑕佷笉鎳堢殑鍔鍔涖傚綋浣犲緢濂界殑鐞嗚В浜咲AO鍚庯紝瀵瑰︿範鏂扮殑RDO鍜孉DO涔熸湁寰堝ぇ鐨勫府鍔┿傚苟涓擠AO鍜孉DO鍙浠ュ悓鏃朵嬌鐢錛孌AO鐨勭己闄峰湪浜庢煡鎵懼姛鑳戒笉寮猴紝娌℃湁ADO鏂逛究錛屼絾鍔ㄦ佸壋寤烘暟鎹搴撳嵈榪滆秴ADO錛屽洜姝ゆ湁鏃朵簩鑰呯粨鍚堟洿寮哄ぇ銆傛垜浠鐩鎬俊DAO涓瀹氫細甯浣犺妭綰﹀疂璐墊椂闂達紝涓哄伐浣滄彁渚涙柟渚褲

Ⅳ Visual Basic閾炬帴鏁版嵁搴撶殑鍚勭嶆柟娉

1.浣跨敤OLE DB 鏂瑰紡鎵撳紑鏁版嵁搴
2.榪炴帴鍒癆ccess
3.浣跨敤ODBC鎵撳紑鏁版嵁搴

Ⅳ 資料庫是什麼意思，VB是拿來做什麼用的它們有什麼關系嗎

Visual Basic（VB）是一種由微軟公司開發的包含協助開發環境的事件驅動編程語言。從任何標准來說，VB都是世界上使用人數最多的語言——不僅是盛贊VB的開發者還是抱怨VB的開發者的數量。它源自於BASIC編程語言。VB擁有圖形用戶界面（GUI）和快速應用程序開發（RAD）系統，可以輕易的使用DAO、RDO、ADO連接資料庫，或者輕松的創建ActiveX控制項。程序員可以輕松的使用VB提供的組件快速建立一個應用程序
★資料庫發展階段大致劃分為如下幾個階段：
人工管理階段；
文件系統階段；
資料庫系統階段；
高級資料庫階段。

當人們從不同的角度來描述這一概念時就有不同的定義(當然是描述性的)。例如，稱資料庫是一個「記錄保存系統」(該定義強調了資料庫是若干記錄的集合)。又如稱資料庫是「人們為解決特定的任務，以一定的組織方式存儲在一起的相關的數據的集合」(該定義側重於數據的組織)。更有甚者稱資料庫是「一個數據倉庫」。當然，這種說法雖然形象，但並不嚴謹。
嚴格地說，資料庫是「按照數據結構來組織、存儲和管理數據的倉庫」。在經濟管理的日常工作中，常常需要把某些相關的數據放進這樣「倉庫」，並根據管理的需要進行相應的處理。例如，企業或事業單位的人事部門常常要把本單位職工的基本情況(職工號、姓名、年齡、性別、籍貫、工資、簡歷等)存放在表中，這張表就可以看成是一個資料庫。有了這個"數據倉庫"我們就可以根據需要隨時查詢某職工的基本情況，也可以查詢工資在某個范圍內的職工人數等等。這些工作如果都能在計算機上自動進行，那我們的人事管理就可以達到極高的水平。此外，在財務管理、倉庫管理、生產管理中也需要建立眾多的這種"資料庫"，使其可以利用計算機實現財務、倉庫、生產的自動化管理。
J.Martin給資料庫下了一個比較完整的定義：資料庫是存儲在一起的相關數據的集合，這些數據是結構化的，無有害的或不必要的冗餘，並為多種應用服務；數據的存儲獨立於使用它的程序；對資料庫插入新數據，修改和檢索原有數據均能按一種公用的和可控制的方式進行。當某個系統中存在結構上完全分開的若干個資料庫時，則該系統包含一個「資料庫集合」。

Ⅵ Visual Basic 6.0榪炴帴Access鏁版嵁搴撻棶棰

鍝ヤ滑,鑰佷埂鍟!

浠ヤ笅鍐呭規垜閮芥槸鎽樿嚜浠庨浂鍩虹瀛Visual Basic:

VB鎻愪緵浜嗗氱嶈塊棶鏁版嵁搴撶殑鏂規硶:Data鎺т歡,ADO Data鎺т歡,DAO,RDO,ADO絳
(1)Data鎺т歡鏄涓嶉渶瑕佺紪紼嬭岃兘璁塊棶鐜板瓨鏁版嵁搴撶殑鏂規硶.
(2)ADO Data鎺т歡鏄浣跨敤ADO(涓縐嶆渶鏂扮殑璁塊棶鏁版嵁鐨勬帴鍙)蹇閫熷壋寤烘暟鎹緇戝畾鎺т歡鍜屾暟鎹鎻愪緵鑰呬箣闂寸殑榪炴帴.鍏朵腑鏁版嵁緇戝畾鎺т歡鍙浠ユ槸浠諱綍鍏鋒湁Datasource灞炴х殑鎺т歡;鏁版嵁鎻愪緵鑰呭彲浠ユ槸浠諱綍絎﹀悎OLE DB瑙勬牸鐨勬簮.
(3)DAO(鏁版嵁璁塊棶瀵硅薄)鏄鍏ㄩ潰鎺у埗鏁版嵁搴撶殑瀹屾暣緙栫▼鎺ュ彛,鐢ㄦ埛鍙鐢ㄨ繖浜涘硅薄鐨勫睘鎬у拰鏂規硶鏉ュ疄鐜板規暟鎹搴撶殑鎿嶄綔,濡備綍鍒涘緩鏁版嵁搴,瀹氫箟鏁版嵁搴撹〃,瀛楁靛拰緔㈠紩浠ュ強寤虹珛琛ㄩ棿鐨勫叧緋,璁板綍瀹氫綅鎴栨煡璇㈢瓑.
(4)RDO(榪滅▼鏁版嵁瀵硅薄)鏄鍏ㄩ潰鎺у埗榪滅▼ODBC鏁版嵁搴撶殑瀹屾暣緙栫▼鎺ュ彛.
(5)ADO(ActiveX鏁版嵁瀵硅薄)鏄璁塊棶OLE DB鐨勫簲鐢ㄧ▼搴忔帴鍙,鏄鏈鏂扮殑,鏈鐏墊椿鐨,涔熸槸鏈綆鍗曠殑.OLE DB鏄鏁版嵁璁塊棶鐨勪綆綰ф帴鍙,瀹冭兘澶勭悊浠諱綍綾誨瀷鐨勬暟鎹,鑰屼笉綆″叾鏍煎紡.ADO鏄寰杞鏂扮殑閫氱敤鏁版嵁瀛樺彇妗嗘灦,瀹冨寘鍚浜嗘暟鎹搴撹塊棶瀵硅薄(DAO),榪滅▼鏁版嵁瀵硅薄(RDO)鍙婂嚑涔庢墍鏈夊叾浠栨暟鎹瀛樺彇鏂瑰紡鐨勫叏閮ㄥ姛鑳.鐢ㄦ埛鍙浠ュ埄鐢ˋDO榪炴帴Access,SQL Server,Oracle鍙婂叾浠栫殑鏁版嵁婧.

VB鍙浠ヨ塊棶浠ヤ笅3綾繪暟鎹搴:
(1)Jet鏁版嵁搴:鏁版嵁搴撶敱Jet寮曟搸鐩存帴鐢熸垚鍜屾搷浣,涓嶄粎鐏墊椿鑰屼笖閫熷害蹇.VB榛樿ょ殑鏁版嵁搴撴牸寮忎負Microsoft Office Access鏍煎紡,鎵╁睍鍚嶄負MDB.VB鍜孉ccess鏁版嵁搴撶＄悊緋葷粺鍏變韓Jet鏁版嵁搴撳紩鎿.
(2)ISAM鏁版嵁搴:緔㈠紩欏哄簭璁塊棶鏂規硶(ISAM)鏁版嵁搴撴湁鍑犵嶄笉鍚岀殑褰㈠紡,濡侱base,FoxPro,Text Files鍜孭aradox.鍦╒B涓鍙浠ョ敓鎴愬拰鎿嶄綔榪欎簺鏁版嵁搴.
(3)ODBC鏁版嵁搴:寮鏀懼紡鏁版嵁搴撹繛鎺,榪欎簺鏁版嵁搴撳寘鎷閬靛畧ODBC鏍囧噯鐨勫㈡埛/鏈嶅姟鍣ㄦ暟鎹搴,濡侻icrosoft SQL Server,Oracle,Sybase絳,VB鍙浠ヤ嬌鐢ㄤ換浣曟敮鎸丱DBC鏍囧噯鐨勬暟鎹搴.

涓嶈繃鍏勫紵,鎴戣繕鏄鍔濅綘澶氱粌涔,榪炴帴鏁版嵁搴撶殑鍘熺悊浣犵殑鑴戝瓙閲屽氨鏈夋濊礬浜!