東華大學VB復習提綱

1、一. 選擇和填空重點復習的知識點 1. 引用Form自身屬性時應使用什么名稱表示Form本身Me2. For循環(huán)語句循環(huán)次數(shù)的判斷循環(huán)次數(shù)=int（終值-初值/步長+1）3. 窗體控制焦點定位的屬性名稱Location TABINDEX4. Unicode和ASCII編碼方式的異同1.ASCII編碼占一個字節(jié),UNICODE占兩個字節(jié)!2.ASCII只支持英文字符和一些符號,不支持中文!UNICODE支持很多語言!3.ASCll比UNICODE更早被開發(fā)出來!4.UNICODE兼容ASCll5. 文本框， 圖片框， 定時器控件，P28textbox picturebox timer 復選框 P

2、73checkbox (主要屬性：Text, Checked, CheckState。主要事件：Click, CheckedChanged。)列表框 P92 listbox屬性名 值類型 說明 屬性設置/引用 Items(Index)Object保存列表框的所有項目的數(shù)組 設計階段、運行階段 SelectedIndexInteger列表框中當前選中項的序號，-1表示沒有選中項 運行階段 SelectedItem Object列表框中的當前選中項，Nothing表示沒有項被選中 運行階段 Items.Count Integer列表框中所有項的總數(shù)。 運行階段 SortedBoolean確定列表框

3、中的項在程序運行時是否排序 設計階段 方法名 格式 說明 AddAdd(item As Object)向列表框末尾添加項。 InsertInsert(index As Integer, Item As Object)將項插入列表框的指定序號處 RemoveRemove(Item As Object)從列表框中刪除指定的項 RemoveAtRemoveAt(index As Integer)刪除列表框中指定序號的項 Items.Clear Clear()刪除列表框的所有項 組合框的主要方法和屬性及作用P93combobox（DropDownStyle）DropDown：下拉式組合框，由一個文本框

4、和一個下拉列表構(gòu)成（默認樣式）。 Simple: 簡單組合框，與下拉式組合框類似，但直接顯示多個項目。DropDownList:下拉式列表框，沒有文本框，只能顯示和選擇textbox：copy選定；cut選定paste選定picture box; picturebox1.image=image. fromfile autosize調(diào)框 stretchimage調(diào)圖timer：interval毫秒start,stopcheckbox : checkstate .checked/unchecked/undeterminedlistbox:listbox1.items.add/clear()/rem

5、ove/ removeat(指定序號)/insert(內(nèi)容，指定序號)listbox.selectedindex>=0選中，序號combox：dropdown文本框和下拉列表 simple dropdownlist無文本框6. 格式化函數(shù)的使用P51Format(表達式,"格式") Format(result, "0.#")7. 結(jié)構(gòu)化程序設計的幾種控制結(jié)構(gòu)P64順序結(jié)構(gòu) 賦值： 變量名=表達式 選擇結(jié)構(gòu)（if p69 , select case =>select case xxxxx/case a/./case b/./case c/./e

6、nd secect, Goto p72 => A:/./. B:/./. goto A）循環(huán)結(jié)構(gòu)p75（計數(shù)For-Next，條件Do-Loop）8. Redim的使用及特點 P86 Preserve保存之前的值ReDim Preserve a(3)9. 參數(shù)傳遞的兩種方式及特點 P110傳值 byval傳地址 byref Function pd(ByVal x As Integer, ByRef y As Integer) As Integer . pd = 什么 End Function10. 菜單項（menustrip在頂上的一條，contextmenustrip 右擊出來的一條）

7、的主要屬性及如何設置 P123菜單項名.checked=T/F分割線 菜單項名輸入“-”菜單項名(&熱鍵，如&E)11. 語法錯誤有哪幾種語法錯誤、運行時錯誤（異常）、邏輯錯誤12. 常用的字符串操作函數(shù)及使用，如Mid, Left等 P54(表格)13. 多維數(shù)組元素個數(shù)的計算 P85（下標上界+1）×（下標上界+1）×=數(shù)組元素個數(shù)14. 打開通用對話框的應調(diào)用什么方法msgbox("提示文字"，vbyesno+vbquesetion+vbdefaultbutton2,"標題")15. 文件存取的方法有哪兩種順序存

8、取和隨機存取16. visual studio框架和的關系后者是前者的一部分17. 合法標示符的定義規(guī)則 P43必須以字母、漢字或下劃線開頭，后跟字母、漢字、數(shù)字或下劃線等字符不能包含小數(shù)點、空格等標點符號或類型聲明字符（&、%、！、#、$）常量名、變量名的長度不能超過255個字符不能使用VB.NET保留字。如Sub、Integer、Dim、If、End等一般不用具有特定意義的名稱做標示符，如屬性、事件、方法等，以免混淆在中不區(qū)分標識符的大小寫18. 如何產(chǎn)生在給定范圍內(nèi)的隨機整數(shù)int(rnd()*(y-x+1)+x)19. 存儲數(shù)字的不同數(shù)據(jù)類型所需字節(jié)數(shù)的大小 P4220. 運算

9、符的優(yōu)先級關系 P50 > 負號 > */ > > Mod > +-Not > And > Or > Xor(相同輸出0，不同輸出1)21. vb 程序運行時系統(tǒng)會自動運行的窗體事件過程是什么Load22. 連接運算符 & 和 +的異同 P47"abcd"+"efg"="abcdefg""abcd"&"efg"="abcdefg""123"+123=246"abc"+123

10、=error123&"abc"="123abc"23. 分組框的作用 P73a.視覺上的區(qū)分b.阻止不同組中控件之間的相互影響24. 如何使得文本框在用戶輸入時都顯示*號textbox1.passwordcha="*"25. 打開文件對話框的使用 OpenFileDialog1.Filter = "文本文件（*.txt）|*.txt" 0 OpenFileDialog1.FileName = "" If OpenFileDialog1.ShowDialog() = Windows.For

11、ms.DialogResult.OK Then FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input) End If26. 文件打開函數(shù)Fileopen的使用fileopen(文件號，文件名，打開模式)27. keydown事件中參數(shù)e.keycode的含義Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e AsSystem.Windows.Forms.KeyEventArgs) Handles Me.KeyDownEnd Sube.KeyCode = Keys.A 鍵盤上的字符

12、的ASCII碼28. 隨機文件寫入的基本單位是什么字節(jié)29. Inputbox函數(shù)的返回值是什么類型string30. 如何創(chuàng)建新字體同時賦給文本框的字體屬性TextBox1.Font = newfont("宋體", TextBox1.Font.Size, TextBox1.Font.Style)31. vs 2005都支持哪些語言VB,C#,C+,J#32. 日期類型常量的寫法#01/01/2013#dateadd(時間單位，增加量，日期) dateadd("d",5,#10/3/2011#)datediff(時間單位，日期1，日期2) datedif

13、f("yyyy",#3/25/1985#,#10/3/2011#)33. VB.net中結(jié)構(gòu)類型的定義方法二程序填空實驗 4.10， 4.5， 6.2， 6.3， 4.5， 4.8， 5.4， 6.4三. 編程題知識點：（菜單，數(shù)組，列表框，數(shù)據(jù)統(tǒng)計, 順序文件讀寫等） 4-10：Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim s, nn, detail As D

14、ouble '定義變量，s：累加和，detail:精度 Dim i As Integer 'i：計數(shù)器，nn：階乘 detail = Val(TextBox1.Text) '輸入精度 i = 0 '計數(shù)器賦初值 nn = 1 '階乘 s = 1 '累加和賦初值 Do '循環(huán)開始 i = i + 1 '計數(shù)器自加 nn = nn * i '計算每次循環(huán)中的階乘 s = s + 1 / nn '將每一項累加到累加和s中 Loop While 1 / nn >= detail '判斷結(jié)束條件：每一項小于精度

15、控制值時停止循環(huán) TextBox2.Text = s '輸出結(jié)果 End SubEnd Class3-1Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim h, m, s, x As Integer '變量分別保存小時、分、秒和輸入的時間 x = TextBox1.Text '輸入秒數(shù)到變量x中 s = x Mod 60 '計算剩余秒數(shù) m = (x 60

16、) Mod 60 '計算分鐘數(shù) h = x 3600 '計算小時數(shù) Label2.Text = h & "：" & m & "：" & s '顯示 End SubEnd Class3-3Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = UCase(TextBox1.T

17、ext) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox1.Text = LCase(TextBox1.Text) End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Static i As Integer If i &

18、lt; Len(TextBox1.Text) Then TextBox1.Text = Mid(TextBox1.Text, 2) & Microsoft.VisualBasic.Left(TextBox1.Text, 1) i = i + 1 End If End SubEnd Class3-4Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim birth As String

19、birth = Mid(TextBox1.Text, 7, 8) TextBox2.Text = Microsoft.VisualBasic.Left(birth, 4) & "-" & Mid(birth, 5, 2) & "-" & Microsoft.VisualBasic.Right(birth, 2) TextBox3.Text = DateDiff("yyyy", TextBox2.Text, Now) End SubEnd Class3-5Public Class Form1 Privat

20、e Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim grade As Single '保存學生成績 Static sum As Single '保存總分 Static i As Integer grade = InputBox("請輸入第" & i + 1 & "位學生的成績", "成績輸入") sum = sum + grade i = i +

21、 1 TextBox1.Text = i TextBox2.Text = sum TextBox3.Text = sum / i End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim j As Integer j = MsgBox("確定要退出嗎", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "退出") If j = vbYes

22、Then End End If End SubEnd Class5-4Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '添加按鈕 If ListBox1.SelectedIndex >= 0 Then '判斷列表框中是否選中某項，如沒有項被選中，SelectedIndex值為-1，否則為選中項的下標 ListBox1.Items.Insert(ListBox1.Sele

23、ctedIndex, TextBox1.Text) '在選中項上插入新項，其內(nèi)容為TextBox1.Text的內(nèi)容 Else '沒有項被選中 ListBox1.Items.Add(TextBox1.Text) '添加新的項，其內(nèi)容為TextBox1.Text的內(nèi)容 End If End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click '向右移動按鈕 If ListBox1.SelectedIndex >= 0 Then '判斷列表框中是否選中某項，如沒有項被選中，SelectedIndex值為-1，否則為選中項的下標 ListBox2.Items.Add(ListBo