下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、编码基础VB代码不区分字母的大小写一行可书写几句语句,之间用冒号分隔;一句语句可分若干行书写,用续行符(空格下划线)连接 Rem开始或单撇 VB常用数据类型变量和常量的 命名规则变量:在程序运行中其存储的值可以改变。 常量:在程序运行中其值不可以改变。以字母或汉字开头,后可跟字母、数字或下划线组成,长度小于等于 不能使用VB中的关键字;VB中不区分变量名的大小写例如:1)a bc 2)prin t_655)x%y 6)abs 7)mn%3)12bc4)x-y8)i nt变量声明Dim变量名ASDim iMark As in teger , sTotal As sin gleDim iltem%
2、注意:在通用声明处加Option Explicit语句来强制显式声明变量类型常量声明Con st常量名AS类型=表达式 例 Const MAX=100Co nst MIN As In teger =&H13A算术运算符例:求表达式 5+10 mod 10 9 / 3 +2人2值字符串运算符& 、 +字符串连接123 + 456 结果 ” 123456 123 & 456 结果 ” 123456 区别:+两边必须是字符串,abcdef & 12345abcdef+ 12345123 &456“123 ” +456注意:123 + True&不一定结果为abcdef12345 出错结果为” 123
3、456 结果为 579结果为 12240个字符;关系运算符 将两个操作数进行大小比较,结果为逻辑量。字符串比较,则按字符的ASCII码值从左到右一一比较,直到出现不同的字符为止例:ABCDE ABRA 结果为 False逻辑运算符将操作数进行逻辑运算,结果是逻辑值表达式组成:变量、常量、函数、运算符和圆括号书写规则运算符不能相邻。例 a+ -b是错误的。乘号不能省略。例 x乘以y应写成:x*y。 括号必须成对出现,均使用圆括号。表达式从左到右在同一基准上书写,无高低、大小。表达式书写举例abcdefga*b*c*d/e/f/g或 a*b *c*d/ ( e*f*g)e10 +ln10sin 4
4、5 + 1Jx + y +1sin(45*3.14/180)+(ex p(10)+log(10)/sqr(x+y+1)3x 73=xAnd x 0=10=0初值 终值 死循环循环次数=1 nt(终值-初值步长+1)执行循环结构For i=30Prin t aTo 10 Step -3Next i将输出个a。计算n的近似值公式为 其中n值由文本框读入。P rivate Sub Command1_Click()Dim sum As Double, pi As DoubleDim i As Integer, n As Integern = Val(Text1.Text)For i = 1 To n6
5、阅读程序并填空,汁+令+*+Result是标签框的名称sum = sum +(1)Next ipi = _Result.Caption= pi 近似值为:& Str(pi)End Sub(2)2. Do- Loop循环语句(用于控制循环次数未知) 形式1:Do While|Until 语句块Exit Do语句块DoLoop形式2:Loop语句块Exit Do语句块 WhilelUntil v 条件 3.循环的嵌套构称为循环的嵌套.一个循环体内又包含了一个完整的循环结 例:打印九九乘法表Fori = 1 To 9Forj = 1 To 9se = i & ” X & j & = & i * jP
6、 icture1. Print Tab(j - 1) * 9 + 1); se;Next jP icture1. PrintNext i对于循环的嵌套,要注意以下事项:内循环变量与外循环变量不能同名; 外循环必须完全包含内循环,不能交叉; 不能从循环体外转向循环体内,反之则可以。Private Sub Comma nd1_Click()Dim sum As Double, x As Double sum = 0: n = 0For i = 1 To 5x = n / i: n = n + 1: sum = sum + xNextEnd Sub数组一.静态数组及声明形式:Dim 数组名(下标1,
7、下标2)As类型 声明了数组的维数、大小、类型维数:几个下标为几维数组下标:下界To 上界;省略下界为0 ,必须为常数 每一维大小:上界-下界+1数组大小:每一维大小的乘积例:Dim mark(1 to 100) As IntegerDim a( 0 To 3 ,0 To 4) As Long 共有 4X 5 个元素等价于:Dim a(3 ,4) As Long注意:1. 下界缺省为0,也可在重新定义数组的下界。例如:Option Base 12. 在数组声明中的下标说明了数组的整体,即每一维的大小;而在程序其他地方出现的下标表示数组中的一个元素。两者写法形式相同,但意义不同。例如:Dim x
8、(10) As Integer 声明了 x数组有11个元素 x(10)=100 对x(10)这个数组元素赋值动态数组及声明 在程序执行时分配存储空间。 方法:(1) 在过程外使用 Dim、Private或Public语句声明括号内为空的数组(2) 在过程中用ReDim语句指明该数组的大小Dim sArray( ) As Si ngleSub Form_Load()ReDim sArray(4 , 8)End Sub注意:(1) ReDim中的下标可以是常量,也可以是有确定值的变量.(2) 在过程中可多次使用 ReDim改变数组的大小,或维数 .每次用ReDim会使原数组的值丢失,可以在ReDi
9、m语句后加Preserve参数来保留数组中 的数据.数组元素的输入、输出(1)用循环II II.For i = 1 To 10 iA(i)=0 : Print iA(i); Next iArray函数Dim ib As Variant ib = Array(abc, def, 67) For i = 0 To UBound(ib) Print ib(i);Next i注意:并且其利用Array对数组各元素赋值,声明的数组是可调数组或连圆括号都可省,类型只能是Variant。数组的下阶为零,上界由 Array函数括号内的参数个数可决定,也可通过函数Ubound 获得。数组的应用求最大值最小值数组
10、的查找、插入和删除排序:冒泡排序和选择排序过程三种自定义过程子过程(Sub Procedure)Sub过程没有返回值函数过程(Function Procedure)Function过程返回一个值属性过程(Property Procedure)自定义函数过程定义Function函数名(参数列表)As数据类型函数名=表达式End Function特点:函数名有值,有类型,在过程体内至少赋值一次。Function过程调用函数名(实际参数列表)注意:函数在定义和使用时,无论是否有参数,圆括号一定不能省。 特点:不能独立存在,必须参加表达式的运算 自定义子过程的定义格式:Sub子过程名(形式参数表) 过
11、程体End Sub自定义子过程的调用格式1子过程名实际参数列表 格式2Call子过程名(实际参数列表)一句独立的语句格式1中的实际参数列表无需圆括号特点:子过程名无值,无类型特点:注意:注意:(1) 参数列表称为实参或实元,它必须与形参保持个数相同,位置与类型一一对应。(2) 当参数是数组时,形参与实参在参数声明时应省略其维数,但括号不能省。调用子过程的形式有两种,用Call关键字时,实参必须加圆括号括起,反之则全无。参数传递指主调过程的实参传递给被调过程的形参。其形式参其形式参数前加传址:形参得到的是实参的地址,当形参值的改变同时也改变实参的值。 数前加ByRef关键字界定或缺省。传值:形参
12、得到的是实参的值,形参值的改变不会影响实参的值。ByVal关键字界定实参为数组时为传址,实参为表达式时为传值。Sub Add(x%, y%)x = x + 2y = y + 3Prin t x=; x, y=; yEnd SubPrivate Sub Comma nd1_Click()a% = 10: b% = 20Call Add(a + 1, b)Prin t a=; a, b=; bEnd Sub 1.递归的概念用自身的结构来描述自身就称为“递归”。例如对阶乘的定义:n! = n* (n -1)!(n -1)!= (n-1)*(n-2)!2.递归过程过程在自身定义的内部调用自己。pln
13、=1fac(n)= “n * fac( n-1)nA1编fac(n)=n!的递归函数Function fac(n As Integer) As Integer If n = 1 Then fac = 1Elsefac = n * fac(n - 1)End IfEnd Function控件基本的属性Name名称:所有控件对象都具有的属性En abled:控件是否可操作.当设置为false时,呈暗淡色,禁止用户进行操作.Visible 属性:控件是否可见.当设置为false时,用户看不到,但控件本身存在Height、Width、Top 和 Left 属性鬲.FormlTopi 、 tLeft *
14、斬iiiL M H fHeightWidth Caption标题属性该属性决定了控件上显示的内容常用控件标签Label用于显示文本(输出)信息,不能作为输入信息的界面。标签是没有焦点的。文本框TextBox是一个文本编辑区域,可在该区域输入,编辑和显示正文内容。命令按钮 CommandButton接受用户输入的命令文本框(TextBox)基本属性:Text :正文内容Maxlength:设置正文的最多字符个数MultiLine:是否为多行,默认一行.FALSEScrollBars:当MultiLine为True时,该属性才有效,表示滚动条的形式PassWord :口令字符;Text属性返回输入
15、的数据,屏幕显示该字符SelStart,SelLength,SelText :选中文本的起始、长度、内容Locked :指定文本控件是否可被编辑常用事件Change :当改变文本框的Text属性时会引发该事件.KeyPress(KeyAscii As Integer):文本框的按键事件,常用于判断是否按了回 车键(KeyAscii为13,按回车键)常用方法对象JSetFocus:是把光标移到指定的文本框对象中.文件及其种类文件是记录的集合VB按读写方式的三类文件: 顺序文件 随机文件 二进制文件 顺序文件打开打开写入一关闭读出一关闭从第一条到最后一条记录顺序读写 文本文件每一行为一条记录 写文件的三步骤: 读文件的三步骤:打开文件Op en说明:文件名” For模式As #文件号 Len=记录长度重写追加记录读(外存7内存)三种模式”:Out putAppendInput写文件格式1格式2Write文件号是1511之间的整数Print #文件号,输出列表Write #文件号,输出列表为紧凑格式,
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025年云南大学附属医院开展校园招聘30人的备考题库及参考答案详解1套
- 小学数学作业中使用AI解题助手的注意力分配效果研究课题报告教学研究课题报告
- 河北省2026年度定向选调生招录备考题库完整参考答案详解
- 中国地质大学(北京)2026年度专职辅导员招聘10人备考题库及参考答案详解
- 2025年鼓东街道公开招聘专职网格员备考题库(12月)及答案详解一套
- 2025年广东风华高新科技股份有限公司校园招聘备考题库附答案详解
- 2025年西华大学先进飞行器与动力科研创新团队科研助理岗位招聘备考题库及答案详解一套
- 2025年轻工所公开招聘备考题库完整参考答案详解
- 2025年天津医科大学口腔医院第一批公开招聘备考题库及参考答案详解一套
- 2025年西安市浐灞丝路学校招聘总务处干事备考题库含答案详解
- 2025年秋人教版(2024)初中美术七年级上册期末知识点复习卷及答案
- 2025年高校行政面试题及答案
- 调车服务合同范本
- 2026年计算机四级(Linux工程师实务)考试题及答案
- 2025年新《中国传统文化》考试复习题(附答案)
- 行车搬迁改造协议书
- 辽宁省辽西重点高中2025-2026学年高一上学期11月期中考试数学试题(原卷版)
- 雨课堂学堂在线学堂云《English for Presentations at International Medical Conferences》单元测试考核答案
- 形势与政策(吉林大学)智慧树知到答案2024年吉林大学
- 某燃气热电有限公司设备招标文件
- 扫路车使用说明书-通用
评论
0/150
提交评论