VB(总)介绍.ppt

函数 EOF函数 ——将返回一个表示文件是否到达文件末尾的标志。 LOF函数 ——返回已用Open打开的某个文件的长度(字节数)。 Filelen函数 ——返回某个文件的长度(字节数)。 FreeFile函数 ——以整数形式返回一Open语句可以使用的下一个有效文件号。 课堂练习1 产生25个互不相同的两位整数，以5行5列的方式显示在窗体上，找出其中最大数和最小数，并显示其所在的位置，如图。 课堂练习2 随机产生25个互不相同的两位整数，以5行5列的方式打印在窗体上；然后找出每行中的最大元素，与该行中的第1列元素交换，并打印出交换后的结果，如图。 课堂练习3 产生20个三位(100~999) 随机素数，以5行4列的方式显示在窗体上。 颜色常数 常数值描述 常数 值 描述 vbBlack H0 黑色 vbRed HFF 红色 vbGreen HFF00 绿色 vbYellow HFFFF 黄色 vbBlue HFF0000 兰色 vbWhite HFFFFFF 白色 编一模拟袖珍计算器的完整程序。 要求： 输入两个操作数和一个操作符，根据操作符决定所做的运算。 为了保证程序的下沉运行，程序中对输入的操作数和操作符有检验的能力，如在规定范围以外（输入操作数非法、运算符非法或除数为零），MsgBox函数显示出错信息。 对于输入错误，擦去错的输入内容，SetFocus方法焦点定位后再输入。 当窗体上有多个具有焦点属性的控件时，为了确定程序运行时，使每次按Tab键时焦点按操作数、操作符、命令按钮的次序定位，可通过每个控件的TabIndex属性设置。 作业和实验中的问题 表达式要写在一行上 a/(b+c/d) (x+sqr(x*x+1))^(1/3) (2*y)/((a*x+b*y)*(a*x-b*y)) 1+1/(1+1/m) (d/3)^(2*x)/2 log(y+(cos(x))^2) 逻辑表达式 X+Y10 And X-Y0 Int(x)=x And Int(y)=y And x*y0 或 (X0 And Y0) Or (X0 And Y0) A=0 Xor B=0 A*B=0 And A+B0(AB) A=0 And B0 Or A0 And B=0 C1+C2=C3=255 Or C190 And C290 And C380 编写代码时输入的对象名要正确 Private Sub 控件名_事件名[(参数列表)] [局部变量和常数声明] 语句块 End Sub 注意：过程名由控件名、下划线和事件名组成 控件事件过程的语法 建立事件过程 双击窗体或控件 单击“查看代码”按钮，打开“代码”窗口，在“对象”框中选择相应的对象，在“过程”框中选择相应的事件 通用过程 通用过程是一个必须从另一个过程显式调用的程序段，使用它可使复杂程序分解成易于管理的逻辑单元。 通用过程分为公有过程和私有过程两种。 定义Sub过程 Sub过程不能嵌套定义 建立Sub过程 [ Private | Public ] [ Static ] Sub 过程名 ([参数列表]) [局部变量和常数声明] 语句块 [ Exit Sub ] 语句块 End Sub 前缀Private、Public、Static 形式参数格式： （“传值”和“传址”方式） [ ByVal] [Byref ] 变量名 [ () ] As 数据类型 ] Sub过程定义 Sub过程调用 事件过程由系统自行调用 Sub过程调用 Call语句 Call 过程名(实在参数表) 直接用过程名 过程名 [ 实参1 [，实参2 . . . ] ] 参数的传递方式有“传值”和“传址” Function过程定义（自定义函数） 语法： [ Private | Public ] [ Static ] Function 函数名 ([参数列表]) [ As 数据类型] [局部变量和常数声明] [语句块] [函数名 = 表达式] [ Exit Function ] [语句块] [函数名 = 表达式] End Function Function过程调用 函数过程名 ( [ 实在参数表 ] ) 注意：1. 函数返回的值往往需要使用，则参数必须加上括号 2. 但也可以按Sub来使用，只是此时将放弃返回值 参数的传递 形参 定义过程（Sub）或函数（Function）时，出现在形参表中的变量名、数组名称之为形式参数 形参给