vb神童教程 - search readpudncom

1、1VB神童教程20081215編程入門網(wǎng)Programmingvb20081211119.htm作者：小二黑序VB數(shù)據(jù)庫(kù)操作是初學(xué)者普遍感到頭疼的地方，因?yàn)楝F(xiàn)有的VB教材和資料中的數(shù)據(jù)庫(kù)操作這部分，多是泛泛而談或是一帶而過。因此就想組織一個(gè)包括添加、修改、刪除這些基本功能的數(shù)據(jù)庫(kù)操作實(shí)例供大家參考。久已未用VB6，機(jī)器里已經(jīng)裝上了VS2008，再改回VB6，感覺實(shí)在是怪怪的。還好有朋友幫忙。也許有朋友覺得vb6版本已經(jīng)很低了，做這個(gè)事還

2、有意義嗎？其實(shí)對(duì)微軟來說，VB5是VB，VB6是VB，中的也是VB；而對(duì)于許多初學(xué)者來說，VB只是VB6，為什么這么說呢？因?yàn)閷?duì)于許多不了解編程的朋友來說，似乎VB就是編程的代名詞，學(xué)編程的第一反應(yīng)就是學(xué)VB，而民間的電腦培訓(xùn)學(xué)校開設(shè)的多數(shù)都是VB6課程，那么他們學(xué)到的都是VB6；同時(shí)計(jì)算機(jī)等級(jí)考試也可以用VB6來過級(jí)，有相當(dāng)部分的朋友是為了考證而學(xué)編程的，你相信他會(huì)放著簡(jiǎn)單易學(xué)的VB6不學(xué)，而去研究龐大的.嗎？因此我覺得這個(gè)事還是值得

3、去做的。祝朋友們學(xué)習(xí)愉快！第一部分:VB數(shù)據(jù)庫(kù)操作實(shí)例VB神童教程編寫一個(gè)小型的信息管理系統(tǒng)VB神童教程準(zhǔn)備數(shù)據(jù)庫(kù)VB神童教程設(shè)計(jì)系統(tǒng)的界面及對(duì)象的屬性VB神童教程為對(duì)象添加事件代碼第二部分:補(bǔ)充內(nèi)容VB神童教程ODBC數(shù)據(jù)源簡(jiǎn)介VB神童教程配置Access數(shù)據(jù)源VB神童教程配置SQLServer數(shù)據(jù)源VB神童教程VB的ADO對(duì)象VB神童教程VBadodbConnection對(duì)象簡(jiǎn)介VB神童教程VB連接Access數(shù)據(jù)庫(kù)實(shí)例VB神童教程

4、使用ADOData控件連接Access的簡(jiǎn)單實(shí)例附錄一:編寫一個(gè)小型的信息管理系統(tǒng)編寫一個(gè)小型的信息管理系統(tǒng)受委托為編程入門網(wǎng)做一個(gè)簡(jiǎn)單的VB操作數(shù)據(jù)庫(kù)的實(shí)例，來演示一下如何用VB向數(shù)據(jù)庫(kù)中添加、修改、刪除記錄這些操作。我覺得自己是比較菜的，幾年來別人都在進(jìn)步，只有我還在原地踏步。不過沒有辦法，我們這一圈人里現(xiàn)在只有我機(jī)器上還有VB6，勉為其難，只有嘗試一下了。如果我寫的這點(diǎn)幼稚的東西能為想要了解VB數(shù)據(jù)庫(kù)操作的朋友提供哪怕是一丁點(diǎn)兒的

5、參考和幫助，將是我最為高興的事情，同時(shí)也希望高手不要見笑。我做的這個(gè)實(shí)例名為“編程入門網(wǎng)網(wǎng)址管理系統(tǒng)”，算是一個(gè)小型的信息管理系統(tǒng)吧。該系統(tǒng)后臺(tái)使用的是Access數(shù)據(jù)庫(kù)，程序中使用ADO代碼鏈接的形式連接Access。該系統(tǒng)具有向數(shù)據(jù)庫(kù)中添加、修改、刪除記錄的功能，進(jìn)行某項(xiàng)操作后能夠?qū)崟r(shí)刷新顯示數(shù)據(jù)。并在程序中加了相應(yīng)的代碼對(duì)輸入的數(shù)據(jù)進(jìn)行合法性校驗(yàn)，以避免輸入錯(cuò)誤的數(shù)據(jù)造成程序運(yùn)行不正常，程序運(yùn)行時(shí)各個(gè)操作及退出系統(tǒng)時(shí)均有友好的提示

6、框請(qǐng)用戶確認(rèn)。所有代碼均在Windows2003VusualBasic6.0環(huán)境下調(diào)試通過。系統(tǒng)運(yùn)行時(shí)如下圖：3然后對(duì)MSHFlexGrid控件進(jìn)行如下設(shè)置：1、DataSource屬性：在VB的屬性窗口中將其值設(shè)為Adodc1，即使用Adodc控件作為其數(shù)據(jù)源。2、BackColBkg屬性：在VB的屬性窗口中將其值設(shè)為&H00FFE0E0&，這是設(shè)置的MSHFlexGrid控件的底色。3、BackColFixed屬性：在VB的屬性窗口

7、中將其值設(shè)為&H00C0FFFF&，這是設(shè)置的MSHFlexGrid控件的顯示標(biāo)題的底色。4、width屬性：在VB的屬性窗口中將其值設(shè)為7695.5、Height屬性：在VB的屬性窗口中將其值設(shè)為2175.6、右擊MSHFlexGrid控件，在彈出的菜單中選“屬性”，在彈出的“屬性頁(yè)”對(duì)話框的在“通用”選項(xiàng)卡中修改行為4，修改列為4，修改固定行為0，修改固定列為0。如果數(shù)據(jù)鏈接正常，在“屬性頁(yè)”對(duì)話框的“帶區(qū)”選項(xiàng)卡中可以看到列標(biāo)題和

8、列名稱已經(jīng)設(shè)置了，這里注意應(yīng)該將“帶區(qū)”選項(xiàng)卡中的“列標(biāo)頭”選項(xiàng)勾選上，否則運(yùn)行時(shí)無法顯示列標(biāo)題，如下圖。“屬性頁(yè)”對(duì)話框的其它部分使用默認(rèn)值即可。四、向窗體中添加4個(gè)Label控件（標(biāo)簽），在VB的屬性窗口為它們?cè)O(shè)置以下屬性：1、caption屬性：分別設(shè)置為網(wǎng)站名稱、網(wǎng)站地址、網(wǎng)站描述及編號(hào)。2、Alignment屬性：均設(shè)為“2Center”。3、AutoSize屬性：均設(shè)為True。五、向窗體中添加4個(gè)TextBox控件（文本框

9、），并調(diào)整它們的位置成一排與4個(gè)標(biāo)簽相對(duì)應(yīng)，即：網(wǎng)站名稱→Text1，網(wǎng)站地址→Text2，網(wǎng)站描述→Text3，編號(hào)→Text4。六、向窗體中添加4個(gè)CommButton控件（命令按鈕），將它們的caption屬性分別設(shè)置為“添加記錄”、“修改記錄”、“刪除記錄”和“退出系統(tǒng)”，并調(diào)整它們的位置成一排，放在文本框的下方。七、在兩排文本框和命令按鈕中間，添加一個(gè)Line控件，適當(dāng)拖動(dòng)其兩端的控制點(diǎn)將長(zhǎng)短調(diào)整至適當(dāng)，并將其BderCol屬