VB高级语言技巧.pdf

VB高级语言技巧.pdf

ID:32020448

大小:15.21 MB

页数:63页

时间:2019-01-30

VB高级语言技巧.pdf_第1页
VB高级语言技巧.pdf_第2页
VB高级语言技巧.pdf_第3页
VB高级语言技巧.pdf_第4页
VB高级语言技巧.pdf_第5页
资源描述:

《VB高级语言技巧.pdf》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第四讲VB高级语言技巧信息管理系刘世峰博士1[内容简介]•本章以一个多功能计算器应用程序为实例–对第3章所开发的简单计算器进行功能扩展–在基础上,较系统介绍数组、过程、函数的定义和使用方法–详细讲解了鼠标和键盘的常用使用技巧。–•通过本章的学习,你将初步具备利用VB编程各类高级应用程序的能力。2[学习目标]–1.掌握数组的使用方法–2.掌握键盘、鼠标的使用技巧–3.掌握过程和函数的定义和调用方法–4.掌握API函数的调用方法–5.了解枚举及自定义数据类型–6.了解“多功能计算器”程序设计过程34.1“多功能计算器”程序任务•目的:对上

2、一讲的“计算器”程序进行扩展和完善44.1.1任务概述•能否利用第3章所学知识,对这个程序进行一些功能扩展,比如将计算结果转换成十六进制呢?•文本框主要是用于显示信息的,那么能否禁止用户通过键盘在其中输入数据呢?•能否使计算器窗体总是悬浮在其他窗体之上,以便于使用呢?5•在编写数字区按钮事件代码时,工作量过于重复。10个按钮要编写10个Click事件处理程序,如果有100个这样的按钮,是不是意味着我们要编写100个这样的程序呢?仔细分析这些代码,会发现它们基本相同,那么能否采用合并同类项的方法,以减少代码设计的工作量呢?6•本讲任务将

3、针对上述问题,利用数组、键盘控件、自定义函数等方法,对简单计算器程序进行功能扩充,运行结果如图所示7禁止用户键盘输入当鼠标移动时,自采用控件动显示提数组重新示信息设计84.1.2界面设计新知识:控件数组94.1.3代码设计1.用API函数实现“总在前面”效果102.数字区的命令按钮的Click事件与普通Click事件的区别11PrivateSubCommand1_Click(IndexAsInteger)'使用Str函数将Index转换为字符串,然后使用Trim函数去掉前端空格。IftxtLabel.Text=""ThentxtFir

4、st.Text=txtFirst.Text+Trim(Str(Index))ElsetxtSecond.Text=txtSecond.Text+Trim(Str(Index))EndIfEndSub123.禁止用户在文本框中输入数字•三种方法可实现这种功能–一是将文本框的Enabled属性设置为False;–二是将文本框的Locked属性设置为True;–三是通过代码控制键盘事件13PrivateSubtxtResult_KeyDown(KeyCodeAsInteger,ShiftAsInteger)KeyCode=0'禁止所有的键盘

5、输入(除BackSpace退格键外)EndSub由于上述方法不能禁止BackSpace退格键,因此需要在KeyPress事件中额外编写代码。PrivateSubtxtResult_KeyPress(KeyAsciiAsInteger)KeyAscii=0'禁止BackSpace退格键EndSub144.修改“计算结果”按钮的Click事件代码'将计算结果转换为十六进制数字txtHex.Text=Hex(MyResult)‘将计算结果转换为大写数字,由于需要编写大量代码,所以采用函数功能完成。txtBig.Text=ChangeMe(M

6、yResult)155.编写ChangeMe函数代码16PrivateFunctionChangeMe(FirstAsDouble)AsString'声明变量DimstrFirstAsStringDimstrBig(9)AsString'声明一个字符串数组DimstrTe⛲夯泳ǫ䫃포〤㍳鑒爿찯⛲⛲붧Dimi,jAsInteger'设置数组变量的值strBig(0)=“零”:strBig(1)=“壹”:strBig(2)=“贰”strBig(3)="叁":strBig(4)="肆"strBig(5)=“伍”:strBig(6)=“陆

7、”:strBig(7)=“柒”:strBig(8)=“捌”strBig(9)="玖"'将Double型的参数First转换为字符串型strFirst=Trim(str(First))strTemp="“'开始数字转换Fori=1ToLen(strFirst)j=Val(Mid(strFirst,i,1))'取第i位置的字符数字,并将它转换为数值型strTemp=strTemp+strBig(j)'通过数组完成大写转换NextI'将转换结果返回ChangeMe=strTempEndFunction174.2数组的使用184.2.1数组1

8、.数组的概念–在实际编程时,经常会对一批具有相同属性的数据整体进行处理,这时就会用到数组类型了。–VB中把一组具有同一名字,不同下标的变量称为数组,它实际上是一组相同类型的变量的集合。–根据下标的个数可分为一维数组、二维

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。