430 likes | 668 Vues
VB 语言基础. 一、 常量. 1 定义:在程序运行过程中不能发生改变的量. 2 分类. 整型常量:. 整数 不带小数点的数. 数值常量. 定点小数 例如: 3.14159 、 -6.8. 实型常量. 浮点小数 例如: 1.23456E3 、 8.8E-18. 定义:被一对引号括起来的若干个字符的组合. 字符串常量. 例如: ” China ” 、 ” 新北京,新奥运 ” 、 ” 169 ”. 定义:在程序中多次使用到一个常量,则可以用一个有意义的名字表示. 符号常量. 格式: Const 常量名 as 数据类型 = 表达式.
E N D
VB语言基础 一、 常量 1 定义:在程序运行过程中不能发生改变的量 2 分类 整型常量: 整数 不带小数点的数 数值常量 定点小数 例如:3.14159 、 -6.8 实型常量 浮点小数 例如:1.23456E3、8.8E-18 定义:被一对引号括起来的若干个字符的组合 字符串常量 例如:”China”、 ”新北京,新奥运”、”169” 定义:在程序中多次使用到一个常量,则可以用一个有意义的名字表示 符号常量 格式: Const 常量名 as 数据类型=表达式 例如: Const pi as single=3.1415926
VB语言基础 二、 变量 1 定义:在程序执行时其值可以变化的量 2 分类 :变量是用来存储数据的。数据有不同的类型,相应的变量也有不同 短整型 整型 长整型 数值型 单精度 实型 双精度 字符串型
VB语言基础 变量的定义: 格式: dim 变量名 as 数据类型 短整型 integer -32768~32767 2字节 长整型 long -2147483648~2147483648 4字节 单精度 single -3.402823E38 ~-1.401298E-45 4字节 1.401298E-45~3.402823E38 双精度 double 1.7976931E308~-4.9406564E-324 8字节 4.9406564E-324~1.7976931E308 字符串型 string
VB语言基础 变量名命名规则: 1 必须以字母开头 2 必须由字母、数字、下划线组成 3 长度不能超过255个字符 4 不能是保留字 5 应该尽量有意义
VB语言基础 以下哪些变量名是正确的 123abc Label_1 A$ End 书名 × √ × × √
VB语言基础 例如: Dim I as Integer Dim sum as single Dim name as string Dim I as integer, sum as single, name as string
VB语言基础 三、 赋值语句 格式: [let] 变量名 = 值或表达式 赋值语句规则:把赋值号右边的值或表达式的值赋给赋值号左边的变 量,赋值时应尽量保持变量类型与数据类型一致。
VB语言基础 例: Dim a,b,c as integer,str as string Let a=2 Let b=3 Let a=5 Let b=6 Let c=a+b Let str=“Visual Basic” Form1.print a,b,c
VB语言基础 如何交换两个变量的值?
VB语言基础 四、 表达式
VB语言基础 五、 函数
VB语言基础 改正下列VB表达式的错误 xy^3表示(xy)3 y+2/x-4表示 e^x*sin(x)表示exsinx Cos(30)表示cos30o
VB语言基础 将下列数学式写成VB表达式 Sin(a+b) a+b2 (x+y)3 64+|-5| ex+1
VB语言基础 写出下列VB表达式的值 Sqr(81)+len(“baisc”) Abs(int(-7.8)) Exp(0) Log(100)/log(10) Int(3.14159*100+0.5)/100 Sgn(1-abs(-3)) Right(“china”,2)+mid(“welcome”,6,2)
VB语言基础 读程序 Private sub command2_click() End End sub Private sub command1_click() Dim radius as single Dim peri as single Dim area as single Radius=val(text1.text) Peri=2*3.14159*radius area=3.14159*radius^2 Text2.text=str(peri) Text3.text=str(area) End sub
If语句 … … 条件 if then 语句1 if 条件 then 语句1 else 语句2 语句2 语句3 … …
数据的输入和输出 1. 程序运算的得到的结果,可以用文本框或标签控件显示 2. 当需要显示大批量数据时,更适合用print方法输出 Print 方法: 格式: [对象].print [表达式列表][{;|,}] 其中对象可以是窗体,图形框或打印机,如果省略,则print方法将向当前窗体输出。
数据的输入和输出 例: Dim x,y as single Form1.print -61;-34 Form1.print 9*2;12 Form1.print “This is”;”a book” x=3:y=4 Print “x=“;x,”y=”;y 运行结果 -61 -34 18 12 This isa book X=3 y=4
数据的输入和输出 Print 方法的表达式列表可以是:常量、变量、表达式 如果是多个表达式,可以用分号(;)或逗号(,)分隔。分号 表示一个表达式紧接着上一个表达式继续显示,逗号则表示下 一个表达式移到下一个打印区开始显示,每一个区占14列。
数据的输入和输出 从例子的结果可以看出 1 print方法具有计算和输出的双重功能。先计算出表达式的 值,然后在输出该值。正数数值具有一个前导和一个尾部空 格,负数数值用负号替代前导空格。对于字符串则是原样输 出,不包括定界符双引号。 2 使用prinr “x=”;x的形式输出数据,可以在数据前加上注解性的说 明,使我们一看就知道是哪个变量的值。在一个语句里,分号和逗号 可以混合使用。
数据的输入和输出 此外,还可以在表达式前用tab(n)函数控制输出的位置,式中的n表示 输出点离窗体左边界的绝对位置。 Dim a,b as integer a=4:b=9 Print tab(1);”数”;tab(9);”平方”;tab(18);”立方”;tab(27);”立方根” Print tab(1);a;tab(9);a^2;tab(18);a^3;tab(27);sqr(a) Print tab(1);b;tab(9);b^2;tab(18);b^3;tab(27);sqr(b) 注意:TAB函数中的数值应该从左到右依次增大,而不能忽左忽右
数据的输入和输出 为了便于和程序交互,VB提供了inputbox和msgbox这2个函数 1 inputbox函数 在VB中,当需要输入数据时,只要在程序中调用一个inputbox函 数,屏幕就会弹出一个标准输入对话框供输入数据使用,使用方 法下: 变量=inputbox(提示[,标题][,缺省])
数据的输入和输出 Const pi as single = 3.1415926 Dim radius,peri,area as single radius=inputbox(“请输入半径”,”输入框”) peri=2*pi*radius area=pi*radius^2 Print “半径=”;radius,”周长=”;peri,“面积=”;area
数据的输入和输出 2 msgbox函数 在使用windows操作系统等软件的时候,经常会弹出一些对话框。事实上,VB中,我们也可以利用msgbox函数设计出这样的对话框。 Msgbox函数格式如下 变量=msgbox(提示[,按钮][,标题]) 其中,“提示”和“标题”的意义与inputbox函数中对应的参数相同 按钮是一个由4个常数量组成的式子,形式为c1+c2+c3+c4,用于 决定信息框中显示的按钮的数目及形式,使用的图标式样,缺省按 钮是什么以及消息框的模式等。
If语句 一、行if语句 1 流程图 条件 Y N 条件 Y 语句2 N 语句1 语句1 语句2 语句3
If语句 2 格式 … … 条件 if then 语句1 if 条件 then 语句1 else 语句2 语句2 语句3 … … 这里的条件是什么?
If语句 什么是VB(算术)表达式 用VB运算符连接起来的常量、变量,称为VB表达式 VB运算符:+、-、*、/、^、mod、\、() 例如: a+1 a/b mod 2 p*(p-a)*(p-b)*(p-c)
If语句 什么是关系表达式 用关系运算符连接起来的VB表达式 关系运算符:>、<、=、>=、<=、<> 例如: 3+5>6-1 Abs(a)>=b*2 (a-b)*(a+b)<>3 “abc”>”ABC” 关系表达式的值?
If语句 关系表达式的值为布尔类型(boolean) 布尔类型的值只有两种 T或者F 例如: 3+5>6-1 Abs(a)>=b*2 (a-b)*(a+b)<>3 “abc”>”ABC”
If语句 字符串比较大小规则: 从左向右逐个比较字符ASCII码的大小,直到比出大小为止。 “abc”>”ABC” “Abcd”<“aBCD” ”Window”<“Windows” “hello”=“hello”
If语句 什么是逻辑表达式 用逻辑运算符连接起来的关系表达式 逻辑运算符:and(与运算)、or(或运算)、not(非运算) 例如: a+b>1 and c mod 4 <>0 a*b*c<=d or b^2-4*a*c<>0 not a>b or c<=d and e=f
If语句 and(与运算) 二元运算符 and 条件1 条件2 结果 T F F F F F F T F T T T
If语句 or(或运算) 二元运算符 or 条件1 条件2 结果 T F T F T T T T T F F F
If语句 not(非运算) 一元运算符 结果 not 条件 T F T F
If语句 逻辑运算优先级 例如: a+b>1 and c mod 4 <>0 a*b*c<=d or b^2-4*a*c<>0 not a>b or c<=d and e=f not > and > or
If语句 逻辑表达式的运算顺序 先算VB表达式,再算关系表达式,最后算逻辑表达式 例:2^2>=5 and abs(-5)<>len(“basic”) not 15 mod 2 <6 or “123”=left(“12345”,4)
If语句 例:2^2>=5 and abs(-5)<>len(“basic”) or not 15 mod 2 < 6 or “123”=left(“12345”,4) 4 >=5 and 5 <> 5 or not 1 < 6 or “123”=“1234” F and F or not F or F F and F or T or F F or T or F T T
If语句 练一练,写出下列逻辑表达式的值 14 \ 5 > int(4.5) and “windows”>”Windows” or sqr(81)=abs(int(-8.9)) and sgn(4)<>0 rnd>2 and “china”>mid(”chinese”,3,2) or not sgn(-10)>=4 and exp(0)<>2^2
If语句 思考 1、已知三条线段,如何判断它们能否构成一个三角形 2、如何判断某一个年份是否是闰年