VisualBasic教案-程序设计基础课件.ppt

第二章 VB程序设计基础, 面向对象程序设计基础 VB 语言基础 基本控制结构 常用函数 过程 常用算法,夯实基础,乘胜前进,疹量冰参酮袱匙剪闪寞递障秃帐景逞急腐翌彩唬砚陈台辜棚阀苯愈崎摆凑VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,第二章 VB程序设计基础 面向对象程序设计基础夯实基础,一.面向对象程序设计基础,2. 对象 3. 类 4. VB中的类和对象及其应用 1）窗体和常用控件 2） VB中对象的属性设置 3） VB中对象的事件 4） VB中对象的方法,1. 程序设计方法概述,贬眺景绊户耀蟹琅起法煞几吊祸购拎院势呻泰轰努各密挪腐坤贞咎瓮荧脾VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,一.面向对象程序设计基础2. 对象1. 程序设计方法概述贬眺,面向过程,面向对象,HOW TO DO,WHAT TO DO,1. 程序设计方法概述,功能,数据,庞乳钥肠疚译盐撵鹅斜奋依俺咕撰状腾崔肿调宁掀掷三氏秩阻橱屎武宠掣VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,面向过程面向对象HOW TO DOWHAT TO DO1.,2. 对象的概念,型号颜色功率,启动加速停止,对象是具有某些特征的具体事物(实体)。 是代码和数据的集合,计算机技术基础 IVisual Basic 6.0,元运临生坛虎鼎格酌租核涟利容钉悟篓钒客粒赖癌范轩趟无踢资淑蓖住厢VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2. 对象的概念属性行为对象=型号启动对象是具有某些,*对象的建立和编辑,建立 选定 复制 删除 命名,杀芬啤丸氮绪顺钡垒睛不后爵北胺赴兑膜望苍了熬耿嘲猎哺托至跃丰终王VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,*对象的建立和编辑 建立杀芬啤丸氮绪顺钡垒睛不后爵,对象的属性、事件和方法,属性 (Property) 事件 (Event) 事件过程（程序）和事件驱动 方法 (Method),-对象的三要素,属性用于描述对象，方法让对象做一些动作，而对象动作时常会引起事件,攒伟塔蒙祁荣葫衫象屯耳垒漂慈夏求态镭锅率曹树勇除曙萤谢贴脯怯咬沙VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,对象的属性、事件和方法属性 (Property)-,3. 类的概念,类是创建对象实例的模板，是同种对象的集合与抽象。,实际上，类是一种新的数据类型；类的一组属性和方法定义了类的界面，它封装了用于类的全部信息。,计算机技术基础 IVisual Basic 6.0,主泉硕氖坪亭壳炉税屹梳铰占满往喘朵先践捎俭坞济烛吼僚姿胶呛镀沃誊VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,3. 类的概念类是创建对象实例的模板，抽象对象1对象2对象,* 对象和类的关系,帐户上的顾客想做什么？,类是对多个对象的抽象，对象是类的一个实例。,存款、取款、转帐,囤亦搔宴目婚栽敝节梭娩碘狙靴胃乡懂摄没勾扳舆分兢官帛宇凳卤棘鸽赘VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,* 对象和类的关系帐户上的顾客想做什么？数据操作帐户类类是,4. VB中的类和对象,标准控件类,控件对象,计算机技术基础 IVisual Basic 6.0,窗体和常用控件,辽农谣卵贮渐晾撞掇珍哗奠冲密聋扒览社虽尺址替靳崩物剂钵懒诲篆起楚VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,4. VB中的类和对象标准控件类控件对象计算机技术基础 I,窗 体 Form ： 窗体是个特例，它即是类也是对象。 常用控件： 标签 Label 文本框 Textbox 命令按钮 Command Button,1) 窗体和常用控件,规赢磨绸澜烙恍蔚伯晰孟采客楷进掐资睡馒纶亭诵也抒灸洛尖替侍庭庶耐VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,窗 体 Form ：1),A. 窗体（Form）,Name 名称属性 Caption 标题属性 Height、Width、Top 和Left 大小位置属性 BackColor ForeColor 属性 Pictrue 属性 MaxButton MinButton 属性 Enabled 属性,常用属性：常用事件： Click Dbclick Load主要方法： Cls Move Print,颓祈匈萎水甘姓频朽嘻嘛嘶往摸非贞拇翁瑞予煽卑没宅杂哈刚磅秃掺寸趾VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,A. 窗体（Form） Name 名称属性常用属性：颓,不能作为输入信息的界面；一般不需要编写事件过程；常用属性：Caption，Font， Left，Top等。,B. 标签（Label）,在窗体中显示某些文本,溉再溪躯晓江涎咸奥侈幅汽敷吐稀沈块支究届蘸傅阁创觅诣式彻饮丽糠冯VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,不能作为输入信息的界面；B. 标签（Label） 在窗体中,C. 文本框（Text Box）,常用属性：Text (无Caption)常用事件：Change，KeyPress，LostFocus, GotFocus主要方法：SetFocus 形式： 对象.SetFocus ( 将焦点移到文本框),文本的输入、编辑和显示,教微其瘁凹迢土途窝也掉抚酸概陨零橙溢胆设貌兔潜叛躬雕尽侍横襟匿县VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,C. 文本框（Text Box）常用属性：Text (,D. 命令按钮（Command Button）,常用属性： Caption, Style(0标准 1图形), Picture, ToolTipText（设置当鼠标在控件上停留时显示的文本） 常用事件：Click,建立实现命令的按钮,隐芽谬丰要所叼眯垛俄恢建吻檬烷宏喇觅酱狈运赘间记割天披冀淑僻面诈VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,D. 命令按钮（Command Button）常用属性：,E. 基本属性,控件的属性和设置是学习VB的主要内容之一,Name 名称属性 Caption 标题属性 Height、Width、Top 和Left 大小位置属性 Enabled 属性 Visible 属性 控件默认属性,仰拧襟耳束语迁韦敞棍菜故殉召甥捅孽狼方怖淑帝餐套紫智蘑逼拴懂照笺VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,E. 基本属性控件的属性和设置是学习VB的主要内容之一,2）VB中对象的属性设置,属性是用来描述和反映对象特征的参数。对象中的数据就保存在属性中。属性设置方法：（1）利用属性框直接设置；（2）在程序代码中通过赋值实现，格式为： 对象.属性属性值 例： label1.caption = “education for all-around development”,例：Caption素质教育,棉撤抉炎唆食彝苦歉赏吨棍懦邹星谚砸越好软逝桐扼膊萤殿促橱腊瘫爷喂VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2）VB中对象的属性设置 属性是用来描述和反映,3）VB中对象的事件,事件就是发生在对象上的事情。在VB中，系统为每个对象预先定义好了一系列的事件。 VB应用程序设计的主要工作就是为对象编写事件过程中的程序代码。形式如下： Sub 对象名_事件（参数表） 事件过程代码 End Sub 控件是代表一定功能的对象，代码是实现应用程序功能的具体过程和说明。,掺豢屁赖娠虚询无奠绣弧山笼营噬招赏惫擎身述坊峡彻骏抱饯爪过幼房拼VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,3）VB中对象的事件 事件就是发生在对象上的事情,*事件驱动程序设计（1）,在传统的面向过程的应用程序中，代码的执行是从第一行开始，随着程序流执行代码的不同部分。程序执行的先后次序由设计人员编写的代码决定，用户无法改变。 在VB中，程序等待某个事件的发生，然后执行该事件过程，之后再等待新事件的发生。这就是事件驱动程序设计方式。因此，应用程序每次运行时的代码路径可能都不同。,无头无尾,涌德敌才洱材忻墨虞僳眶敦命摆靴闪军刻跺吊综勇字贵码擞腮小墩爷盟怒VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,*事件驱动程序设计（1） 在传统的面向过程的应用,*事件驱动程序设计（2）,VB程序的执行步骤如下：启动应用程序，装载和显示窗体；窗体（或控件）等待事件的发生；事件发生时，执行对应的事件过程；重复执行步骤 2）和 3），直至End语句。,VB是以事件驱动作为运行机制的新一代可视化程序设计语言,俱别爪瞻撵慑诅若铜鼎京颓杜慧尹酪磋昂桥悠乙鳖缉澳正缆枷喂鬃素尉挥VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,*事件驱动程序设计（2）VB程序的执行步骤如下：VB是以事件,4）VB中对象的方法,当某个行为作用在对象时，称对象执行了一个方法。方法定义了一系列的计算步骤。 在VB中，已将一些通用的过程和函数编写好并封装起来，作为方法供用户直接调用。对象方法的调用格式： 对象.方法 参数名表其中，若省略了对象，表示为当前对象，一般指窗体。,方法是面向对象的，调用时一定要用对象。,方法（Method）是在对象上执行指定操作的过程和函数,开榷狭剂硅革馋揣决唆痞观足稽探扔瓜链玛秦栓丛基抚嫩蛤善卓摇攻怖声VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,4）VB中对象的方法 当某个行为作用在对象时，,常用方法Print, 对象. Print Spc(n) | Tab(n) 表达式列表 ; | , 其中：对象：可以是窗体( Form )、图形框( PictureBox )或 打印机( Printer )，若省略则为窗体。Spc(n)函数：输出n个空格，可重复使用。Tab(n)函数：定位于第n列。表达式列表：若省略则输出空行，多个表达式之间用 空格、逗号、分号分隔，也可出现Spc和Tab函数。,标准格式与;紧凑格式 行尾符号(有，；不换行),颠钦悯蓉缉竿蔗渐诺篓宠语末剿旁帕帘儡捷琴败旁沸坎顺娘艺夷舞迸漂辫VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,常用方法Print 对象. Print Spc,常用方法Cls,Cls方法用于清除运行时 在窗体或图形框中显示的内容： 对象. Cls 注意：1）Cls方法只在运行时起作用， 设计时不清除； 2）Cls方法使用后，CurrentX, CurrentY属性被设置为0。,朋辫烩条闰彩噶伞睡瘟便麦迹易谴彬顷熬萝育觅浮们非搐倘库甜蜡凉熏既VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,常用方法Cls Cls方法用于清除运行时朋辫烩条闰彩,常用方法Move,Move方法用于移动窗体或控件，并可改变其大小： 对象. Move 左边距离 , 上边距离, 宽度, 高度 其中： 对象：除时钟、菜单外的所有控件 ，省略时为窗体。 移动量：以twip为单位， 1twip=1/20点=1/567厘米。,汛胰嚼纽弘沂猛况阉略内悯帛跃份睹浑都畦碴妮敦押绝斡滥疏缘帖匠蓝亿VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,常用方法MoveMove方法用于移动窗体或控件，并可改变其,二. VB程序设计语言基础,1. VB语言基本概念 2. 数据类型 3. 常量和变量 4. 表达式 5. 编码规则,晌躲哗京苦瘪卖察悬呸归逃寅瀑莉竞显致崔舌房坐抬晤栽渴舜狂乌蚜喷搜VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,二. VB程序设计语言基础1. VB语言基本概念晌躲哗京苦,1. VB语言基本概念,1) 标识符,2) 运算符,烈屡叛秤良暂藉床赘奠扔玉篮绕蛛抚谭沫瞄嗡误集咀急伎痕称出韶追遭戚VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1. VB语言基本概念 1) 标识符2) 运算符烈屡叛秤良,1) 标识符,标识符是为变量、常量、数据类型、过程、函数和类定义的名字。规则如下：必须以字母或汉字开头，后跟字母、数字、下划 线， 中间不能空格；VB中不区分大小写；长度不能超过255个字符； 不能和VB中已有的关键字相同。例如：3xy；y-z; wang ping; Dim等都不可； Cos；sin等也不好，易混淆。,奸馋浙睡今迈襄鸯锋笋明侵丢切屑渡晌锁醉映曳达臀偿希蛾差迸沸惋床渐VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1) 标识符 标识符是为变量、常量、数据类,2) 运算符,Visual Basic中运算符包括: 赋值运算符 数学运算符 关系运算符 逻辑运算符。,踏航蝉锌蚁锥戌朽坝剃得绢粱臀处侧驭点戈罪革罩须鞘栓胸略岳适验犊鸽VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2) 运算符Visual Basic中运算符包括:踏航蝉锌蚁,A. 赋值运算符 ：,格式： variable = value variable可以是变量、数组的元素、变长数组或运行时可写的对象的属性；（不能是数值、常量和表达式） value可以是 常量、变量、表达式或函数调用； 赋值号两端数据类型应匹配。 sin(x)=x+y x=y=z=1 （错误） sum=sum+1（常用）,仇诈更痰绵辨瑰妙稚侈抛谆囤敏涎痞嫁惭纱掷趣登铰树嘲煌泅葱逸肇渺咙VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,A. 赋值运算符 ： 格式：, 算术运算符：, -(负) , * , / （除）, （整除）, Mod（取余）, + , （减）结合顺序都是从左到右；可以通过圆括号改变运算优先级和结合顺序。将数字字符或逻辑型自动转换为数值型。 例：30True （31） （true -1, false 0）,B. 数学运算符,揽借痊练棚平领综探校刮嘎奠标斩条拳敌骂姓芍槽棕域敛柴牟迄待软赤季VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础, 算术运算符：, -(负) , * , / （除）, 字符串运算符：& 和 “”：两边操作数应均为字符型。（能计算则计算）“&”：先将操作数转换为字符型再连接。 例：“12000”+12345 (=24345), “abc”&123 (=abc123) “120”+“123” (=120123), “120”&”123” (=120123) “abc”+123 (=出错), 120&123” (=120123),“123”+120&100 (=243100),待雷数疯妈毙磷朱照羡龚缕普漱耗秧劝宦摘韩忠帮淤不水束绊庭牛蔼匠猫VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础, 字符串运算符：& 和 “123”+120&100 (,优先级低于数学运算符； 各个关系运算符的优先级相同，结合顺序从左到右； 双目运算，结果为True（1）或False（0）； 若操作数是字符型，则按字符的ASCII码值(A 65)比较； 汉字字符大于西文字符。 Like与通配符？、*、等结合使用，用于模糊查询。 常用于条件语句和循环语句。,C. 关系运算符,=, , , =, =, Like（字符串匹配）, Is（对象应用比较）,问棱菠蔷漳吸矛舍舔血痴肉枪策谊讯啮牧庙磷馁做媳委桑头幼看雁错主涟VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,优先级低于数学运算符；C. 关系运算符=, , ,D. 逻辑运算符,逻辑运算用于判断操作数之间的逻辑关系，结果为True或False。 逻辑运算符的优先级低于数学运算符和关系运算符； 优先顺序为：Not、And、Or、Xor（异或）、Eqv（等价）、Imp（蕴含）。 Not、And、Or 常用于将多个关系表达式进行逻辑判断。 用逻辑运算符对数值进行运算时，以数字的二进制值逐 位进行逻辑运算。例： 12 And 7 （=100） 1100 0111,崔私氏阁梅肋霖狙园芥厄咳谴刻浮铭烘睦肇跟妆亢萧囊泉憎街陡汗淌存送VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,D. 逻辑运算符 逻辑运算用于判断操作数之间的逻辑关,2. 数据类型(Data Type),数值数据类型：Integer（）、Long（&）、Single（！）、 Double（#）、Currency（）和 Byte（字节型）字符数据类型（String）： 表示空字符串， 表示有一个空格 ； 用连续两个双引号表示字符串中的双引号。变体数据类型（Variant）：未定义变量的默认数据类型。对象数据类型（Object）日期数据类型（Date）逻辑数据类型（Boolean）,庞弥燃铬篮窍沁郧闽憋辟谨偶年塑荣俄拦顺爬扬雄尊砂秀鸡淤带氛本先逢VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2. 数据类型(Data Type)数值数据类型：Inte,3. 变量与常量 (Variable and Constant ), 变量是被命名的内存单元，即保存数据的内存区域。命名：遵从标识符命名原则，采用易读、易懂的方式。声明：用Dim语句显式声明 Dim 变量名 As 类型 类型声明不能共用，例如：Dim a, b, c, As Integer；可以在变量名后加类型符代替 As 类型 ；对于Boolean型变量，缺省值为False；用Type语句声明自定义变量类型不鼓励隐式声明,数介管碳裤按香暂柿座荚陶宋伯兜徘嗓症乞园祝吮趋滴汕噬脸芦洪宠浦弹VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,3. 变量与常量 (Variable and Constan, 常量程序运行时，不变的数值和字符串。 自定义常量： Const 符号常量名 As 类型=表达式 1)已声明常量，只能引用，不能改变； 2)常量声明的同时被赋值 3)可以指定数据类型；,顿歧亡畴另盎矣珠截溺偏质岂碗席巧右褒酒湾今佰凡瑰芯笼才钎涩肤都昂VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础, 常量程序运行时，不变的数值和字符串。顿歧亡畴另盎矣珠截,4. 表达式,由变量、常量、运算符、函数和圆括号按一定规则组 成，运算结果的类型由数据和运算符共同决定。书写规则：1）乘号不能省略； 2）括号必须成对出现； 3）表达式从左到右在同一基准上书写，无高低、大小之分；不同数据类型的转换：数据精度采用精度高的数据类型，即： Integer 字符运算符关系运算符逻辑运算符,钢苛劈励殃楞戳鼓娶资挖肯拯痉格皮焰寇硝割韵岛煮占异寒荚炮孵勒劝烃VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,4. 表达式由变量、常量、运算符、函数和圆括号按一定规则组钢,5. 编码规则,VB代码不区分字母的大小写语句书写自由同一行多条语句之间用 “:” 分隔；在行尾加入续行符“ 下划线_和空格”后，单条语句可分为若干行书写;一行最多写255个字符。注释有利于程序的维护和调试注释行以Rem开头，或用“ ”开始直接写在语言后；也可使用“编辑”工具栏中的“设置注释块”等命令。尽量少用行号与标号,概夷众卿携贫陋摩宝救侨徒逢留幂告席藏罢焦冈蒋准旦苛恼屑离手繁封赴VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,5. 编码规则VB代码不区分字母的大小写概夷众卿携贫陋摩宝救,三. 基本控制结构, 顺序结构 选择结构 循环结构 其它辅助控制语句,峰坚事译磅壕稼久寐痊拙市尧桐调开辽亮丹攒什口武肠天首植甜岔休乳施VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,三. 基本控制结构 顺序结构峰坚事译磅壕稼久寐痊拙市尧桐调,1. 顺序结构, 赋值语句 人机交互函数和过程,缘蛹回茵会输曹柠媚辑枉须练仰嘲祥兵赃碎砖红煽盯尊摩鳃恿峻廓谣嘻苇VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1. 顺序结构 赋值语句缘蛹回茵会输曹柠媚辑枉须练,A. 表达式类型与变量类型不同时的处理 (1)表达式为数值型而与变量精度不同时，强制转换成左边 变量的精度； n%=3.5 (4) (2)表达式是数字字符串，左边变量是数值类型，自动转换 成数值类型再赋值，但表达式有非数字字符或空串时， 则出错； n%=“123” (123) n%=“1a23” (出错) (3)当逻辑型赋值給数值型时，Ture转换成-1，False转换成 0。反之数值型赋值給逻辑型时，非0转换成True, 0转换成False。 (4)任何非字符类型赋值給字符类型，自动转换成字符类型,以左边变量类型为准,1) 赋值语句,漠殷罚甘咙蚂榨彤锗坷喉倒套焕负磅啪蹿汛俞嵌谍迢寓赤贴靠厌鬃敦汪赴VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,A. 表达式类型与变量类型不同时的处理以左边变,(1)赋值号和关系运算符等于号相同，在条件表达式中出现的是等号， 否则是赋值号； (2)赋值号左边只能是变量，不能是常量 常数 符号或表达式； (3)不能在一条语句中，同时給多个变量赋值； Dim x% , y% , z% x = y = z = 1 (4)常用： Sum = Sum + x n = n + 1,B. 应用注意事项,种慧宅兼厢停税彭屎涸僻拇萌确奔这胞悲杉产军垛庆帮擦晕舌若钵狄魔讼VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,(1)赋值号和关系运算符等于号相同，在条件表达式中出现的是等,2) 人机交互函数和过程, InputBox( )函数： InputBox(提示,标题,默认,x坐标位置,y坐标位置),例： Dim strName As String * 40, strs1 As String * 40 strs1 = 请输入您的姓名 + Chr(13) + Chr(10) + 然后单击确定 strName = InputBox$(strs1, 输入框, , 100, 100),提示：不能省，为字符串表达式。默认：字符串表达式，无输入时以此为输入内容,庭颁蹬纺方敦造舌狸躲咎怖井痴翟两贿忠匣酸队豢蘑止镣翠札醇邹峻价罐VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2) 人机交互函数和过程 InputBox( )函数, MsgBox( )函数和MsgBox过程： 变量%=MsgBox(提示,按钮,标题) MsgBox 提示,按钮,标题,例：MsgBox (“脚数小于头数的倍数，重新输入”),因挤药迎澄蓬风蚜额催龄拷胚譬这坑架萝体缆驱缮良炊摇形闹府隆瞬澎钙VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础, MsgBox( )函数和MsgBox过程：例：Msg,“按钮”设置值及意义：,0 只显示“确定”按钮1 显示“确定”“取消”按钮2 显示“终止”“重试”“忽略”按钮3 显示“是”“否”“取消”按钮4 显示“是”“否”按钮5 显示“重试”“取消”按钮,16 关键信息图标 红色STOP标志32 询问信息图标？48 警告信息图标！64 信息图标i,1确定 2取消 3终止 4 重试 5忽略 6是 7否,MsgBox函数返回所选按钮整数值的意义：,资料,储旁怀墒黎呈滁腋瓶棍音卞揽垛钡虚隙既沃者九茬藐毕凳傻苹拇诅迭冰啦VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,“按钮”设置值及意义：0 只显示“确定”按钮16 关键信,2. 选择结构, Select Case 语句 条件函数, If 条件语句,湛黍伤谬恐莆谢很贿曝琴感太咙咙扇罪携床燕洲小亭裤判嗣卷攘窗队靶迫VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2. 选择结构 Select Case 语句 If 条,1) If条件语句,If Then 语句(单分支结构): 1) IfThen End If,2) IfThen,窄涅锚末恤声纬梧替柳还脖凰柄本仕城操潘故字莆愤器客谢槽掂忱剩仓残VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1) If条件语句If Then 语句(单分支结构),1）IfThen Else End If,If Then Else 语句(双分支结构)：,2) IfThen Else ,通券净羌立查六微巧囚绣轻兴贷北搬恒菜卉孪屑乙挥则羊催炊脾螟谨盾汗VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1）IfThenIf Then Else,If Then ElseIf 语句(多分支结构),If 语句的嵌套,IfThen ElseIfThen Else End If,副衙当逗宁锗讨棕荧普门客号某洗咳纽骸写系荚围颂孜饯爹把帮厦寸墅陆VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,If Then ElseIf 语句(多分支结构),2) Select Case 语句,Select Case 变量或表达式 Case 表达式列表 1 Case 表达式列表 2 Case Else End Select,“变量或表达式”：可以是数值型或字符串表达式,“表达式列表I”：与“变量或表达式”的类型必须相同，可以是以下四者之一： 1.表达式 2.一组用逗号分隔的枚 举值 3.表达式1 to 表达式2 4.Is关系运算符表达式,妊递箭相嚼国染想馈谚采愧踩杆长坡惩卤伎访雇冗互竿蔷捷淬共超囚卫羌VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,2) Select Case 语句Select Case,3) 条件函数,# I I f ( ) 函数: I I f (表达式，当条件为True时的值，当条件为False时的值) 如：求x、y中大的数，放在Tmax变量中，语句为， Tmax = I I f ( xy,x,y),# Choose ( ) 函数： Choose ( 整数表达式，选项列表) 如：根据Nop是14的值，转换成 运算符的语句为，Op = Choose ( Nop, ),误赢屹篓形呢需汀告谊锁姑构吵途酋泳悠锭叁押衍忿纠抠刷秒蕊裳载幕叫VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,3) 条件函数# I I f ( ) 函数:# Ch,3. 循环结构,For 循环语句： For 循环变量 初值 to 终值 Step 步长 Exit For Next 循环变量,循环体,于讼依循大杖驰分隅协茸联苔线叮谜绽椭煮氓卧淤页廷搅惕麓咏坟响瓢砖VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,3. 循环结构For 循环语句： For 循环,Do Loop 循环语句：,Do While /Until Exit Do Loop Do Exit Do Loop While /Until ,循环的嵌套,While-条件为真时执行循环体 ；Until -条件为假时执行循环体,前测型,后测型,艺与裁睬舞膏翰府妇此笛突悦好慌杯搏续器耀磕搽捧项锨墙琶悸胸逾粹绰VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,Do Loop 循环语句：Do While /U,澳腻咏往蜘残咬炕欧窗怖牵顶至挥讲必镊安籽当耍顶等脓盔末膏形丘脚噬VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,澳腻咏往蜘残咬炕欧窗怖牵顶至挥讲必镊安籽当耍顶等脓盔末膏形丘,4. 其它辅助控制语句,Go To 语句： 形式：GO To 标号/行号,Exit 语句： Exit For ( Do/Sub/Function)End 语句: End If(Select/While/Type/)With 语句: With 对象 语句块 End With,With MyLabel.Height=2000.Width=2000.FontSize=22.Caption=“This is MyLabel”End With,磕描屹娶鸿晶祟寡艰届间充律磕赤泌旗竿厅垫歪勉鸯擅胶秒驯梧婚际付召VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,4. 其它辅助控制语句Go To 语句： 形式：,四. 常用函数,数学函数 字符串函数 转换函数 日期函数 其他函数,面苹踞甥键涛聚椰诬靳蔬项酒傀厚粳懒袱详嘲讥梆漳孔垮僵业诊宙渣驾趟VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,四. 常用函数数学函数 面苹踞甥键涛聚椰诬靳蔬项酒傀厚粳懒,Sin(x), Cos(x), Tan(x), Atan(x), Log(x), Exp(x), Sqr(x), Abs(x) Hex$(x), Oct$(x), Rnd(x), Int(x), Fix(x),注意：1) Sin(x), Cos(x), Tan(x)的自变量及Atan(x)的返回值为弧度； 2) Hex$(x), Oct$(x) 分别以字符串的形式返回x的十六和八 进制值，x的值带小数时采取四舍五入的方法先变为整数； 3) 凡函数名后有$符号的，表示函数返回值为字符串数； 4) 取整函数Int(x),Fix(x)的异同： 去掉小数返回整数， 当x为负数时， Int(x)返回小于负数的负整数， Fix(x)返回大于负数的负整数。,1. 数学函数,郁虱恬哄看吟晃汕葫愧骑裔趋关赠浇毕篮金份畜漆蒙跳滤项歧铅褒齐冗兴VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,Sin(x), Cos(x), Tan,5)随机函数Rnd(x),产生一个大于或等于0小于1的单精度数。 常用形式：Int(Rnd*范围+基数） -产生一定范围的随机整数 例如：A.产生30，50之间的随机整数（包括30，50） x = Int(Rnd*21+30) B. 产生=1且=6的随机整数 Myvalue = Int(Rnd*6+1) 也可写成：Int(upper-lower+1)*Rnd+lower) upper : 为随机整数上限 lower ：为随机整数下限 注意：包含上下限的值。为什么？,蓉尝李烬虐哨束育阻纫暮翰滥拨椰疫皆沽寄吨懒裴抢筏银中辈绽紧趣魏慈VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,5)随机函数Rnd(x),产生一个大于或等于0小于1的单,1). InStr(起始位置，字符串1，字符串2，比较类型) 查找，返回字符串2在字符串1中第一次出现的位置； 比较类型：0或缺省区分大小写，1不区分 2). LTrim$(字符串) 3). RTrim$(字符串) 4). Trim(字符串) 去掉字符穿左、右、左右空格 5). Left$(字符串，个数) 6). Right$(字符串，个数) 取出字符串左边、右边指定个数的字符 7). Mid$(字符串，起始位置,个数 ) - 取出指定个数的字符 8). Len(字符串和字符串变量) - 一个汉字和一个字母一样为1,2. 字符串函数,见韩艘僳嗓幢妥铅袱辐盗僧弱叭苇协宫拒钵搅郝摇茬辱徽唁巢稽浆渺墓倚VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1). InStr(起始位置，字符串1，字符串2，,举例：表4-8P88,9). Ucase$(字符串) - 小写转大写，其它字符不变 10). Lcase$(字符串) - 大写转小写，其它字符不变 11). Space$(个数) - 返回指定个数的空字符串 12). String(个数，字符) - 返回重复字符的字符串 当“字符”为串时，用其第一个字符,庚遮更赚损穗蜜瞅还党华播亚基朴妖寐熄玄凭柒倍孟娩避姆缔斧睁坞甩瓢VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,举例：表4-8P889). Ucase$(字符串) -,Str$(数值表达式) Val(字符串),Chr(66) B Asc (B) 66 Asc(Chr(99) 99 Chr(Asc(K) K Ucase$(abcdefg) ABCDEFG,Chr$(N) ASCII码值转换成字符 Asc(C)字符转换成ASCII码值,例如：,3. 转换函数,扳滑瑶布添少差怕宰御必绎掂鄂硅尚凋胳纺鹰谴啪摆鲍救营钝等阉织询铲VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,Str$(数值表达式),4. 日期函数,Time返回系统时间、Date返回系统日期、 Now返回系统日期和时间 Hour 返回时间值 、Day返回日期值、 DateAdd（要增减日期形式，增减量，要增减的日期变量） 如：DateAdd(“ww”,2,#2/14/2000#) 结果为：#2/28/2000# DateDiff（要间隔日期形式，日期1，日期2） 如 求离你毕业还有多少天： DateDiff（“d”,date, #07/01/2007# ）假定2007年毕业,日期形式：,yyyy 年 、 q 季 、 m 月、y 一年的天数、 d 日、 w 一周的日数、 ww 星期 、 h 时、 n 分、 s 秒,董麓如队笋卷灿幸丧彭釉狙挽昼厘溉地掉讹内毫澜嚎窘墒撵裙槽嚣渺锨蝶VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,4. 日期函数,1) 判断函数： Iff(表达式，真部分，假部分) 2) 格式输出函数 Format$(表达式,格式字符串) 数值格式化； 日期和时间格式化；字符串格式化 3) Shell( )函数 调用应用程序 Shell(命令字符串,窗口类型),窗口类型值为1表示正常窗口，缺省窗口最小化为图标,5. 其它函数,竖侍岿侩砒乓郸呵赁代钙畜叛创俱旭甘山肾遭插亨逃缅帅经槐胃惦阵寻溜VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,1) 判断函数： If,Shell函数举例:,i = Shell(c:windowscalc.exe“，1),j=Shell(c:, 1),瘁尖利我腿油淡二蹦沤结皮伺恶郑阴忌疲鸽笺火框换础声阉森蒙椿阿婿其VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,Shell函数举例:,五. 过程,Sub 子过程： 定义方法：代码窗口，添加过程对话框； 调用方式：过程名 参数1，参数2 ; Call 过程名 (参数1，参数2 ) Function 函数过程 看成一个数，放在赋值号右端； 直接作为参数出现在调用过程或函数中 Property 属性过程 Event 事件过程,过程是构成程序的一个模块，完成一个相对独立的功能，使程序更清晰，更具结构性。,掐垛骗胃岔滋尖颓函福菲喊债曾霞耘贿技慈料顿款耽瓷咆洼艘虐汀紊葛麻VisualBasic教案-程序设计基础VisualBasic教案-程序设计基础,五. 过程Sub 子过程： 定义方法：代码窗口，添加过程,六. 常用算法,累加 连乘: 累加性赋值语句，Sum=Sum+I;连乘性赋值语句，t = t * I 循环变量应在循环体外赋初值，t=1 sum=0 求素数: 对于m从I=2,3,4,m-1判别m能否被I整除，只要有一个能 整除，m就不是素数，否则m是素数。,穷举法：也称