计算机语言编程实现.pptVIP

编译器： VB语言基础知识 利用vb语言中的 量、函数、语句编写程序 最终加工成软件提供给用户。 编译器 量 函数 语句 软件 加工厂 各种零件 机器 一、vb中的“量” 1.常量： （1）直接常量 a=3, b=4, c=5 （2）符号常量 定义：const 常量名 值 例子：const g 9.8 const PI 3.1415926 2.变量： 定义：Dim 变量名 as 数据类型 例子：Dim g as integer Dim g as string Dim g as long 整型 字符串型 长整型 3.数组： 定义：Dim a(A1 to A2) as integer 例 1：Dim a(1 to 100) as integer 例 2：Dim a(100) as integer 二、函数 常用函数 从字符串x的第n个字符开始，取k个字符 Mid(x,n,k) 求字符串的长度 Len(x) 求不大于x的最大整数 Int(x) 求x的绝对值 Abs(x) 产生[0,1) 之间的随机小数 Rnd(x) 求字符x的ASCII码值 Asc(x) 求ASCII值对应的字符 Chr(x) 把数值x转换为字符 Str(x) 把字符x转换为数值 Val(x) 三、常用语句 1.赋值语句 （1）变量名=表达式 例：a=x+y a=3 （2）对象名.属性名表达式 例：label2.caption= t 2. For循环语句 for 循环变量=初值 to 终值 step 步长 例：for i=1 to 5 step 1 语句块 k=k+i next 循环变量 next i 3.Do While 循环 Do While 表达式 语句块 Loop 例：Do While i=n k=k+I Loop private sub command_click a=3: b=4: If a=b then y=a Else y=b End if End sub 读程序 程序1 private sub command_click a=3 b=4 c=5 If a=b And a=c then y=a Else if b=c then y=b Else y=c End if 读程序 程序2 private sub command_click Dim x as single Dim y as integer x=val(text1.text) y=5*x Text2.text=str(y) End sub 读程序 程序3 Private sub command_click Dim i as integer, c as string, s as string,t as string S=“2012 Hero” t= “ ” For i =1 to len(s) c = Mid(s,i,1) if c=“a” And c=“z” then t=t+c Next i Text1.text=t 读程序 程序4