测量专业基本计算与编程(2)

End Sub

2、 函数（Funtion）

Visual Basic中包含两大类函数；一类是VB本身提供的已被封装好的通用函数，它不需要用户去创建和声明及编程，只需要直接调用；另一类是用户自定义函数。 ? 常用函数：包括数学函数、字符串函数、日期函数、类型转换函数。 ① 数学函数

函数表达式 函数功能说明 Abs( 表达式) 绝对值函数。

Int(表达式) 取整函数, 将表达式的值转换为小于或等于该表达式的最大整数。 Fix(表达式) 取整函数, 将表达式的值的小数部分截去，直接取整数。 Atn(表达式) 反正切函数。 Sin(表达式) 正弦函数。 Cos(表达式) 余弦函数。 Tan(表达式) 正切函数。 Sqr(表达式) 平方根函数。

Exp(表达式) 以e为底的指数函数。

Sgn(表达式) 符号函数，表达式值为正数、零、负数，函数值分别为1、0、－1。 Rnd(表达式) 随机数生成函数，返回0与1之间的单精度的随机数。

②字符串函数

函数表达式 函数功能说明 函数表达式 功能

Len(字符串) 字符串长度函数 Str(表达式) 字符串函数 Instr

查找字符函数

Lcase$(字符串) 将字符串的字符转换成小写字母。 Ucase$(字符串) 将字符串的字符转换成大写字母。 Left$(字符串，表达式) 左截取字符函数 Right$(字符串，表达式) 右截取字符函数

Mid$(字符串，起始位置，长度) 从字符串的起始位置截取指定的长度的字符串。 LTrim$(字符串) 将字符串的左边空格去掉返回字符串。 RTrim$(字符串) 将字符串的右边空格去掉返回字符串。 Trim$(字符串) 将字符串的前后空格删除返回字符串。 InStr( ) 字符串匹配函数 StrComp() 字符串比较函数 Space(表达式) 返回由数值指定的一定数目的空格字符串。 ② 日期函数

函数表达式 函数功能说明

Year(日期表达式) 日期表达式为任意整数或字符型表达式，返回值为年份。 Month(日期表达式) 日期表达式为任意整数或字符型表达式，返回值为月份。

Weekday(日期表达式) 日期表达式为任意整数或字符型表达式，返回值为星期。 Day(日期表达式) 日期表达式为任意整数或字符型表达式，返回值为月份的天数。 Hour(日期表达式) 表达日期表达式对应天中的小时。 Minute(日期表达式) 表示指定时间的分钟数。 Second(日期表达式) 表示指定时间的秒数。 Now 返回计算系统的日期和时间。

Data$ 返回当前系统日期，以字符串格式：月－日－年或月/日/年表示。 Time$ 返回当前系统日期，以字符串格式：时：分：秒。

④转换函数及其它

函数表达式 函数功能说明 函数表达式 功能

Str$(数值表达式) 字符串函数，将数值表达式转换成字符串。 Val(字符串) 将文本字符串变为数值型数据。 Asc(字符) 返回字符的ASCII码值。

Chr$(整数) 将0－255之间的整数转换为对应的ASCII字符。

EOF(文件号) 读取文件进程函数，读到文件末尾，则其函数值为 True或1。 Error(错误代码) 错误响应函数，返回错误代码所对应的错误信息字符串。 Format(变量, 格式字符串) 输出格式函数。

RGB(R,G,B) 颜色定义函数， R、G、B为数值表达式。

Sell（字符串） 可执行程序运行函数，字符串：为执行程序的路径。 Tab（整数） 文件输出定位函数。

? 用户自定义函数（Funtion Procedure）

其用途与建立方法类似于通用过程，只是通用过程是单方向调用，只有参数传给过程，而没有参数值的返回；而用户自定义函数是双向的，调用时参数传入函数，函数执行完毕后返回其函数值。故用户自定义函数像变量一样有自己的类型，它决定了函数返回值的类型。其描述为

Funtion 函数名称（参数1，参数2，…）As 类型名称 程序语句代码 End Funtion

Funtion 函数名称（参数1，参数2，…）As 类型名称 程序语句代码1 Exit Funtion 程序语句代码2 End Funtion

3、 方法（Method）

面向对象的程序设计语言为程序设计人员提供了一种特殊的过程和函数称为方法。在VB中一些通用的函数与过程编好并封装起来，作为方法供用户直接使用。方法是针对特定对象执行一项任务的过程或函数。如在早期的 Basic 语言中，往屏幕上显示信息和像打印机打印该信息，其语句是有区别的，即用 PRINT 语句表示像屏幕打印，而 LPRINT才是向打印机打印某信息，不同的对象完成同一任务其命令语句是不同的。而 VB 语言将打印功能封装成一特殊的 Print 方法，向不同的对象上打印信息直接指明对象，调用同一方法即可完成。

方法调用的语法为：

对象名称.方法 1.6 应用程序的设计 1、设计应用程序的界面 设计一个窗体

窗体对象是VB应用程序设计的基本构造模块，是运行应用程序时与用户交互操作的实际窗口。窗体有自己的属性、事件和方法。设计窗体的第一步是设置它的属性，窗体的属性很多，它不仅控制着窗体的外观，还控制着窗体的位置、行为等其它方面。属性可以在设计程序时在\属性\窗体中设置，也可以在程序运行时由代码来实现。窗体的属性如：BorderStyle、Caption 、Height、 Left MaxButton、MinButton、Moveable、Name、ShowInTaskar、WindowState、Icon等。

向窗体上添加控件

根据自身的需要在窗体上加不同的控件，并使用代码控制来完成不同的任务。向窗体上添加控件要使用控件工具箱和窗体编辑器。实用工具箱向窗体添加控件有两种途径：其一在工具箱中的控件按钮上双击，则窗体的中央会出现一个相应的控件；其二在工具箱中的控件按钮上单击，则该按钮会凹下去，鼠标指针变为＋形状，然后在窗体的合适位置按下鼠标左键即可。要删除不合适的控件只要选中然后按下DEL键即可。 设置启动窗体

除了窗体的细节设计以外，还要考虑应用程序的开始与结束。每个应用程序都有自己的入口及开始执行的地方。这里可以使用两种方法来加以实现。其一设置启动窗体，从\工程\菜单中选择\工程属性\命令，在显示对话框中选择\通用\选项卡，在\启动对象\列表中选取新启动的窗体，单击\确认\按钮即可。其二采用不使用启用窗体开始运行程序的方法，可在标准模块中创建一个名为 Main 的过程，如 Sub Main( ) 过程代码 End If Main 过程必须在一个标准模块内，不能在窗体模块内。要将 Sub Main 过程设为启动对象，可从\工程\菜单中选择\工程属性\命令，在显示对话框中选择\通用\选项卡，在\启动对象\列表中选定\，单击\确认\按钮即可。 使用函数生成的对话框 在应用程序中，可能会需要显示一些暂时性的简短的错误或警告信息，可以引起用户的注意。用户可以设计一个窗体来完成这个任务，但最简便的方法是使用 MsgBox 函数来完成则更直接、更为方便。MsgBox 函数可以用来在对话框中显示消息，并等待用户单击按钮，然后返回一个整形的值，让程序了解用户单击的是哪个按钮。MsgBox 函数的语法为： MsgBox( prompt [,buttons] [,title] [,helpfile,context])

另外可采用 InputBox 对话框实现一些简单的数据或信息的输入，并返回包含文本框的内容的字符串，InputBox 对话框的语法为：

InputBox（prompt [,title] [，default] [,xpos] [,ypos][,helpfile,context])

2、编写 …… 此处隐藏：2863字，全部文档内容请下载后查看。喜欢就下载吧 ……