關(guān)于學(xué)生信息管理系統(tǒng)的知識(shí)點(diǎn)

一、variant數(shù)據(jù)類型解釋:

變量定義的一種變體類型
意思是:我現(xiàn)在定義了這個(gè)變量,但是我并不確定將來對(duì)他賦予什么類型來操作,所以就先暫時(shí)向內(nèi)存借一個(gè)位置(空間)放下變量.等將來實(shí)際操作的時(shí)候動(dòng)態(tài)的根據(jù)需要為該變量賦予相應(yīng)類型

關(guān)于學(xué)生信息管理系統(tǒng)的知識(shí)點(diǎn)

二、過程中的exit sub

exit sub 的作用是結(jié)束當(dāng)前的過程,不再執(zhí)行后續(xù)程序。

關(guān)于學(xué)生信息管理系統(tǒng)的知識(shí)點(diǎn)

在此代碼中的含義是:如果檢測(cè)到文本框?yàn)榭?,則不再執(zhí)行后續(xù)進(jìn)程,返回初始,光標(biāo)定在用戶名文本框。

三、call viewdate

Call語句用于調(diào)用函數(shù)或子過程。
viewdata是函數(shù)名或子過程名來的。

調(diào)用函數(shù)或子過程序的三種方法:

  1. 直接寫該函數(shù)或子過程名;

  2. 利用變量或?qū)ο筚x值調(diào)用;

  3. 用Call語句調(diào)用;

四、mrc與mrcc

Dim Mrc as ADODB.Record
Dim mrcc as ADODB.Record
這是定義的兩個(gè)不同的記錄集,每個(gè)記錄集自在代碼運(yùn)行中都有各自的節(jié)點(diǎn)位置,互不干擾。但是可以通過對(duì)其中一個(gè)記錄集邏輯內(nèi)容的判斷,使另一個(gè)記錄集做出與判斷是否相符的事件。
下面這段代碼就是通過對(duì)mrcc記錄的循環(huán)判斷,判斷輸入內(nèi)容是否符合代碼要求,如若符合,則刪除之前mrc的記錄,更新新的記錄。在這里mrcc只是作為了對(duì)輸入內(nèi)容進(jìn)行正確與否的判斷依據(jù),與mrc并沒有任何關(guān)系。(感謝連康講解,雖然理解的還不是很好。)

txtSQL?=?"select?*?from?class_info"Set?mrcc?=?ExecuteSQL(txtSQL,?MsgText)????  If?Not?(mrcc.EOF?Or?mrcc.BOF)?Then  ????????mrcc.MoveFirst????????  ????????While?(mrcc.EOF?=?False)????????????  ????????If?(Trim(mrcc.Fields(0))?=?Trim(txtClassno.Text)?And?Trim(mrcc.Fields(1))?=?Trim(combograde.Text)?And?_????????????????Trim(mrcc.Fields(2))?=?Trim(txtDirector.Text)?And?Trim(mrcc.Fields(3))?=?Trim(txtClassroom.Text))?Then  ????????????????MsgBox?"班號(hào)或年級(jí)已經(jīng)存在,請(qǐng)重新輸入!",?vbOKOnly?+?vbExclamation,?"警告"  ????????????????mrcc.Close  ????????????????txtClassno.Text?=?""  ????????????????txtClassno.SetFocus????????????????  ????????????????Exit?Sub  ????????????Else  ????????????????'移動(dòng)到下一條記錄  ????????????????mrcc.MoveNext????????????  ????????????????End?If  ????????Wend  ????????mrc.Delete  ????????mrcc.Close  ????????mrc.AddNew  ????????mrc.Fields(0)?=?Trim(txtClassno.Text)  ????????mrc.Fields(1)?=?Trim(combograde.Text)  ????????mrc.Fields(2)?=?Trim(txtDirector.Text)  ????????mrc.Fields(3)?=?Trim(txtClassroom.Text)  ????????mrc.Update????????  ????????MsgBox?"更新數(shù)據(jù)成功!",?vbOKOnly?+?vbExclamation,?"修改班級(jí)信息"  ????Else  ?????????Exit?Sub  ????End?If

五、對(duì)于一些屬性的重新學(xué)習(xí)

窗體屬性:

windowstate——設(shè)置窗體首次顯示時(shí)的尺寸(若設(shè)置為Maximized或者M(jìn)inimized后,無法 ? ?通過Size屬性設(shè)置窗體的大?。?
MDIChild——將窗體的SDI(單文檔界面)轉(zhuǎn)換為MDI(多文檔界面)

文檔屬性:

passwordchar——設(shè)置文本統(tǒng)一字符
ScrollBars——用來設(shè)置滾動(dòng)條模式, 有四種選擇:

  • ScrollBars.None (無滾動(dòng)條),

  • ScrollBars.Horizontal(水平滾動(dòng)條),

  • ScrollBars.Vertical(垂直滾動(dòng)條),

  • ScrollBars.Both(水平和垂直滾動(dòng)條)。

注意:只有當(dāng)MultiLine屬性為true時(shí),該屬性值才有效。在WordWrap屬性值為true時(shí), ?
水平滾動(dòng)條將不起作用

MultiLine——返回或設(shè)置一個(gè)值,該值指示 TextBox 控件是否能夠接受和顯示多行文本

? 版權(quán)聲明
THE END
喜歡就支持一下吧
點(diǎn)贊10 分享