上海高中信息科技复习

1、信 息科技专题复习 第1章信息与信息技术 1. 信息(p2):消息中有意义的内容称为信息。信息论的创始人香农认为“信息是能够用来 消除不确定性的东西”。 2. 人类社会赖以生存和发展的三大资源：信息、物质、能源。(维纳) 3信息的特征传载性信息可以传载，并且必须依附于某种载体 可处理性获取，表达，加工，传播，储存，转换和使用技术 -时效性 3. 4. ，再经过采样量化和数字 利用仪器设备把非数字化资料采集为声光电等物理信号(模拟信号) 编码，转换成用二进制数字表示的数字信息(数字信号)，最后进入计算机存储保存。 计算机只能识别二进制。 数字化的过程也就是把非数字信息转为数字类的信息。必须将各种

2、信息进行数字化后，才便于 计算机进行传送、存储和处理。 5.数字信息之间的相互转化 数码：一组用来表示某种数制的符号。 (1) 二进制的数码是：0，1 (2) 十进制的数码是：0，1，2，3，4，5，6，7，8，9 (3) 十六进制的数码是：0, 1，2，3，4，5，6，7，8，9，A，B，C，D，E，F 基数：数制所使用的数码个数。 (1) 二进制的基数是：2 (2) 十进制的基数是：10 (3) 十六进制的基数是：16 位权：数码在不同位置上的倍率值。 (1) 二进制数的位权从左向右依次是：23，22，21，20 (2) 十进制数的位权从左向右依次是：103，102，101，100 (3)

3、 十六进制数的位权从左向右依次是：163，162，161，160 进位法则：二进制的进位原则是“逢二进一” 。 6.1其他进制转为十进制把各非十进制数按权展开求和 按权相加法 (1011)2 转为十进制(1011)2 =1 X 20+1 X 21 + 0 X 22 + 1 X 23 6.2十进制转为其他进制 除基取余逆序排列(75) 10=1001011 2 751 2 371 2 1B 0 2 91 2 40 2 2 Q 2 1 1 0 最大数码7所占房间78=1112 最大数码F所占房间(4位) F16=11112 一位相当于一个房间。 1Byte=8bit一个字节相当于八个房间。 6.3

4、八进制和十六进制的转换 八进制转为二进制所占位数 十六进制转为二进制所占位数 位bit是计算机的最小存储单位 字节Byte是计算机的基本存储单位。 7非数字类信息的信息编码 7.1文字编码 -西文字符ASCII码 文字 : -中文汉字 GB码 字符采用ASCII码: (1)由7位二进制代码表示，存储时占用1个字节。 0 * * * * * * * (2)共有27=128种不冋的组合，表示 128个字符。 (3)其中94个字符(可打印，包括10个数字符号，26个大写英文字母、 26个小写英文字母、 标点符号和其他常用符号)和34个控制符(不可打印)。 (4) 在ASCII码表的排序中，数字V 2

5、6个大写英文字母 v 26个英文小写字母 汉字采用GB码 编码的种类：输入码、内码、字形码 (1) 输入码：为了将汉字通过键盘输入计算机而设计的。可以有多种，如拼音码、五笔字型 码等。因此一个汉字可以有多个不同的输入码。 (2) 内码：供计算机系统内部进行存储、加工、处理、传输等工作时统一使用的代码。因此, 对于同一个汉字来说，机内码是唯一的。 1 * * * * * * * 1 * * * * * * * U盘 光盘 软盘 高速缓存 输入设备负责信息输入，输岀设备用于输岀运算结果。输入和输岀设备又称I/O设备。 常见的输入设备有：键盘、鼠标、扫描仪、摄像头、数码相机。 常见的输岀设备有：显示

6、器、打印机、音响、绘图机。 存储系统容量 TBGBMBKBBb 基本单位：Byte (字节) 最小单位：bit (位) 1kB=1024B 1MB=1024KB 1GB=1024MB 1TB=1024GB 字长(bps),高速缓存 CPU性能指标：主频(Hz ), 2计算机软件系统 (1) 指令：计算机执行一步运算或判断的命令。 (2) 程序：指令的有序集合。 (3) 软件：除了程序以外还包括与程序有关的各种文档。 (4) 计算机软件组成：系统软件和应用软件。 (5) 系统软件组成：操作系统、程序设计语言处理程序、数据库管理系统 操作软件：对计算机全部软件、硬件资源进行控制和管理。 语言处理程

7、序：作用和是把源码程序翻译成二进制代码表示的机器语言，是计算机能够识 别和执行。 数据库管理系统：用于建立，使用和维护数据库的软件。 (6) 常见的高级程序设计语言：Pasca、C、C+、VB、Java 程序设计语言分类及其特点 语言类型 语言特点 计算机能否识别 执行速度 机器语言 0,1 (二进制) 能 最快 汇编语言 助记符 不能 需要通过编译 高级语言 接近人类语言或数学语言 不能 软件进行解释 (7) 应用软件的安装源名称：Setup.exe和install.exe (8) 应用软件的卸载源名称：unin stall.exe (9) 正确的装机顺序：操作系统-驱动程序-应用软件 第3

8、章信息安全与道德规范 1信息的安全 信息的完整性：信息的保密性，信息的可用性，信息的可控性 信息安全体系：一是威严的法律；二是先进的技术；三是严格的管理 2计算机病毒特性（p48） 寄生性隐蔽性潜伏性传染性破坏性不可预见性 计算机病毒是一种程序。 计算机病毒的三中传播路径：一是储存设备（U盘），二是计算机网 络，三是通过点对点通信系统（QQ MSN） 第4章计算机网络与因特网基础 1计算机网络的概念（p58） 把分布在不同地理区域的计算机与专门的外部设备用通信线路互连成一个系统，从而使众 多的计算机可以方便地互相传递信息，共享资源。 2计算机网络的功能 （1）数据通信：是计算机网络最基本的功能

9、，是实现其他功能的基础。如发送邮件、传 输文本、图像、声音等。 （2）资源共享：是计算机网络中最具吸引力的的功能，节省投资、避免重复存储。 （3）分布式处理：把大型的、复杂的问题分解为若干个较简单的子问题。例如：火车票、 飞机票代售点。 3计算机网络三要素 （1）计算机设备（即主体）：不同位置的具有独立功能的计算机。 （2 ）通信线路及连接设备：用于传输信息 有线传输介质（双绞线、同轴电缆、光纤） 厂通信线路 I无线传输介质（无线电波、微波、红外线） （集线器（HUB,采用广播的形式对数据对信号进行转发，不安全，容易造成 网络堵塞。一般用于家庭或小型局域网。） J连接设备 彳交换机（根据目的地

10、地址信息自动查找对应端口，避免冲突，安全， 不堵塞网络。一般用于计算机数量较多，传输数据量很大。） j路由器（连接不同类型的网络，如：和因特网连接） （3）网络协议：计算机之间通信的规则（ IPX/SPX、TCP/IP ）。 4计算机网络的分类 局域网LAN （覆盖范围一般在房间，大楼或园区内。） 厂按照分布距离 彳城域网MAN （介于广域网与局域网之间） 广域网WAN （覆盖范围一般是一个国家，因特网是最大的广域网。 总线型（由一条总线连接所有节点） 丿 按照拓扑结构 彳星 型（由中央节点与各个节点连接，如现在多用交换机连接各节点） I环型（所有计算机连接在一个封闭的环路中） 有线方式（需通

11、过网线，电缆等传输介质连接） 按照传输介质 无线方式（无需线缆，布线容易，组网灵活，节省成本） 双绞线有效传输举力一般不超过100米，故经常使用的是同轴电缆和光纤 要把一台计算机接入计算机网络中，应该先在计算机中安装网卡。 其单 网络传输速率，又称带宽，是衡量网络性能优劣的重要指标，它是指网络传输信号的速度, 位是位/秒（bps） 1Kbps=1024bps 1Mbps=1024Kbps 1Gbps=1024Mbps 1Tbps=1024Gbps 5. 计算机网络协议 TCP/IP IPX/SPX局域网协议 FTP （文件传输协议） SMTP（电子邮件发送协议） 传输控制和网际协议（核心协议）

12、 HTTP （超文本传输协议） ISP （因特网服务器提供商） POP3 （电子邮件接受协议） 小的网络，这类网络最多只能有254台主机。 6. 因特网（p67） 因特网，又称国际互联网, 是一个全球性的计算机信息通信网络, 是连接全世界成千上万 台计算机的网络集合，是当今最大的国际性互联网络。 在20世纪60年代，世界上第一台计算机网络 -阿帕网（ARPANET ）在美国诞生。这是因 特网的雏形。 6.1因特网传输协议 （1） TCP/IP :因特网最核心的协议（2） IPX/SPX :应用于局域网 TCP/IP协议的作用 （1）TCP协议（传输控制协议）：负责数据传输 （2）IP协议（网际

13、网协议）：负责IP寻址、路由选择最佳路径。 6.2因特网的地址和域名 （1）因特网的地址 IP地址有两部分组成，一部分为网络地址，另一部分为主机地址。IP地址分为A、B、C 三类。 4个字节 当前的IP地址采用国际统一标准的IPV4协议，是一个32位的二进制数。总共 IP地址构成: 网络地址 主机地址 地址类别 首字节取值范围 网络地址字节数 主机数 适用范围 A类 1-126 1网3主 224 大 B类 128-191 2网2主 216 中 C类 192-223 3网1主 28 小 其中A类地址用于规模大的网络，这类地址可以有16777214台主机，C类地址用于规模 检查IP地址以及网络连通

14、情况 ipconfig显示本机IP地址以及TCP/IP协议设置的相关信息 ping获取网络中任何主机的IP地址（ping目的主机名） 测试网络中两台主机或其他设备之间连通情况（ ping其IP地址 或域名） tracert检查数据分组从一台网络设备到另一套网络设备所经过的路径 了解访问各个网站所经过的路由情况 判断在检查过程中是否有路由器等网络设备发生故障 注 Ping （本机循环地址）用于检查 TCP/IP工作是否正常 （2）域名 域名格式：计算机名网络名机构名最高层域名 常见的域名：商业机购com中国 cn 教育机构 edu 政府机构 gov 军事机构mil非盈利组织机

15、构org 域名解析系统 域名IP地址 URL是统一资源定位符 URL的常见的形式 协议名：/【用户名：口令 域名【：端口】/路径/文件说明 6.3因特网的接入方式 现在计算机接入因特网方式有许多，目前常见的方式有：拨号上网、ADSL （非对称数字用 户线）接入、有线通接入、光纤接入、无线接入。 ISP服务商：（p80） 也称因特网服务提供商。ISP是因特网的接入点，是用户进入因特网世界的桥梁。它的 主要工作就是配置用户和因特网相连的设备，并建立通信连接，为用户提供信息服务 目前国内的ISP服务商有：中国电信、中国联通、中国移动、中国教育和科研信息网、中 国金桥信息网。 （1） 拨号上网 电话线

16、 寺 r 电话网 计算机 网线 modem 数字信号 模拟信号 SP服务商提供的接入因特网的方式如下: 条件：电话线、modem、计算机 注意：modem （调制解调器），是计算机与电话线之间进行信号转换的装置，由调制器 SP 解调器可 和解调器组成。调制器可把计算机的数字信号转化为电话线传输的模拟信号 把电话线上的模拟信号转化为计算机能接收的数字信号。 _|_modem 数字信号 （2） ADSL 接入 出现原因：普通拨号上网方式是通话、上网共用一根电话线，如果通话时就不能上网, 上网时就不能通电话。 r低频（用于语音传输） 利用分离器将电话线分为w 、高频（用于网络传输） 条件：分离器、m

17、odem、电话线、网卡 （3）有线通接入 有线通接入也称cable-modem接入（电缆调制解调器接入）。它是利用现有的有线电视网 络，并稍加改造，利用有线电视的一个频道进行数据传送，并不影响原有的有线电视信号传 条件：有线电视电缆、 （4）光纤接入 光纤 计算机 骨 条件：光纤、网卡 （5）无线接入 条件：无线网卡 带无线网卡的计算机 第五章因特网应用 5.1电子邮件 1因特网的功能：（1）电子邮件（2）文件传输（3）万维网服务（www服务） （4）远程登录（5）电子公告牌 2电子邮件的格式：用户名 域名 3.电子邮件传送格式： “发送成功” SMTP协议：简单邮件传输协议它的功能是把电子邮

18、件先发送到发送方的电子邮件服 务器中。 POP3协议：电子邮局第三版它的功能是把接收方邮件服务器的电子邮件发到接收 方中 5.2万维网（P87） 万维网英语原文是 world wide web（缩写为 WWW,简称web）,意思是世界范围内的网。万维 网是因特网的服务之一。 超文本传输协议（HTTP ）是用于万维网（WWW）服务的协议。该协议的主要功能是传 送浏览器的网页请求和服务器返回的网页。 所谓的网上冲浪主要是浏览万维网中的网页，可以说万维网是因特网上网页的集合。 万维网上的资源如同浩瀚的信息海洋，搜索引擎犹如一根绳子，可以帮助我们找到信息海 洋中的东西。 搜索引擎分类： 1全文搜索 2

19、分类目录搜索 算法和程序设计 第1章计算机和算法 1算法的概念（P6） 算法是在有限步骤内求解某一问题所使用的具有精确定义的一系列操作规则。 算法的特点：有穷性，确定性，可行性，有0个或多个输入，有一个或多个输出 2.算法的表示方法 自然语言，流程图，伪代码。其中，流程图是最常用的方法。 流程图所使用的符号： 处理框 进行计算 输入、输岀框 数据输入和输岀 判断框 表示条件判断 连接框 0 连接画不下而断开的流程线 流程线 指出流程控制方向 开始、结束框 l 表示算法的开始或结束 常量和变量： 常量：封口容器（从一而终） a 13 13a=13（把数据13放入封口容器 a中） （2）变量：开口

20、容器（喜新厌旧） bb b=10（把数据10放入开口容器 b中）b=15（把数据15放入开口容器 b中） （3）变量的三种特殊类型15 计数器：在算法执行过程中，用来记录某种事件发生次数的变量。 在算法执行的准备阶段，应预置初值0 在算法执行过程中，每当指定事件发生时，计算器中的值加1 后，结果仍然送回计算器中。 C=1 C=c+1 累加器：在算法执行过i累加和的变量。 S=0 S=s+i 在算法执行的准备阶段，应预置初值0 在算法执行过程中，每当指定事件发生时，计算器中的值加i后, 累乘器：在算法执行过程果仍然送回计算储数据i累乘的变量。 s S=1 S=s*i 3.算法的执行流程一 （1）

21、顺序模式 在算法执行的准备阶段，应预置初值1 在算法执行过程中，每当指定事件发生时，计算器中的值加i后, 结果仍然送回计算器中。 1.输入一个圆的半径，求圆的周长和面积，并输岀结果。 开始 输入半径R C w2*3.14*R S 呻3.14*RA2 输出C和S 结束 代码： Dim r as in teger R=val(inputbox(输入半径 R:”) C=2*3.14*R S=3.14*RA2 Print “周长” ;c Print” 面积” ;S 2.输入一个两位数，交换个位和十位数的值，并输岀结果。 开始 输入一个两位数x a 斗 int（x/10） b * xmod10 y _1

22、0*b+a 输出y 结束 代码： Dim x as double a=i nt(x/10) b=xmod10 y=10*b+a print y 3.输入两个变量的值，将两个变量的值进行交换，并输出结果 代码: 开始 输入a,b c _a a十 b b _ c 输出a,b 结束 (2)选择模式 1输入两个数，比较大小并且输岀较大数。 开始 输入两个数a,b 如果ab 那么 输出a的值 否则 输出b的值 结束 代码： Dim a,b as si ngle a=val(inputbox(请输入：”) b=val(inputbox(请输入：”) if ab the n print a else pri

23、nt b end if Dim a,b as si ngle a=val(inputbox(第一个数”) b=val(inputbox(第一个数”) c=a a=b b=c print a,b 2.输入一个数，求它的绝对值，并输岀结果。 开始 输入a 如果a0 那么 A=-a 输出a的值 结束 ( 当型循环一般形式 Do while 条件 循环体 loop 代码： Dim a as si ngle a=val(inputbox(请输入：”) if a0 then a=-a end if print a 直到型循环一般格式- Do 循环体 Loop while 条件 For循环变量=初值to步长

24、 循环体 Next循环变量 1.输出5个* 2.输岀 1,2,3,4,5 代码： 代码： Dim a as in teger Dim n as in teger Dim n as in teger A=1 Do while n5 For n=1 to 5 step 1 Do while a=5 Print “ *” Print “ *” Print a N=n+1 Next n A=a+1 loop loop 3.求1+2+3+4+5+k的和，其中 k值由键盘输入。 Dim k,l,s as in teger K= val(inputbox(请输入 k：” ) S=0 For i=1 to k

25、 S=s+i Next i Print s 4.求1+2+3+4+5+加到第 n项，和不超过 65 ( =65 )，求n值 Dim n,s as in teger S=0 Do while s关系运算符 逻辑运算符 优先级 运算符 符号 优先级 运算符 符号 1 乘幂 A 7 大于 2 取负 (-) 7 = 大于等于 3 乘除 *、/ 7 小于 4 整除 7 = 小于等于 5 取余 mod 7 = 譬r. 等 6 加减 +、- 7 不等于 算术运算符关系运算符逻辑运算符 3基本函数（p85） 序号|函数名 |函数功能|举例 优先级 运算符 符号 8 not :非 9 and 和 10 or 或

26、 序号 函数名 函数功能 举例 (1) 确定枚举范围 (2) 明确数据符合条件 (3) 逐一检验 例2找出 ! 1000以内的所有素数的枚举算法 (p80)， 代码右图所示。 6排序-冒泡排序 数组 数组变量：相当于多个容器的组合 定义数组： Dim d（1 to 8） as integer I=1 For i=1 to 8 Di=val（i nputbox（输入数据：”） Next i 1 2 3 4 5 例3数组a中数据如下，请自右向左升序排列 1 Abs(x) 求x的绝对值 Abs(-6.8)=6.8 2 In t(x) 求小于等于x的最大整数 In t(9.8)=9In t(-9.8)

27、=-10 3 Sqr(x) 求x的算术平方根 Sqr(144)=12 4 Le n(x) 计算字符串的长度 Len( “ned675” )=6 5 Mid(x, n,k) 取字符串x中第N个字符长 度为k的字符串 Mid( “ needfree” ,4,4)= ” dfre 6 Fix(x) 截取x的整数部分 Fix(-8.8)=-8 7 Val(x) 把字符串x变为整数 Val( “ abc” )=abc 8 Str(x) 把数值x变为字符串 Str(123)= ” 123” 4解析算法（p18）:有明确的数学公式或物理公式的程序，采用解析算法。 例1: 计算并联电阻值（p72） 代码： P

28、rivate sub form_load() Dim r ,rs as double Rs=0 R=val(inputbox( “输入电阻值(0 结束)：”) Do while r0 Rs=rs+1/r R= val(inputbox( “输入电阻值(0 结束)：”) Loop Label1.caption= ”并联的阻值为：”+str ( 1/rs) End sub 5枚举算法：采用盲目的搜索方法，在搜索过程中，把各种可能情况都考虑到，并对结果一一进 行判断。（一一列举、逐一检验） 用枚举算法编程的关键： 例2代码： Private sub comma nd1_click() Dim i,j

29、 as in teger Dim f as Boolea n 2Fo冒泡排序I 1000 F=true F(把待排序的数据看成是垂直 I放置的 j一列数据，从最下面 的一个元a素起，自下而上的 e比d较相邻的数据。 Next j If f=true the n List1.additem(str(i) End if Next i End sub 167 180 176 168 189 冒泡排序过程: 1 167 2 180 3 176 4 168 5 189 1 2 168 3 180 176 4 第一次冒泡 原值 总结： 1数组有n个元素，将进行n-1 2第i次冒泡。进行n-i次比较。 （2

30、交换数组元素di和dj中的数据，可以通过下面一系列运作完成: T=di:di=dj:dj=t （3冒泡排序算法代码 次冒泡。 (P87) 代码： Dim d(1 To 200) As In teger Dim n As In teger Private Sub Comma nd1_Click() Dim i, j, t As In teger For i = 1 To n - 1 Step 1 For j = n To i + 1 Step -1 If d(j) d(j - 1) Then t = d(j): d(j) = d(j - 1): d(j - 1) = t End If 7查找-顺

31、序查找 顺序查找： Next j Next i 从数组的第一个元素开 的值等于key,则结束处理；若找遍所有元素，无任何值等于 b中数据如下，请顺序查找xt i 始I，依次判断各元素的值是否与查找键key的值相等。若di + Str）则结束处理。 例4数组 1 2 3 4 5 167 180 176 168 189 例4代码: 168并且输出此元素序号 顺序查找过程: Private sub comma nd1_click() Dim i,key,d(1 to 5) as in teger l=1:key=12 For i=1 to 5 step 1 If di=key the n Pri n

32、t i Else Print “没找到” End if Next i 8查找-对分查找 例5数组已经升序排列，查找 key End sub key=168查找需要查找几次？（3次） 第二次范围：1,2 即 i=1,j=2 m=int(i+j)/2=1 Keyd2 168 1 167 2 168 3 176 4 180 5 189 1 167 2 168 3 176 4 180 5 189 第三次范围：2,2 即 i=2,j=2,m=int(i+j)/2=2 Key=d2 例5代码： Dim d(1 to 5) as in teger Dim I,j as in teger l=1:j=n Do

33、 while i=j M=i nt(i+j)/2 If dm=key the n Print m Else If dmkey the n I=m+1 Else J=m-1 End if End if 9变量命名和声明 变量命名规则： （1）以字母开头 （2）只能由字母、数字、下划线构成 （3）不能用 vb关键字，如 print ,sub,end等 （4）不区分大小写 变量声明： （1）显式声明： 用 dim,public,private 或 statics 来声明变量 例: dim sum as integer （2）隐式声明： 此时变量类型是变体类型（varia nt） 第3章程序设计基础

34、Vb程序是面对对象的程序设计方法。 1类和对象 在面对对象的程序设计方法中，类是对相同性质的对象的一种抽象，而一个对象则是类的一个 “实例“。 类：相同性质的对象 对象：类的一个实例 对象三要素：属性、方法、事件 列表框（list） List1、list2、list3 文本框(textbox) Text1、text2 标签(label) Label1、label2、label3 命令按钮(commandbutton ) Command1、command2 数据用来代表对象的属性，通常一个对象可以有若干个属性，以反映该对象各方面的状态。 代码则用来描述改变对象状态对象理状态，称为该对象的方法。

35、状态(一组数据 方法(一组代码 对于对象而言，事件就是发生在该对象上的事情，通常是用户在对象上激发的一种动作。 属性 作用 n ame 控件名称 capti on 标题，即决定控件显示内容 text 文本框的文本内容 additem 将指定内容添加到列表框中 函数、vb程序中的控件只接受字符串类型 Val(x) 把x变为数值型 Str(x) 把x变为字符串型 例 6 在 forml 中拖入 commandl, command2 command3 command4.在工程中，添加窗体forml、 form2、form3、form4、form5. 例6代码： Private sub comma n

36、d1_click() Form2.visible=true:form2.refresh End sub Private sub comma nd2click() Form3.visible=true:form3.refresh Private sub comma nd3click() Form4.visible=true:form4.refresh End sub Private sub comma nd4click() Form5.visible=true:form5.refresh End sub 第四章基本算法实现 数组 1. 数组输入数据 Dim a(1 to 6) as Ion g,

37、l as in teger For i=1 to 6 ai=val(inputbox(输入数据：”) Next i 2. 数组比较大小并且排序 For i=1 to 6 step 1 For j=6 to i+1 step -1 If aj aj-1 the n t=aj aj=aj-1 aj-1=t End if Next j Next i 3. 数组元素显示 For i=1 to 6 step 1 Print a(i) Next i If 语句 1输入一年号，判断它是否是闰年。界面如下图所示，包括一个标签、一个文本框和一个 命令按钮。提示：如果此年号能被 400整除或者不能被400除尽，也

38、不能被100除尽，但能 被4整除，则它是闰年；否则，不是闰年。 代码： Private Sub Comma nd1_Click() Dim year, x As In teger year = Val(Text1.Text) If year Mod 400 = 0The n Label1.Caption =是闰年” jar Mod 4 = 0 And year Mod 100 0 Then abel1.Caption =是闰年” abel1.Caption =不是闰年” If Else L Els成绩80输出良好; 若是80成绩70输出中等；若是70成绩60输出及格；若是 60成绩0,输出不及

39、 格；若是其他数则输出 error信息。 代码如下： Private Sub Comma nd1_Click() Dim x As Si ngle x = Val(Text1.Text) If x 100 Or x 0 The n Text2.Text = error ElseIf x 60 The n 不及格 Text2.Text = ElseIf x 70 The n Text2.Text = 及格 ElseIf x 80 Then Text2.Text = 中等 ElseIf x 90 Then Text2.Text = 良好 Else Text2.Text = 优秀 End If En

40、d Sub For 循环 1.找出所有的水仙花数。 水仙花数是个三位数， 它的各位数字的立方和等于这个三位数本身。 例如371= 33+73+1 3，则371是水仙花数。 代码： Private Sub Form_Load() Dim i, j, k, Flower As Integer Show For i = 1 To 9 For j = 0 To 9 For k = 0 To 9 Flower = i * 100 + j * 10 + k If Flower = i A 3 + j A 3 + k A 3 The n Print Flower ; 是水仙花数 Next k Next j

41、Next i End Sub 2计算 1 + 1/2+1/3+1/4+1/5+1/49 的值 代码： Private sub command1_click() Dim I as integer ,s as single S=0 For i=0 to 49 step 2 S=s+1/i Next i Print ”s=”;s End sub VB基本运算和语句专题测试 班级:学号姓名： 一、选择题（每题3分） 1下列不属于 VB基本运算的是（） A.函数运算B.算术运算C.关系运算D.逻辑运算 2、在Visual Basic 中，下列优先级最高的运算符是 （） C. D.Not 3、Visual

42、 Basic 6.0 中编程时，当双击窗体上的某个控件时，所打开的窗口是（） A.工程资源管理器窗口B.代码窗口C.工具箱窗口D.属性窗口 4、下列正确的 Visual Basic注释语句是（） A. Dim a（10） As In teger B. Dim a（10） As In teger C. Dim a（10） As In teger D. Dim a（10） As In teger 定义一个数组 “定义一个数组 定义一个数组 “定义一个数组 5、数学关系式3 w x10表示成正确的 VB表达式为（） A. 3=x10 B. 3=x AND =3 OR x10 D. 3=x AND x

43、10 6、下面正确的赋值语句是 () A. y=x+30 B. pi*r*r=y C. x+y=30 D. x=3y 7、表达式ASC(F)的类型是() A.算术表达式B. 关系表达式 C.逻辑表达式D.字符表达式 8、 表达式 Int(2.5)、Fix(2.5) 、Int(-2.5)、Fix(-2.5)的运算结果分别是() A. 2、2、-2、-2 B. 2、2、-3、-2 C. 3、2、-2、-2 D. 2、2、-3、-3 9、如果变量 a=7、b=6、c=4、d=5，则表达式 ac AND cd 的值为（） A. Yes B. No C. True D. False 10、为了给x,y,

44、z三个变量赋初值1，下面正确的赋值语句是（） A. xyz=1 B. x=1,y=1,z=1 C. x=y=z=1 D. x=1: y=1 : z=1 11、如果变量 a=2,b=3,c=4,d=5 ，表达式 NOT ab AND NOT dc 的值是（） A. False B. True C. 1 D. 0 12、表达式 Int（198.555*100+0.5）/100的值为（） A. 198.56 B. 199.6 C. 198 D. 200 13、函数 Mid（123456789,3,4）的值是（） A. 456 B. 3456 C. 3456 D. 456 14、以下程序代码能执行的是

45、（） A.If a=1 The n b=0 Else c=0 End If B. If a=1 Then : B=0: ElseIf C=0 Then : D=0 C. If a = 1 The n b = 0 ElseIf c = 0 The n d = 0 End If D. If a = 1 The n b = 0 Else If c = 0 d = 0 End If 15、下列程序段的循环结构执行后, Dim y as In teger, i as in teger y = 0 For i = 1 To 10 Step 2 y = y + i i的值和y的值是() Next i A.1

46、0、 25 B. 10 、36 C. 11 、16D.11、25 In x 16、 （浙江高考 2009）将数学表达式写成VB表达式，正确的是（） a b A. Iog（x）/（a+b） B . Iog（x）/a+b C .In （x）/（a+b） D .In （x）/a+b 17、（浙江高考2009）有如下VB程序段： For i=1 To 1000 a=I nt(R nd*100+1) b=I nt(R nd*100+1) x=a+b y=a-b c=Sqr(x) d=Sqr(y) Next i 第17题图 调试时出现如第17题图所示的错误提示，产生此错误的语句是（） A . d=Sqr(

47、y) B . y=a-b C . c=Sqr(x) D . x=a+b 18、（浙江高考 2009）在VB窗体中有一个对象.该对象 的属性窗口如图所示。下列说法中不正确的是（） A . 1680为属性值 B .根据Timer1 Timer ”可判断窗体名为 Timer C .该对象的名称为 Timer1 D .In terval 为属性名 孩宇母序按分类序1 （名称j Timerl E Tw ;Int 0 Left 15&0 Tag： lop 1530 Tinerl Timer 第18题图 19、在条件语句 If x=1 The n y=2 中，下列说法正确是（） A. x=1和y=2均为赋值语句B. x=1 和y=2均为关系表达式 为赋值语句，y=2为关系表达式 C. x=1为关系表达式，y=2为赋值语句D. x=1 20、下列程序中s = s + j语句共执行了多少次，最终s的值为多少？() Dim s As Integer, i As Integer, j As Integer For i = 1 To 10 Step 2 For j = 1 To 5 Step 2 s = s + j Next j Next i A. 12、3