高中VB必考知识点汇总.docx

上传人:b****4 文档编号:4749962 上传时间:2022-12-08 格式:DOCX 页数:10 大小:18.03KB
下载 相关 举报
高中VB必考知识点汇总.docx_第1页
第1页 / 共10页
高中VB必考知识点汇总.docx_第2页
第2页 / 共10页
高中VB必考知识点汇总.docx_第3页
第3页 / 共10页
高中VB必考知识点汇总.docx_第4页
第4页 / 共10页
高中VB必考知识点汇总.docx_第5页
第5页 / 共10页
点击查看更多>>
下载资源
资源描述

高中VB必考知识点汇总.docx

《高中VB必考知识点汇总.docx》由会员分享,可在线阅读,更多相关《高中VB必考知识点汇总.docx(10页珍藏版)》请在冰豆网上搜索。

高中VB必考知识点汇总.docx

高中VB必考知识点汇总

4、逻辑运算符

VB知识点

•、数据类型

Integer整型

Long长整型

Single单精度实型

Double双精度实型

String字符型

二、常量与变量

1、常量的定义

Const常量名as类型二表达

2、变量的定义

Dim变量名as类型

三、运算符

1、算术运算符

+-*/\mod

2、字符运算符

&+

3、关系运算符

>,>=,<,<=,<>,=

Andnotor

四、函数

1、sin(x)

2、cos(x)

3、fix(x)

4、int(x)

5、sqr(x)

6、abs(x)

五、赋值语句

格式:

变量二表达式

六、输入语句

变量=inputbox(““,

““)

七、输出语句

Print内容

八、条件语句

1、If条件then语句

2、If条件then语句1else

语句2

或者:

1、If条件then

语句

Endif

2、If条件then

语句1

Else

语句2

Endif

九、循环语句

1、for循环变量二初值to终

循环体

Next循环变量

2、dowhile(until)条件

循环体

Loop

或者

do

循环体

Loopwhile(until)条件

第一课时

一、VB的简单介绍

VB是visualbasic的简称,是一种可视化的程序工具。

VB的界面介绍及相关控件和窗口的介绍:

1、控件工具箱(标签、文本框、按钮控件)

2、设计窗口

3、属性窗口

(强调标签的caption、font属性,文本框的text属性,按钮的caption、font属性)

4、代码窗口

二、程序的初步尝试编写

1、设计界面

2、进入代码窗口,编写如下程序:

PrivateSubCommandl_Click()

Dima,b,casinteger

a=

b=

c=a*b

[或者二幻

EndSub

3、运行程序

单击“运行”一一“启动”

4、对程序进行调试,査看运行结果

5、思考:

对程序进行修改,将“*”修改为或者“/”后运行程序。

若修改为“+”呢。

第二课时

一、数据类型

1、integer整型只能够表示-32768——32767之间的整数。

3、single单精度实型可以用来表示小数

4、string字符型例如:

”zhongguo”,”中国”,”123456”

案例1:

求1X2X3XX10的值。

PrivateSubCommandl_Click()

DimiAsinteger

Dimsasinteger

s=0

i=1

Fori=1To10

s=s*i

Nexti

Prints

EndSub

案例2:

求圆的面积

PrivateSubCommand2_Click()

ConstpiAsSingle=

DimrAsSingle

DimsAsSingle

r=InputBox("r=")

s=pi*r*r

Print"圆的面积s二";s

EndSub

二、运算符

1、算术运算符

■(乘方)、*、/、\(整除)、mod(取余)、+、

2、关系运算符

>、>二、<><=>二、<>

3、字符运算符

&、+

4、逻辑运算符

Not、and、or

案例:

若a=5,b=7,c=-2,d=l,求下列式子的结果

a+b>c+danda>=5ornotc>0ord<0

三、函数

Sqr(x)x的平方根

Abs(x)x的绝对值

Int(x)不大于x的最大整数

int结果是-5

int结果是4

Fix(x)取整

Fix结果是4

Fix结果是-4

Cint(x)/clng(x)四舍五入取整

四、表达式

例题:

a=l,b=3,c=2,求x*"+加_4",二土也上地的值。

2a2a

Xl=(-b+sqr(b"2-4*a*c))/(2*a)

X2=(-b-sqr(b^2-4*a*c))/(2*a)

PrivateSubCommandl_Click()

a=1

b=3

c=2

XI=(-b+Sqr(b"2-4*a*c))/(2*a)

X2=(-b-Sqr(b~2-4*a*c))/(2*a)

PrintXI

PrintX2

EndSub

第三课时程序的顺序结构

一、赋值语句

赋值语句的基本格式:

变量二表达式

这里“二”是赋值符号,它的含义是将表达式的值赋给左边的变量

二、输入函数

格式:

inputbox(提示信息,标题,默认值,位置)

例如:

PrivateSubCommandl_Click()

A=InputBox("A=","输入",12,100,20)

EndSub

三、输出函数

格式:

print输出内容

说明:

1、如果输出的内容是数、变量、表达式,则输出的是它们的值。

如果是用引号引起来的字符串,则原样输出。

2、输出内容可以是一个或多个。

如果是多个,则输出内容之间可以用逗号或分号分隔;如果用分号,则后面一个输出紧跟前一个输出;如果是逗号,则按照分区格式输出。

3、如果输出内容后面没有符号,则表示下一个PRINT换行输出;如果Print中没有输出内容,则表示输出一个空行。

案例1:

(书本第38页)

PrivateSubCommand1_C1ick()

a=Vai(InputBox"输入"))

b=Vai(InputBox("b二","输入"))

Max=(a+b)/2+Abs(a-b)/2

PrintMax

EndSub

案例:

2:

已知长方体的长宽高,求长方体的全面积和体积。

PrivateSubCommand1_C1ick()

a=InputBox("a=")

b=InputBox(*b=*)

c=InputBox("c=")

s=2*(a*b+a*c+b*c)

v=a*b*c

Print"全面积S=";s,"体积v=";v

EndSub

第四课时程序的选择结构

一、条件语句的格式

1、If条件then语句

2、If条件then语句1else语句2

或者:

1、If条件then

语句

Endif

2、If条件then

语句1

Else

语句2

Endif

案例比较a和b的大小,并输出最大的值。

PrivateSubCommand1_C1ick()

a=inputbox("a二")

b=inputbox("b=")

ifa>bthen

print"a二";a

else

print"b=";b

endif

EndSub

案例2:

某商场为了对苹果进行促销,规定购买2千克以上可以在原价每千克元的基础

上打8折。

请设计一个程序计算购买x千克苹果的应付款。

PrivateSubCommand1_C1ick()

X二inputbox(“x=”,”请输入苹果的重量”)

Ifx>2then

Y=**x

Else

Y=*x

Endif

Print“苹果的应付款为”;y;”元”

EndSub

第五课时程序的循环结构

循环结构的格式

1、for循环变量二初值t。

终值

循环体

Next循环变量

2、dowh订e(until)条件

循环体

Loop

或者

do

循环体

Loopwhile(until)条件

案例1:

求1+2+3+……+100的值

PrivateSubCommand1_C1ick()

DimIasinteger

Dimsasinteger

S=0

Fori=lto100

S=s+i

Nexti

Print“s=”;s

EndSub

案例2:

已知s=l+2+3+……+n,找出一个最大的整数n,使得s<30000.编写程序解决这个

问题

PrivateSubCommand1_C1ick()

n=0

s=o

Dowhiles<30000

n=n+l

S=s+n

Loop

Printn-l

EndSub

DO循环语句四种形式的比较

条件判断放在循环语句的开头部分

条件判断放在循环语句的结尾部分

所列条件满足时

执行循环

所列条件满足时

退出循环

所列条件满足时

执行循环

所列条件满足时

退出循环

Dowh订e条件

Dount订条件

Do

Do

循环体

循环体

循环体

循环体

Loop

Loop

Loopwhi.16条件

Loopunt订条件

案例:

判断一个大于2的自然数M是否是素数,如果是素数,则输出“这是一个素

数!

”,否则输出“这不是一个素数!

PrivateSubCommand1_C1ick()

DimMasinteger,Iasinteger

M=Inputbox("输入一个数:

”)

1=2

Dountil(Mmod1=0)or(i=M-l)

1=1+1

Loop

IfMmodI=othen

PrintM;”不是素数”

Else

PrintM;”是素数”

Endif

Endsub

循环的嵌套

PrivateSubCommand1_C1ick()

DimseAsString

PrintTab(35);"乘法表"

ForI=1To9

Forj=1To9

se=I&"X"&j&"="

PrintTab((j-1)*9);

Nextj

NextI

EndSub

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 求职职场 > 简历

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1