高一信息技术练习题(vb)Word文档下载推荐.doc

高一信息技术练习题(vb)Word文档下载推荐.doc

《高一信息技术练习题(vb)Word文档下载推荐.doc》由会员分享，可在线阅读，更多相关《高一信息技术练习题(vb)Word文档下载推荐.doc（6页珍藏版）》请在冰点文库上搜索。

C=B

C=C-A

3、PrivateSubCommand1_Click（）

X=3

Y=4

Z=Sqr（Y）

Y=X+Z

Y="

Y

4、PrivateSubCommand1_Click（）

X=-3

Y=9

Y=Sqr（Y）

Y=Abs（X）+Y

5、PrivateSubCommand1_Click（）

I=120

J=110

PrintI;

J

K=I

I=J

J=K

I="

I，"

J="

_________________

_________________

6、PrivateSubCommand1_Click（）

I=I+J

J=I-J

I=I-J

7、PrivateSubCommand1_Click（）

A=Val（InputBox（"

请输入一个数"

））

IfA>

=0Then

PrintA

Else

PrintAbs（A）

EndIf

单击按钮，输入-9，

运行结果为：

_____________

8、PrivateSubCommand1_Click（）

B=Val（InputBox（"

IfA>

=BThen

Y=A

Y=B

PrintY

单击按钮，输入100和90

9、PrivateSubCommand1_Click（）

IfInt（A/2）=A/2Then

A=A

A=A+1

A="

A

单击按钮，输入2

单击按钮，输入9

10、PrivateSubCommand1_Click（）

IfAMod2=0Then

Label1.Caption="

您输入的是一个偶数"

您输入的是一个奇数"

单击按钮，输入37

_____________________

11、PrivateSubCommand1_Click（）

S=0

ForI=1ToA

S=S+I

NextI

S="

S

单击按钮，输入5

__________________

12、PrivateSubCommand1_Click（）

ForK=1ToAStep3

S=S+2

NextK

单击按钮，输入15

13、PrivateSubCommand1_Click（）

S="

+Str（S）

Label1.Caption=S

单击按钮，输入27

14、PrivateSubCommand1_Click（）

S=2

ForK=1ToA

S=S*K

单击按钮，输入4

15、PrivateSubCommand1_Click（）

S=1

ForK=1ToAStep5

S=S*2

单击按钮，输入25

16、写出下列语句的基本格式

（1）、赋值语句：

__________________实例：

（2）、输入语句：

（3）、输出语句：

___________________实例：

17、写出下列语句的基本格式，并画出执行过程的流程图。

（1）、条件语句（If）

基本格式：

流程图：

格式：

18、填空完成程序，使之能够完成以下功能：

并画出程序流程图。

计算s=1!

+2!

+3!

+…+8!

的值并在窗体上打印出结果。

PrivateSubCommand1_Click（）

DimSAsSingle,PAsSingle,IAsInteger

S=____________流程图：

P=____________

ForI=1To8

P=___________

S=___________

_________

S

19、填空完成程序，使之能够完成以下功能：

计算1-1/2+1/3-1/4+...+1/99-1/100的值。

DimsAsSingle

DimiAsInteger

s=_____________

Fori=1To_________Step____________

IfiMod2=0____________

s=___________

______

s=___________

EndIf

Nexti

EndSub

流程图：