欢迎来到天天文库
浏览记录
ID:38279901
大小:115.50 KB
页数:14页
时间:2019-06-07
《_VB常用内部函数》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、VB我们准备了很多常用的内部函数,供我们在编程时使用。使用函数可以带来很大的方用函数有如—下两种方法::(1)如果需要使用返回值,其格式为:变量名=函数名(参数列表)(2)如果不需要使用返回值,其格式为:函数名 参数列表所谓参数,就是在调用函数时交给函数处理的数据。所渭返回值,就是函数经过一系列运面返回给调用者的值。一、输入输出函数输入输出函数也可以称为交互式函数,是用来输入数据和输出信息的。主要有输入函数Input和输出函数Msgbox,下面将详细介绍这两个函数。Inputbox函数用于接收用户从键盘输入的数据的函数。此函数的—个优点在于:该函数使的是对话框界面,可以提供一个良好的交
2、互环境。其使用格式为:InputBox(提示信息,[标题],[缺省值])其中,“提示信息”是指该函数弹出的对话框中向用户显示的信息,一般是用以提示用户输入什么内容;“标题”则是这个对话框的标题,它是可以省略的,如果缺省,该对话框的题默认为“工程l”:“缺省值”则是提供给用户缺省输入的内容,它也是可以省略的。例如 我们要输入自己的名字,可以使用如下代码: N=InputBox("请输入您的姓名","输入姓名","张三")这行代码是使用Inputbox函数,让用户输入姓名,然后存到变量N中去。当用户输入姓名并单击“确定”后,输入的姓名将会被存到变量N中去;因为已经提供了缺省值,所以可
3、以不输入任何数据而直接单击“确定”,这时保存的将是“张三”;如果用户单击的是“取消”的话,变量N的值将为空。使用该函数输入的任何数据都将被认为是字符型的,如果想要得到其它类型的数据,还需要进行类型转换。Msgbox函数是以对话框的形式输出信息的函数,它还可以让用户在对话框内进行相应的选择,然后将选择结果返回给程序。该函数的使用格式为:Msgbox(输出信息,[按钮],[标题])其中,“输出信息”是要显示的内容或提示用户进行选择的信息;“按钮”是指向用户提供的选择,一般是由“是/否”、“重试/取消”、“确定/取消”等组成的按钮组合,如果缺省,则只有一个“确定”按钮;“标题”则是对话框的标
4、题,如果缺省的话,默认值也为“工程1。”按钮参数不仅包含提供用户选择的按钮,还可以包含一个用来表示对话框功能的图标以及缺省按钮。这些按钮、图标、缺省按钮都是VB的内部常量,有关按钮的常量如下表所示。常量名值按钮bOKOnly0只有确定按钮vbOKCancelvbAbortRetryIgnore12确定和取消按钮终止、重试、忽略按钮VbYesNoCancelVbYesNo34是、否和取消按钮是和否按钮vbRetryCancel5重试和取消按钮前面提到的图标共有四种,分别用来表示警告、询问批评、消息,右关这些图标的常量表所示。常量名vbCritical值16图标显示警告图标VbQuesti
5、OnvbExclamatiOn3248显示询问图标“?”显示批评图标“!”VbInformation64显示输出信息“i”另外,有关缺省按钮的常景如下表所示。常量名vbDefaultButton1值0作用第一个按钮为缺省按钮vbDefaultButton2vbDefaultButton3256512第二个按钮为缺省按钮第三个按钮为缺省按钮vbDefaultButton4768第四个按钮为缺省按钮在设置“按钮”参数时。只需在以三类中分别选出合适的数值或相应的常量,将数值直接或者将常量用加号连接即可得到“按钮”参数的值。在每一类中选择不同的值会产生不效果,一般情况下最好使常量相加的形式表示
6、,这可以提高程序的可读性。 当用户选择对话框中的某个按钮时,MsgBox函数将返回一个值,以供程序根据用户的选择来进行相应的操作。这个返回值也是VB的内部常量。常量名VbOK值1按钮选择了“确定”按钮vbCancelvbAbortVbRetry234选择了“取消”按钮选择了“终止”按钮选择了“重试”按钮VbIgnore0选择了“忽略”按钮VbYesvbNo67选择了“是”按钮选择了“否”按钮下面我们来看这样一段程序代码: PrivateSubFormLoad() OnErrorGoToXX DimaAsString,bASInteger A=Dir(“a:abc.Txt”) Exit
7、Sub Xx:b=MsgBox("读取软盘时出错,请插入软盘后重试",vbCritical+vbAbortRetryIgnore+vbDefaultButton2,"错误提示") Ifb=vbAbortThen End Elseifb=vbRetryThen Resume Else ResumeNext EndIf EndSub在上面这个程序中,“OnErrorGoToXX'’是错误捕获语句,它的含义是当出现错误时程序将转到行标号指
此文档下载收益归作者所有