药学院VB复习

复习 考试题型 单选题 30分 每题1分 填空题 50分 每空2分 编程题 20分 每题10分 编码基础 VB代码不区分字母的大小写一行可书写几句语句 之间用冒号分隔 一句语句可分若干行书写 用续行符 空格下划线 连接Rem开始或单撇 VB常用数据类型 变量和常量的命名规则 变量 在程序运行中其存储的值可以改变 常量 在程序运行中其值不可以改变 以字母或汉字开头 后可跟字母 数字或下划线组成 长度小于等于40个字符 不能使用VB中的关键字 VB中不区分变量名的大小写例如 1 abc2 print 653 12bc4 x y5 x y6 abs7 mn 8 int 变量声明 Dim变量名 AS类型 DimiMarkAsinteger sTotalAssingleDimiItem 注意 在通用声明处加OptionExplicit语句来强制显式声明变量 常量声明 Const常量名 AS类型 表达式例ConstMAX 100ConstMINAsInteger H13A 算术运算符 例 求表达式5 10mod10 9 3 2 2值 字符串运算符 字符串连接 123 456 结果 123456 123 456 结果 123456 区别 两边必须是字符串 不一定 abcdef 12345 结果为 abcdef12345 abcdef 12345 出错 123 456 结果为 123456 123 456 结果为579注意 123 True 结果为122 关系运算符 将两个操作数进行大小比较 结果为逻辑量 字符串比较 则按字符的ASCII码值从左到右一一比较 直到出现不同的字符为止 例 ABCDE ABRA 结果为False 逻辑运算符 将操作数进行逻辑运算 结果是逻辑值 表达式 组成 变量 常量 函数 运算符和圆括号书写规则运算符不能相邻 例a b是错误的 乘号不能省略 例x乘以y应写成 x y 括号必须成对出现 均使用圆括号 表达式从左到右在同一基准上书写 无高低 大小 表达式书写举例 sin 45 3 14 180 exp 10 log 10 sqr x y 1 a b c d e f g或a b c d e f g 3 xAndx 7 常用内部函数 1 数学函数Rnd函数返回0和1 不包括0和1 之间的双精度随机数 产生 n m 的随机整数 Int Rnd m n 1 n取整函数 IntFixRound符号函数 Sgn 常用内部函数 2 转换函数Chr Asc G G Ucase abcdefg ABCDEFG Asc Chr 65 65StrVal 常用内部函数 3 字符串操作函数Left ABCDEFG 3 ABC Mid ABCDEFG 2 3 BCD Right ABCDEFG 3 EFG Len ABCDEFG 7InStr 2 ABCDEFG EF 5 赋值语句 形式 变量名 表达式作用 将表达式的值赋值给变量名 一般用于给变量赋值或对控件设定属性值 注意 赋值号左边只能是变量 不能是常量或表达式不能在一个语句中同时给多个变量赋值 数据输入函数InputBox InputBox 提示信息 窗口标题 通常用于赋值语句 产生一个对话框 供用户输入信息 并返回一个字符型的值 赋给一个变量 MsgBox函数和MsgBox过程 函数形式 变量 MsgBox 提示 按钮 标题 过程形式 MsgBox提示 按钮 标题 选择结构 1 If Then语句 单分支结构 IfThen语句块EndIf或IfThen例 已知两个数x和y 比较它们的大小 使得x大于y 2 If Then Else语句 双分支结构 IfThenElseEndIf或IfThenElse例 已知两个数x和y 求两个数中的大者 3 If Then ElseIf语句 多分支结构 IfThenElseIfThen Else语句块n 1 EndIf不管有几个分支 当某条件满足 执行相应的语句块 其余分支不再执行 4 SelectCase语句 情况语句 SelectCase变量或表达式Case表达式列表1语句块1Case表达式列表2语句块2 CaseElse语句块n 1 EndSelect 表达式列表的四种形式aa b caTob 包含a和b Is a 5 条件函数 IIf函数 IIf 条件 表达式1 表达式2 先求出两个表达式的值 当条件成立时 函数值为表达式1的值 条件不成立时 函数值为表达式2的值 例 求x y中大的数 放入Tmax变量中 循环结构 1 For循环语句 一般用于循环次数已知 For循环变量 初值to终值 Step步长 语句块 ExitFor 语句块Next循环变量循环次数 Int 终值 初值 步长 1 步长 0初值终值 0死循环 循环结构 执行循环结构Fori 30To10Step 3Print a Nexti将输出 个a 计算 的近似值公式为其中n值由文本框读入 阅读程序并填空 Result是标签框的名称 PrivateSubCommand1 Click DimsumAsDouble piAsDoubleDimiAsInteger nAsIntegern Val Text1 Text Fori 1Tonsum sum 1 1 n 2 Nextipi 2 Sqr 6 sum Result Caption pi近似值为 Str pi EndSub 2 Do Loop循环语句 用于控制循环次数未知 形式1 形式2 Do While Until Do语句块语句块 ExitDo ExitDo 语句块语句块LoopLoop While Until 3 循环的嵌套一个循环体内又包含了一个完整的循环结构称为循环的嵌套 例 打印九九乘法表Fori 1To9Forj 1To9se iNextjPicture1 PrintNexti Forii 1To10Forjj 1To20 NextiiNextjj Forii 1To10Forii 1To20 NextiiNextii Forii 1To10Forjj 1To20 NextjjNextii Forii 1To10 NextiiForii 1To10 Nextii 对于循环的嵌套 要注意以下事项 内循环变量与外循环变量不能同名 外循环必须完全包含内循环 不能交叉 不能从循环体外转向循环体内 反之则可以 正确错误 PrivateSubCommand1 Click DimsumAsDouble xAsDoublesum 0 n 0Fori 1To5x n i n n 1 sum sum xNextEndSub 数组 一 静态数组及声明形式 Dim数组名 下标1 下标2 As类型 声明了数组的维数 大小 类型维数 几个下标为几维数组下标 下界To 上界 省略下界为0 必须为常数每一维大小 上界 下界 1数组大小 每一维大小的乘积例 Dimmark 1to100 AsIntegerDima 0To3 0To4 AsLong共有4 5个元素等价于 Dima 3 4 AsLong 注意 1 下界缺省为0 也可在重新定义数组的下界 例如 OptionBase12 在数组声明中的下标说明了数组的整体 即每一维的大小 而在程序其他地方出现的下标表示数组中的一个元素 两者写法形式相同 但意义不同 例如 Dimx 10 AsInteger 声明了x数组有11个元素x 10 100 对x 10 这个数组元素赋值 动态数组及声明 在程序执行时分配存储空间 方法 1 在过程外使用Dim Private或Public语句声明括号内为空的数组 2 在过程中用ReDim语句指明该数组的大小DimsArray AsSingleSubForm Load ReDimsArray 4 8 EndSub 注意 1 ReDim中的下标可以是常量 也可以是有确定值的变量 2 在过程中可多次使用ReDim改变数组的大小 或维数 3 每次用ReDim会使原数组的值丢失 可以在ReDim语句后加Preserve参数来保留数组中的数据 数组元素的输入 输出 1 用循环Fori 1To10iA i 0 PrintiA i Nexti 2 Array函数DimibAsVariantib Array abc def 67 Fori 0ToUBound ib Printib i Nexti 注意 利用Array对数组各元素赋值 声明的数组是可调数组或连圆括号都可省 并且其类型只能是Variant 数组的下阶为零 上界由Array函数括号内的参数个数可决定 也可通过函数Ubound获得 数组的应用 求最大值最小值数组的查找 插入和删除排序 冒泡排序和选择排序 过程 三种自定义过程子过程 SubProcedure Sub过程没有返回值函数过程 FunctionProcedure Function过程返回一个值属性过程 PropertyProcedure 自定义函数过程定义 Function函数名 参数列表 As数据类型 函数名 表达式 EndFunction特点 函数名有值 有类型 在过程体内至少赋值一次 函数名 实际参数列表 注意 函数在定义和使用时 无论是否有参数 圆括号一定不能省 特点 不能独立存在 必须参加表达式的运算 Function过程调用 自定义子过程的定义 格式 Sub子过程名 形式参数表 过程体EndSub特点 子过程名无值 无类型 自定义子过程的调用 格式1子过程名 实际参数列表 格式2Call子过程名 实际参数列表 特点 一句独立的语句注意 格式1中的实际参数列表无需圆括号 注意 1 参数列表称为实参或实元 它必须与形参保持个数相同 位置与类型一一对应 2 当参数是数组时 形参与实参在参数声明时应省略其维数 但括号不能省 3 调用子过程的形式有两种 用Call关键字时 实参必须加圆括号括起 反之则全无 参数传递 指主调过程的实参传递给被调过程的形参 传址 形参得到的是实参的地址 当形参值的改变同时也改变实参的值 其形式参数前加ByRef关键字界定或缺省 传值 形参得到的是实参的值 形参值的改变不会影响实参的值 其形式参数前加ByVal关键字界定实参为数组时为传址 实参为表达式时为传值 SubAdd x y x x 2y y 3Print x x y yEndSubPrivateSubCommand1 Click a 10 b 20CallAdd a 1 b Print a a b bEndSub 1 递归的概念用自身的结构来描述自身就称为 递归 例如对阶乘的定义 2 递归过程过程在自身定义的内部调用自己 编fac n n 的递归函数Functionfac nAsInteger AsIntegerIfn 1Thenfac 1Elsefac n fac n 1 EndIfEndFunction 控件基本的属性 Name名称 所有控件对象都具有的属性Enabled 控件是否可操作 当设置为false时 呈暗淡色 禁止用户进行操作 Visible属性 控件是否可见 当设置为false时 用户看不到 但控件本身存在 Height Width Top和Left属性 Caption标题属性该属性决定了控件上显示的内容 常用控件 标签Label用于显示文本 输出 信息 不能作为输入信息的界面 标签是没有焦点的 文本框TextBox是一个文本编辑区域 可在该区域输入 编辑和显示正文内容 命令按钮CommandButton接受用户输入的命令 文本框 TextBox 基本属性Text 正文内容Maxlength 设置正文的最多字符个数MultiLine 是否为多行 默认一行 FALSEScrollBars 当MultiLine为True时 该属性才有效 表示滚动条的形式PassWord 口令字符 Text属性返回输入的数据 屏幕显示该字符SelStart SelLength SelText 选中文本的起始 长度 内容Locked 指定文本控件是否可被编辑 常用事件Change 当改变文本框的Text属性时会引发该事件 KeyPress KeyAsciiAsInteger 文本框的按键事件 常用于判断是否按了回车键 KeyAscii为13 按回车键 常用方法 对象 SetFocus 是把光标移到指定的文本框对象中 单选钮和检查框 属性Caption 文本标题 Alignment0 控件钮在左边 标题显示在右边 1 控件钮在右边 标题显示在左边 Value检查框单选钮0 Unchecked 未被选定True 选定1 Checked 选定False 未选定2 Grayed 灰色 禁止选择 框架 Frame 框架内控件的创建方法 方法1 单击工具箱上的工具 然后用出现的 指针 在框架中适当位置拖拉出适当大小的控件 不能使用双击工具箱上图标的自动方式 方法2 将控件 剪切 到剪贴板 然后粘贴到框架 框架 设Caption为 字体 列表框 List1 列表框各主要属性的值 List1 ListIndex 3 下标从0开始的 List1 ListCount 5List1 Selected 3 True 其余为False List1 Sorted False 没有排序 List1 Text为 cox 与List1 List List1 ListIndex 相等 1 基本属性 P 可在程序中设置或引用 D 可在设计状态设置 List PD字符型数组 存放列表框的项目 下标是从0开始 ListIndex P选中的项目的序号 没有项目被选定时为 1ListCount P项目的数量 ListCount 1是最后一项的下标 Sorted DTrue 按字母顺序排列 False 按加入先后顺序排列 Text P列表项中被选定的内容 List1 List List1 ListIndex List1 Text 2 列表框的特有属性Selected P逻辑数组 Selected i 的值为True表示第i 1项被选中 MultiSelect0 None 禁止多项选择 1 Simple 简单多项选择 2 Extended 扩展多项选择 3 方法AddItem对象 AddItemitem index RemoveItem对象 RemoveItemindexClear对象 Clear 4 事件Click DblClick 一般不需要编写Click事件过程 通常在单击命令按钮或发生DblClick事件时才读取Text属性 列表框各主要属性的值 List1 ListIndex 0List1 ListCount 8List1 Selected 3 True其余为False List1 Sorted FalseList1 Text为 李宁 组合框 下拉式组合框 下拉式列表框 简单