北京电大VisualBasic程序设计第四章VB高级语言技巧.ppt

北京电大VisualBasic程序设计第四章VB高级语言技巧.ppt

  1. 1、本文档共98页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
北京电大VisualBasic程序设计第四章VB高级语言技巧

Visual Basic 程序设计;4.1 多功能计算器任务 4.1.1 任务描述 在第三章简单计算器的基础,增加以下功能: 1. 将计算结果转换为十六进制。 2. 就数字键设置为命令按钮组,使“0”~“9”数字按键的Index属性分别为0、1、2、3、4、5、6、7、8、9。 3.禁止键盘在文本框中输入数据。 4.使计算器总是悬浮在其它窗体上。 界面如下页所示。;;4.1.2 界面设计;4.1.3 代码设计;(1)API函数调用的一般方法;;第1步:启动“API文本浏览器”;;第2步:选择“文件-加载文本文件”菜单项;加载WinAPI.txt文件。;第3步:选择API类型:声明;第4步:选择立刻用项SetWindowPos,将声明范围设置为“私有”。;按添加按钮。;第5步:就选定项下的VB代码复制;第5步:将复制的VB代码粘贴到窗体代码编辑器中的“通用-声明”部分。;习题 P115 一、单项选择题;2. 数字区命令按钮的Click事件;3. 禁止用户在文本框中输入数字;习题 P116 二、填空题;4. 修改“计算结果”按钮的Click事件代码;4. 修改“计算结果”按钮的Click事件代码;5. 编写ChangeMe函数代码;5. 编写ChangeMe函数代码;习题 P116 三、问答题;4.2 数组的使用;2. 声明静态数组;(2)方法2;3. 动态数组;习题 P115 一、单项选择题;习题 P116 二、填空题;习题 P116 三、问答题;4.2.2 控件数组;数字区命令按钮的Click事件;数字区命令按钮的Click事件也可编写如下:; …… Case 9 If txtLabel.Text = Then txtFirst.Text = txtFirst.Text + “9” Else txtSecond.Text = txtSecond.Text + “9” End If End Select End Sub 利用Select或If选择结构,通过对Index属性值的判断,响应不同按钮元素的单击事件。;习题 P116 一、单项选择题;习题 P116 二、填空题;4.2.3 枚举及自定义数据类型;4.2.3 枚举及自定义数据类型;2. 自定义类型 自定义类型与枚举类型一样,也是一种构造型数据,称为记录类型。使用方法如下: (1)定义 Public Type Student 学号 As String*10 姓名 As String*10 年龄 As Integer 籍贯 As String End Type 该语句定义了一个名为Student的数据类型。 (2)声明变量 Dim x As Student (3)使用 x. 学号 = “2004001” x. 姓名 = “张红”; 枚举和自定义类型是一种有效的数据组织方式。尽管不使用它们也照样可以开发出功能强大的应用程序,但有效地应用这两种方式,可以使程序代码更清晰、简洁。如果要使用这两种方式,最好能在模块中用Public定义,以便整个应用程序使用。;4.3 过程和函数的定义和调用;4.3.1 为什么要编写自定义过程;习题 P116 三、问答题;4.3.2 Sub 过程;如果希望定义整个应用程序均可以使用的公有过程,则最好在标准模块(Module)进行。;2. 调用;习题 P116 一、单项选择题;4.3.3 Fucttion函数; 4.3.4 参数传递机制简介;1. 引用传递参数;Private Sub Change(x As Integer,y As Integer) ’本程序将参数x,y的值互换 Dim t As Integer t=x x=y y=t ’在窗体是输出结果 Print “x=”;x,”y=”;y End Sub Private Sub Form_Click() Dim a As Integer Dim b As Integer a=3:b=4 Change a,b Print “a=”;a,”b=”;b End Sub (演示);2. 按值传递参数;4.4 键盘和鼠标使用技巧;习题 P116 三、问答题;4.4.1 响应键盘事件; 1. 焦点处理;实现控件焦点的两种方法;实现控件焦点的两种方法;

文档评论(0)

shaoye348 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档