东华大学VB复习提纲

1、.选 择 和 填 空 重点 复 习 的 知 识 点Form本身1. 引用Form自身属性时应使用什么名称表示Me（终值-初值/步长+1 ）2. For循环语句循环次数的判断循环次数=i nt3. 窗体控制焦点定位的属性名称Locati onTABINDEX4. Unicode和ASCII编码方式的异同1. ASCII编码占一个字节UNICODE占两个字节！2. ASCII只支持英文字符和一些符号，不支持中文!UNICODE支持很多语言!3. ASCII比UNICODE更早被开发出来！4. UNICODE 兼容 ASCII5. 文本框，图片框，定时器控件，P28textboxpi cturebo

2、xtimer复选框P73checkbox （主要属性：Text, Checked, CheckState 主要事件：Click, CheckedChanged ） 列表框 P92 listbox属性名值类型说明属性设置/引用Items(I ndex)Object保存列表框的所有项目的数 组设计阶段、运行阶 段SelectedI ndexIn teger列表框中当前选中项的序号，-1表示没有选中项运行阶段SelectedItemObject列表框中的当前选中项， Nothing表示没有项被选中运行阶段Items.Co untIn teger列表框中所有项的总数。运行阶段SortedBoolea

3、n确定列表框中的项在程序运 行时是否排序设计阶段方法名格式说明AddAdd(item As Object)向列表框末尾添加项。In sertIn sert(i ndexAsIn teger, ItemAs将项插入列表框的指定序号处Object)RemoveRemove(ItemAsObject)从列表框中删除指定的项RemoveAtRemoveAt(index AsIn teger)删除列表框中指定序号的项Items.ClearClear()删除列表框的所有项组合框的主要方法和属性及作用P93combobox （ Drop Dow nStyle ）Drop Dow n :下拉式组合框，由一个文

4、本框和一个下拉列表构成（默认样式） Sim pie:简单组合框，与下拉式组合框类似，但直接显示多个项目。Drop Dow nList:下拉式列表框，没有文本框，只能显示和选择textbox: copy 选定；cut 选定 paste 选定picture box; picturebox1.image=image. fromfileautosize 调框stretchimage 调图timer: interval 毫秒start,sto pcheckbox : checkstate .checked/un checked/un determ inedIistbox:listbox1.items.a

5、dd/clear()/remove/ removeat( 指定序号)/insert(内容，指定序号 ) listbox.selectedindex>=0 选中，序号combox: dropdown文本框和下拉歹U表simp ledropdowniist无文本框6. 格式化函数的使用P51Format(result, "0.#")P64Format（表达式,"格式"）7. 结构化程序设计的几种控制结构顺序结构赋值： 变量名=表达式goto A)选择结构（if p69 , select case =>select case xxxxx/case

6、a/./case b/./case c/./end secect, Goto p72 => A:/./.B:/./.循环结构p75 （计数For-Next，条件Do-Loop ）8. Redim 的使用及特点 P86 Preserve保存之前的值ReDim Preserve a（3）9. 参数传递的两种方式及特点P110传值byval传地址byrefFunction pd( ByVal x As Integer , ByRef y As Integer ) As Integerpd =End Function10. 菜单项（menustrip在顶上的一条，何设置P123菜单项名.chec

7、ked=T/F分割线菜单项名输入“-”菜单项名（&热键，如&E）11. 语法错误有哪几种语法错误、运行时错误（异常）12. 常用的字符串操作函数及使用，如13. 多维数组元素个数的计算P85（下标上界+1 ）x（下标上界14. 打开通用对话框的应调用什么方法msgbox（"提示文字 ”,vbyesno+vbquesetion+vbdefaultbutton2,"标题"）15. 文件存取的方法有哪两种顺序存取和随机存取16. visual studio 框架和 的关系后者是前者的一部分17. 合法标示符的定义规则P43必须以字母、汉字或下划线开头，后

8、跟字母、汉字、数字或下划线等字符 不能包含小数点、空格等标点符号或类型声明字符（ 常量名、变量名的长度不能超过255个字符不能使用 VB.NET保留字。女0 Sub、Integer、Dim、一般不用具有特定意义的名称做标示符，如属性、事件、在中不区分标识符的大小写18. 如何产生在给定范围内的随机整数in t（rnd（）*（y-x+1）+x）19. 存储数字的不同数据类型所需字节数的大小20. 运算符的优先级关系P50A > 负号 > */ > > Mod > +-Not > And > Or > Xor（ 相同输出0,不同输出1）21. vb程

9、序运行时系统会自动运行的窗体事件过程是什么Load22. 连接运算符&和+的异同P47"abcd"+"efg"="abcdefg""abcd"&"efg"="abcdefg""123"+123=246"abc"+123=error什么con textme nustrip右击出来的一条）的主要属性及如、逻辑错误Mid, Left 等P54（表格）+1） X=数组元素个数&、%、！、#、$）If、End 等方法等，以

10、免混淆P42123&"abc"="123abc"23.分组框的作用 P73a视觉上的区分b.阻止不同组中控件之间的相互影响24. 如何使得文本框在用户输入时都显示 * 号textbox1.passwordcha="*"" 文本文件( *.txt )|*.txt"HH25. 打开文件对话框的使用OpenFileDialog1.Filter =0 OpenFileDialog1.FileName =ThenIf OpenFileDialog1.ShowDialog() = Windows.Forms.Dialo

11、gResult.OKFileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)End If26. 文件打开函数 Fileopen 的使用fileopen( 文件号，文件名，打开模式 )27. keydown事件中参数 e.keycode的含义Private Sub Form1_KeyDown( ByVal sender As Object , ByVal eAsSystem.Windows.Forms.KeyEventArgs) Handles Me.KeyDownEnd Sube.KeyCode = Keys.A键盘上的字符的 ASCII 码2

12、8. 随机文件写入的基本单位是什么字节29. Inputbox 函数的返回值是什么类型string30. 如何创建新字体同时赋给文本框的字体属性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中结构类型的定义方法二程序填空实验 4.10， 4.5， 6.2， 6.3， 4.5， 4.8， 5.4， 6.4三. 编程题知识点：(菜单，数组，列表框，数据统计 , 顺序文件读写等)4-10：Public Class Form1HandlesDim s, nn, detailAs Double' 定义变量， s ：累加和， detail: 精度Dim i As Integer'idetail = Val(TextBox1.Text):计数器，nn：阶乘' 输入精

14、度' 计数器赋初值nn = 1' 阶乘' 累加和赋初值Do' 循环开始' 计数器自加nn = nn * i' 计算每次循环中的阶乘s = s + 1 / nn' 将每一项累加到累加和 s 中Loop While 1 / nn >= detail' 判断结束条件：每一项小于精度控制值时停止循环Private Sub Button1_Click( ByVal sender As System.Object, ByVal e As System.EventArgs)Button1.Click' 输出结果HandlesDim

15、 h, m, s, xAs Integer' 变量分别保存小时、分、秒和输入的时间x = TextBox1.Text' 输入秒数到变量 x 中Mod60' 计算剩余秒数m = (x 60)Mod60' 计算分钟数h = x 3600' 计算小时数Label2.Text = h &"： " & m & "： " & s' 显示TextBox2.Text = sEnd SubEnd Class3-1Public Class Form1Private Sub Button1_Cli

16、ck( ByVal sender As System.Object, ByVal e As System.EventArgs)Button1.ClickEnd SubEnd Class3-3HandlesPublic Class Form1Private Sub Button1_Click( ByVal sender As System.Object, ByVal e As System.EventArgs)Button1.ClickTextBox1.Text = UCase(TextBox1.Text)End SubPrivate Sub Button2_Click( ByVal sende

17、r As System.Object, ByVal e As System.EventArgs)HandlesButton2.ClickTextBox1.Text = LCase(TextBox1.Text)End SubPrivate Sub Button3_Click( ByVal sender As System.Object, ByVal e As System.EventArgs)HandlesButton3.ClickStatic i As IntegerIf i < Len(TextBox1.Text)ThenTextBox1.Text = Mid(TextBox1.Tex

18、t, 2) & Microsoft.VisualBasic.Left(TextBox1.Text,1)End IfEnd SubEnd Class3-4Public Class Form1Private Sub Button1_Click( ByVal sender As System.Object,ByVal e As System.EventArgs)HandlesButton1.ClickDim birth As Stringbirth = Mid(TextBox1.Text, 7, 8)TextBox2.Text = Microsoft.VisualBasic.Left(bir

19、th, 4) &"-" & Mid(birth, 5, 2) &"-" &Microsoft.VisualBasic.Right(birth, 2)TextBox3.Text = DateDiff("yyyy" , TextBox2.Text, Now)End SubEnd Class3-5Public Class Form1Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs)Handle

20、sButton1.ClickDim grade As Single' 保存学生成绩Static sum As Single' 保存总分Static i As Integergrade = InputBox("请输入第" & i + 1 &"位学生的成绩", "成绩输入" )sum = sum + gradeTextBox1.Text = iTextBox2.Text = sumTextBox3.Text = sum / iEnd SubPrivate Sub Button2_Click( ByVal s

21、ender As System.Object, ByVal e As System.EventArgs) HandlesButton2.ClickDim j As Integer"退出")j = MsgBox(" 确定要退出吗 ", MsgBoxStyle.YesNo + MsgBoxStyle.Question,If j = vbYes ThenEndEnd IfEnd SubEnd Class5-4Public Class Form1Private Sub Button1_Click( ByVal sender As System.Object, B

22、yVal e As System.EventArgs) HandlesButton1.Click ' 添加按钮If ListBox1.SelectedIndex >= 0Then' 判断列表框中是否选中某项，如没有项被选中， SelectedIndex 值为 -1 ，否则为选中项的下标TextBox1.Text) ' 在选中项上插入新项，ListBox1.Items.Insert(ListBox1.SelectedIndex,其内容为 TextBox1.Text 的内容Else' 没有项被选中ListBox1.Items.Add(TextBox1.Text

23、)为 TextBox1.Text 的内容' 添加新的项，其内容End IfEnd SubPrivate Sub Button3_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesButton3.Click ' 向右移动按钮If ListBox1.SelectedIndex >= 0Then' 判断列表框中是否选' 列表框 Listbox2 增加' 列表框 Listbox1 减少中某项，如没有项被选中， SelectedIndex 值为 -1 ，否则为选中项的