程序设计（复习用）ppt课件

计算机等级考试二级Visul Basic,第6章 常用标准控件,VB的控件可分为二类：标准控件、ActiveX控件。 标准控件 标准控件又称内部控件。标准控件总是出现在工具箱中。 ActiveX控件 这些控件可以添加到工具箱上，然后像标准控件一样使用。ActiveX部件是扩展名为.OCX的独立文件。用户在使用ActiveX控件之前，需先将它们加载到工具箱中，方法是：“工程” “部件” ，或右击鼠标“部件” 选定所需的ActiveX控件。,P110,图片框 图像框 标签 文本框 命令按钮 单选按钮 复选按钮 组合框 列表框,框架 水平滚动条 垂直滚动条 计时器 驱动器列表框 目录列表框 文件列表框 形状 直线,6.1 文本控件（标签）,第6章 常用标准控件,Name Caption Alignment BorderSaidtyle AutoSize WordWrap Font BackStyle,标签控件的名称，仅供程序设计时使用 标签中的显示的文本内容 设置文字的对齐方式（0，1，2） 设置标签的边框样式 设置标签中的内容能否自动调整大小 设置标签标题属性的显示方式 设置标题内容的字体字号 用于设置背景是否透明,常用属性,常用事件,6.1 文本控件,第6章 常用标准控件,6.1 文本控件（文本框）,第6章 常用标准控件,Text MaxLength MultiLine ScrolBars PasswordChar SelLength SelStar SelText Lock,常用属性,常用事件,设置文本框中显示的内容 设定文本框中最多可容纳的字数 设置文本框采用单行还是多行 设置文本框是否有滚动条 设置在文本框中显示效果为密码效果 当前文本框中选择的字符数 当前文本框中选择的文本起始位置 当前文本框中所选择的文本 设置文本框中的内容可否编辑,文本框没有 Caption属性,关联！,6.5 选择控件 列表框和组合框,第6章 常用标准控件,列表框有两种风格：标准和复选列表框。通过它的Style属性来设置,组合框共三种风格：下拉式组合框、简单组合框和下拉式列表框,6.5 选择控件 列表框和组合框,第6章 常用标准控件,List ListCount ListIndex Style MultiSelect Selected Text Sorted,常用属性,存放列表框的项目数据，下标是从0开始的设定 表示项目的数量，ListCount-1是最后一项的下标 选中的项目的序号， 没有项目选中时为-1。 值用来指示控件的显示类型和行为 能否在列表框中进行复选以及如何进行复选。 返回或设置列表框控件中的一个项目的选择状态。 返回最后一次选中的表项的文本 确定列表框中的项目是否按升序排列,Print List1.List(3) List1.List(2)=“应用学院” List1.(List1.ListCount-1)=“俄语系”,Print List1.Selected(1) List1.Selected(4) = True,6.5 选择控件 列表框和组合框,第6章 常用标准控件,AddItem Clear RemoveItem,方法,在列表框或组合框中插入一行文本 .AddItem ， 清除列表框或组合框中的全部内容。 列表框|组合框.Clear 删除列表框中指定的项目 列表框|组合框.RemoveItem 索引值,List1.AddItem “新闻传播学院” List1.AddItem “新闻传播学院”，2 List1.AddItem “新闻传播学院”，List1.ListIndex List1.AddItem Text1.Text List1.AddItem “Text1.Text”,List1.RemoveItem 2 List1.RemoveItem List1.ListIndex List1.Clear,6.7 计时器,第6章 常用标准控件,计时器控件(Timer)也称定时器或时钟，是按一定时间间隔周期性地自动触发事件的控件。在程序运行时，计时器是不可见的。,P141,Enable Interval,设置计时器是否对Timer事件产生响应 设置计时器触发Timer事件的时间间隔，为0时屏蔽计时器。 以毫秒为单位，取值范围为065535,常用属性,Private Sub Timer1_Timer() End Sub,事件,由Enable决定是否对事件响应,由Interval决定是时间间隔,第10章 键盘与鼠标事件过程 10.1 KeyPress 事件,P250,A,Private Sub Text1_KeyPress(KeyAscii As Integer) End Sub,65,带参数 ASCII码,97,13,KeyPreview,A,码,KeyAscii参数是KeyPress事件过程的关键，一般都是通过KeyAscii参数来获得用户的按键信息的。,一般不能获得焦点控件也不具有KeyPress事件，如标签(Label)、框架(Frame)和图像框(Image)等。,10.1 KeyPress 事件,第10章 键盘与鼠标事件过程,Private Sub Textl_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Text2.SetFocus End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Textl.SetFocus End Sub,Chr(65),Asc(“a“),10.2 KeyDow 和 KeyUP 事件,第10章 键盘与鼠标事件过程,Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) End Sub,带2个参数,KeyDown事件在用户按下按键时发生; 而KeyUp事件在用户将按键抬起的时候被激发。,A,65,难点,Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub,10.4 鼠标光标的形状,第10章 键盘与鼠标事件过程,0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 99,MousePointer,MouseIcon,10.5 拖放,第10章 键盘与鼠标事件过程,拖放是一种重要的鼠标操作。Visual Basic提供了Drag方法、DragOver事件、DragDrop事件、DragMode属性和DragIcon属性等用于鼠标拖放操作的处理。,拖放，就是用鼠标从屏幕上把一个对象从一个地方“拖拉”( Dragging)到另一个地方再放下( Dropping)。,设置自动或人工(手动)拖放模式。 在拖动时作为控件的图标。,常用属性,DragMode DragIcon,事件,DragDrop DragOver,P272,10.5 拖放,第10章 键盘与鼠标事件过程,事件,DragDrop,将一个控件拖动到一个对象上，并释放鼠标按钮,Private Sub 对象名_DragDrop(Source As Control, X As Single, Y As Single) End Sub,将一个控件拖动到一个对象上，并释放鼠标按钮产生的事件。,事件,DragOver,当拖动对象越过一个控件时，产生的事件,Private Sub 对象名_DragOver(Source As Control, X As Single, Y As Single,State As Integer) End Sub,P273,Private Sub Form_KeyPress(KeyAscii As Integer) End Sub,Private Sub Form_KeyPress(KeyAscii As Integer) Char = Chr(KeyAscii) KeyAscii = Asc(UCase(Char) Text1.Text = String(6, KeyAscii) End Sub,程序运行后，如果在键盘上输入字母“a “，则文件框中显示的内容为,Char =,Text1.Text =,KeyAscii =,Chr,(97),(KeyAscii),“a”,Asc,65,(UCase,(Char),(“a”),(“A”),String,“AAAAAA”,(6, KeyAscii),(6, 65),A) a B) A C) aaaaaa D) AAAAAA,P280,第10章 习题(课),把窗体的KeyPreview属性设置为True，然后编写如下过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift as Integer) Print Chr(KeyCode) End Sub - Private Sub Form_KeyUP(KeyCode As Integer, Shift as Integer) Print Chr(KeyCode +2) End Sub,程序运行后，如果在按“A”键，则输出结果为,Print,Print,Chr,(65),(KeyCode),“A”,Chr,“C”,(Keycode+2),(65+2),A) A B) A C) A D) A A B C D,P280,第10章 习题,P280,第10章 习题(例题),2. 使用KeyUp事件的KeyCode参数判断用户的按键，若键“B“的KeyCode = 66，则_。 A) Shift+B 的 KeyCode = 66 + 1 B) Shift+B、Ctrl+B、Alt+B 的 KeyCode = 66 C) Ctrl+B 的 KeyCode = 66 + 2 D) Alt+B 的 KeyCode = 66 + 4,1. 关于KeyPress事件的KeyAscii参数，下列说法正确的是 _。 A) KeyAscii参数返回用户所按键的ASC码 B) KeyAscii参数为字符型 C) KeyAscii参数与KeyCode参数返回值一样 D) KeyAscii参数可以省略,3.当用户按键时，KeyPress事件、KeyDown事件、KeyUp事件的执行顺序为_。 A) KeyPress事件KeyDown事件 KeyUp事件 B) KeyDown事件KeyPress事件KeyUp事件 C) KeyDown事件KeyUp事件 KeyPress事件 D) KeyDown事件、KeyUp事件不与KeyPress事件同时激发,P280,第10章 习题,5. 更改鼠标指针样式使用_。 A) MouseMove事件 B) MouseDown事件 C) MousePointer属性 D) MouseUp事件,4.关于鼠标的MouseDown事件下列说法正确的是_。 A) MouseDown事件是鼠标向下移动时被激发的事件 B) MouseDown事件的Button参数是用来判断组合键的 C) MouseDown事件不能判断鼠标的位置MouseDown事件不能判断鼠标的位置 D) MouseDown事件可以判断用户是否使用组合键,6. MouseMove事件的发生是_。 A) 当鼠标移动时将无限次的被激发 B) 每秒激发一次 C) 与鼠标灵敏度相关的 D) 伴随鼠标指针移动而连续不断发生的,P280,第10章 习题,8.下列四个选项与拖放操作无关的是_。 A) KeyPress事件 B) Drag方法 C) DragOver事件 D) DragDrop事件,7. 关于使用MouseIcon属性自定义鼠标的说法正为是_。 A) MouseIcon属性可以使用动态鼠标 B) 一般在MousePointe = 99 时使用 C) MouseIcon属性要求图标文件大小一定 D)只有窗体具有MouseIcon属性,P280,第10章 习题,1. 以下说法中正确的是_。 A) 键盘事件包括KeyDown事件、KeyPress事件和KeyUp事件 B) 鼠标事件包括MouseDown事件、MousePress事件和MouseUp事件 C) 拖放操作不能使用键盘组合键 D) Visual Basic 6.0不支持用户修改鼠标指针,2.下列关于KeyDown事件的参数的说法错误的是_。 A) Shift参数是KeyDown事件发生时， Shift, Ctrl和Alt三个键的状态 B) KeyCode参数与KeyPress事件的KeyAscii参数时一样的 C) KeyDown事件的参数与KeyUp即事件一致 D) KeyDown事件的参数不能省略,3. 当鼠标左键按下时， _事件被激发。 A) KeyDown事件 B) KeyPress事件 C) MouseDown事件 D) MousePress事件,P280,第10章 习题,4.下面关于鼠标光标的说法正确的是_。 A) MousePointer属性。时表示Windows鼠标指针的默认值 B) 设置MouseIncon属性会受KeyDown事件的影响 C) 只要设置MouseIncon属性就可以实现自定义鼠标指针 D) MousePointer属性=99时，用户可以自定义鼠标指针,5.鼠标的拖放操作会激发的两个事件是_。 A) DragOver事件和DragDrop事件 B) Drag事件和DragDrop事件 C) MouseDown事件和KeyDown事件 D) MouseUp事件KeyUp事件,6.以下四个控件选项中具有KeyPress事件的是_。 A) 标签(Label) B) 文本框(TextBox) C) 框架(Frame) D) 图像框(Image),P280,第10章 习题,7. 以下四个控件选项中，具有Drag方法的是_。 A) 菜单(Menu) B) 计时器(Timer) C) 形状控件(Shape) D) 图片框(PictureBox),P280,第10章 习题,. _。 A) B) C) D),. _。 A) B) C) D),. _。 A) B) C) D),P280,第10章 习题,. _。 A) B) C) D),第11章 菜单单程序设计,下拉菜单,弹出式菜单,11.1 Visual Basic 中的菜单,P283,11.1 Visual Basic 中的菜单,内缩符号 分隔线 访问键,数据区,编辑区,菜单项显示区,菜单编辑器的使用 “工具”菜单“菜单编辑器” 工具栏的“菜单编辑器”按钮 快捷键 Ctrl+E 右键单击窗体“菜单编辑器”,第11章 菜单单程序设计,第12章 对话框程序设计,VB的对话框分为3种类型,12.1 概述,P309,b = InputBox(“请输入姓名：“, “输入对话框“) a = MsgBox(“继续否？“, 4, “输出对话框“),特点,ControlBox MaxButton BorderStyle MinButton,12.1.3 通用对话框,通用对话框控件,P313,第12章 对话框程序设计,12.1.3 通用对话框,第12章 对话框程序设计,P313,如果在程序中有下面的语句： Commondialog1.ShowOpen 或 Commondialog1.Action = 1 在运行到上面的语句时，系统就会调出“打开”对话框。,12.2 文件对话框,第12章 对话框程序设计,P313,如果在程序中有下面的语句： Commondialog1.ShowOpen 或 Commondialog1.Action = 1 在运行到上面的语句时，系统就会调出“打开”对话框。,DialogTitle FileNmae FileTitle Filter FilterIndex Flags InitDir CancelError,常用属性,对话框标题 返回的文件名（含路径） 返回的文件名（不含路径） 设置过滤器 指定默认的过滤器 设置对话框外观 指定显示的起始目录 显示出错信息开关（按取消键）,12.2 文件对话框（例）,第12章 对话框程序设计,P318,Private Sub Command1_Click() CommonDialog1.FileName = “ CommonDialog1.Flags = vbOFNFileMustExist 4090 禁止输入对话框中没有列出文件名。 CommonDialog1.Filter = “All Files|*.*|(*.exe)|*.exe|(*.TXT)|*.TXT“ CommonDialog1.FilterIndex = 3 CommonDialog1.DialogTitle = “Open File(*.EXE)“ CommonDialog1.Action = 1 End Sub,例,12.3 其他对话框（颜色Color）对话框）,第12章 对话框程序设计,P318,“颜色”对话框是当 Action=3 时，或选择 ShowColor 方法,如在程序中有下面的语句： Commondialog1.ShowColor 或 Commondialog1.Action = 3 在运行到上面的语句时，系统就会调出“颜色”对话框。,Color Flags,常用属性,设置初始颜色，并把选择的颜色返回给程序 设置对话框的外观,Private Sub Command1_Click() CommonDialog1.Flags = vbCCRGBInit 值为 1 CommonDialog1.Action = 3 Form1.BackColor = CommonDialog1.Color End Sub,例12.2,12.3 其他对话框（字体 Font）对话框）,第12章 对话框程序设计,P323,“字体”对话框是当 Action=4 时，或选择 ShowFont 方法,如在程序中有下面的语句： Commondialog1.ShowFont 或 Commondialog1.Action = 4 在运行到上面的语句时，系统就会调出“字体”对话框。,Flags FontBold FontItalic FontName FontSize FontUnderLine,常用属性,Private Sub Command1_Click() CommonDialog1.Flags = 3 CommonDialog1.ShowFont Text1.FontName = CommonDialog1.FontName Text1.FontSize = CommonDialog1.FontSize Text1.FontBold = CommonDialog1.FontBold Text1.FontUnderline = CommonDialog1.FontUnderline End Sub,例12.3,第14章 数据文件,P357,1 掌握VB中文件的概念、种类及其结构； 2 掌握顺序文件的操作：打开、读/写、关闭； 3 了解随机文件的操作：打开、读/写、关闭； 4 了解二进制文件的操作。 5 掌握文件系统控件（驱动器列表框drvDrive、目录列表框dirDirectory、文件列表框filFile。 6 了解使用FileSystem Object (FSO) 对象模型对文件进行操作的一些基础知识,本章内容及要求：,14.1 文件概述,第14章 数据文件,P357,文件：存储在外部介质（如磁盘）上数据的集合。按名存取。,磁盘文件是由数据记录组成。记录是计算机处理数据的基本单位，它由一组具有共同属性相互关联的数据项组成。,14.1 文件概述,第14章 数据文件,P357,文件结构,字符是构成文件的最基本单位,14.1 文件概述,第14章 数据文件,P357,文件分类,根据访问文件的方式将文件分成3类： 顺序文件 随机文件 二进制文件。,1顺序文件 顺序文件（Sequential File）是普通的文本文件。顺序文件中的记录按顺序一个接一个地排列。读写文件存取记录时，都必须按记录顺序逐个进行。一行一条记录（一项数据），记录可长可短，以“换行”字符为分隔符号,2随机文件 随机文件（Random Access File）是可以按任意次序读写的文件，其中每个记录的长度必须相同。在这种文件结构中，每个记录都有其唯一的一个记录号，所以在读取数据时，只要知道记录号，便可以直接读取记录。,3二进制文件 二进制文件（Binaryfile）是字节的集合、它直接把二进制码存放在文件中。 除了没有数据类型或者记录长度的含义以外，它与随机访问很相似。 二进制文件不能用普通的字处理软件编辑，占空间较小。,14.2 文件的打开与关闭,第14章 数据文件,P359,步骤,打开（或建立）文件,读、写操作,关闭文件,14.2.1 文件的打开(建立),第14章 数据文件,P359,格式,Open 文件说明 For 方式 Access存取类型 锁定As #文件号 Len = 记录长度,OutPut Input Append Random,插入日期和时间,方式,文件号,整型 范围1511,指定顺序输出方式 指定顺序输入方式 指定顺序输出方式 指定随机存取方式,14.2.2 文件的关闭,第14章 数据文件,P361,格式,Close #文件号 , #文件号,插入日期和时间,如果不使用Cloas 语句关闭文件，则可能使某些需要写入的数据不能从内存（缓冲区）存入文件。,14.3 文件操作语句和函数,第14章 数据文件,P361,格式,插入日期和时间,注意,14.4 顺序文件,第14章 数据文件,P361,插入日期和时间,14.1.1 顺序文件的写操作,格式,Print #文件号, Spc(n)|Tab(n) 表达式 ;|,Write #文件号, Spc(n)|Tab(n) 表达式 ;|,在执行Print #语句后，系统并不是立即把缓冲区中的内容写入磁盘，只有在满足下列条件之一时才写盘: 关闭文件(Close); 缓冲区已满; 缓冲区未满，但执行下一个Print #语句。,14.4.2 顺序文件的读操作,第14章 数据文件,P368,格式,Input #文件号, 变量表,格式,Line Input #文件号, 字符串变量,格式,Input $(n,文件号),14.5 随机文件 14.5.1 随机文件的打开与读写操作,第14章 数据文件,P373,步骤,定义数据类型,步骤,打开随机文件,步骤,将数据的写入磁盘,步骤,关闭文件,随机文件的写操作,特点,14.5.1随机文件的打开与读写操作,第14章 数据文件,P374,步骤,定义数据类型,步骤,打开随机文件,步骤,将数据的读入内存,步骤,关闭文件,随机文件的读操作,14.6 文件系统控件,第14章 数据文件,P382,常用属性 Drive,驱动器名, 缺省值为当前驱动器。单击某个驱动器名，即可把它变为当前驱动器。,常用事件 Chang,常用属性 Path,常用事件 Chang,设置当前驱动器的路径,Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub,联动！,常用属性 Path Pattern FileNmae,常用事件 Chang,Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub,联动！,List ListCount ListIndex Style MultiSelect Selected Text Sorted,存放列表框的项目数据，下标是从0开始的设定 表示项目的数量，ListCount-1是最后一项的下标 选中的项目的序号， 没有项目选中时为-1。 值用来指示控件的显示类型和行为 能否在列表框中进行复选以及如何进行复选。 返回或设置列表框控件中的一个项目的选择状态。 返回最后一次选中的表项的文本 确定列表框中的项目是否按升序排列,常用属性,3.4.1 文字格式的设置,选择所需的字号,内缩符号 分隔线 访问键,3.4.1 文字格式的设置,字形是指附加于文本的属性，包括常规、加粗、下划线等。系统默认设置的文本为常规字形。,粗体效果,斜体效果,下划线效果,阴影效果,当文本属性设置好后，在“格式”工具栏上的按钮呈选中状态，如要取消设置好的属性则再单击所属按钮既可。,3.4.1 文字格式的设置,选择所需的字型,3.4.2 段落格式的设置,段落是指以按回车键结束的内容，在文档中每按一次回车键就插入一个段落标记“ ”并开始一个新段落。如果删除段落标记，则标记后的一段与前一段合并。,段落缩进包括首行缩进、悬挂缩进、左缩进和右缩进,用鼠标拖动缩进标记即可调整缩进量,如果在拖动标记的同时按住Alt键，那么在标尺上会显示出具体缩进的数值进行精确调整。,3.4.2 段落格式的设置,首行和悬挂缩进,左缩进调整,右缩进调整,3.4.2 段落格式的设置,段落间距包括各行之间的间隔距离和各段之间的间隔距离两个方面。,调整段前段后间距,调整行距,3.4.2 段落格式的设置,段落对齐方式有左对齐、右对齐、居中、两端对齐及分散对齐5种。,调整段前段后间距,调整行距,3.4.2 段落格式的设置,段落对齐方式有左对齐、右对齐、居中、两端对齐及分散对齐5种。,两端对齐,居中对齐,右对齐,分散对齐,对齐方式,3.4.3 页面修饰与应用,报纸、杂志排版时，经常需要对文章的内容作分栏编排，使得版面更生动、可读性更强。,选择分栏数目，选择1栏则取消分栏,选择栏宽及栏间距,是否显示分栏线,分栏效果预览,3.4.3 页面修饰与应用,为了更有吸引力，在报纸和杂志文章的开头往往设置首字下沉效果。这种排版方式让文档的首字变大，变得更为醒目。,首字下沉效果图,选择首字下沉方式，如选择“无”则取消首字下沉,选择首字下沉的行数,选择首字的字体,3.4.3 页面修饰与应用,在Word中可以快速地给列表添加项目符号和编号，使文档更有层次感，易于阅读和理解。,找更多的项目符号,单击“格式”工具栏上的“项目”符号按钮,选择其它项目符号,3.4.3 页面修饰与应用,在Word中可以快速地给列表添加项目符号和编号，使文档更有层次感，易于阅读和理解。,找更多的项目编号,单击“格式”工具栏上的“项目”编号按钮,选择其它项目编号,3.4.3 页面修饰与应用,在设置“项目”编号时，还可以用上述方法选择“多级符号”选项卡。在该对该编号的下级编号进行设置。,产生下级编号,选择不同的下级编号,撤消下级编号,3.4.3 页面修饰与应用,利用边框、底纹和图形填充功能可以增加段落的特定效果，以美化文档的页面。Word的边框可分为整个档页面的页面边框、段落的边框和字符边框等3种。,选择边框样式,设置边框的线型、颜色和宽度,选择边框应用范围,3.4.3 页面修饰与应用,选择底纹颜色（背景色）,设置底纹图案（前景色）,选择底纹应用范围,在设置“边框和底纹”对话框中，一定要注意“应用于”下拉列表的应用，在该选项中应用范围可以是“段落”，也可以是“文字”，其区别是：选择“文字”选项时，边框或底纹的效果只对所选的文字进行应用，而选择“段落”选项时会对所选文字的所在段落的所有字符（包括回车符）都应用。,3.4.4 版面的设置,在电脑上编辑的文稿，所进行的虽然是“无纸”操作，但是编排出的文稿一般仍需要打印在纸上，以便编辑、校对和存档。因此，在编排之前必须先选好准备打印的纸张。即使无需打印，也要先确定可用屏幕的大小。这种确定所用纸张（或屏幕）大小及相关数值的工作，就是页面设置。页面设置的合理与否直接关系到文档的打印效果。,3.4.4 版面的设置,版面的设置是经常使用的操作是页面大小、方向、边框的效果、页眉、页脚和页边距等。,3.4.4 版面的设置,版面的设置是经常使用的操作是页面大小、方向、边框的效果、页眉、页脚和页边距等。,在页面设置对话框“纸张”选项卡中。可以对纸张大小（Word系统默认纸型为A4纸）进行设置。在标准纸张的列表中选择一种纸张类型。也可选定“自定义大小”，并在“宽度”和“高度”框中分别填入纸张的大小。,3.4.4 版面的设置,页码是文档格式的一部分，在文档中加入页码，阅读方便，整理和装订也不易出错。,选择