南开vb二级100题doc
全国计算机二级《VB》练习题及答案
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行,目前处于紧张的备考阶段,以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案,供参考练习,预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后,VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中,VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中,要将一个窗体装载到内存进行变量初始化等预处理,但没有显示该窗体,应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段:a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后,单击命令按钮,在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
计算机二级VB题库
计算机二级《VB》选择题题库及答案2017选择题(1)下列符号常量的声明中不合法的是A.ConstaAsSingle=3.5B.ConstaAsDouble=5+8C.ConstaAsInteger="25"D.Consta=”OK”【答案】C【解析】定义符号常量的一般格式:Const常量名[As数据类型]=表达式,“常量名”参数就是给常量命名。
“数据类型”表示常量的数据类型,一般可以省略,这时由后面的“表达式”参数来指明常量的数据类型。
表达式可以是数值型常量、字符型常量、布尔型常量和日期型常量。
(2)以下合法的VB变量名是A._XB.2yC.a#bD.x_1_x【答案】D【解析】VB中变量的命名规则为:①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB的保留字。
-X不能以一下划线开头,不合法;2y不能以数字开头,不合法;a#b中有#,不合法;D选项符合命名规则,故D.选项正确。
(3)为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为A.DimpiAsIntegerB.Dimpi(7)AsIntegerC.DimpiAsSingleD.DimpiAsLong【答案】C【解析】单精度Single或双精度Double型的变量能够保存浮点型小数,整型Integer 和长整型Long的变量只能保存整型数据。
本题中圆周率为3.14159,小数,可定义一个Single或Double型变量来保存。
故选C.。
(4)下列符号常量的声明中不合法的是A.ConstaAsSingle:3.5B.ConstaAsDouble=5+8C.Con staAsInteger=“25”D.Consta=“OK”【答案】c【解析】定义符号常量的一般格式:Const常量名[As数据类型]=表达式,“常量名”参数就是给常量命名。
“数据类型”表示常量的数据类型,一般可以省略,这时由后面的“表达式”参数来指明常量的数据类型。
【最全最详细】国家二级VB程序设计题及答案
Vb专项练习第一套题目1、打开“考生文件夹\96\工程1.vbp”,完善程序并保存。
实现功能:假设有一个5位数密码。
只记得密码为67□□8,其中百位和十位的数字记不清了,但知道该密码能够被78整除,也能被67整除。
请完善算法帮忙找出这个密码。
''请不要更改源程序的结构,删除原题里的①、②、③。
填写正确的代码,使程序完善Private Sub Command1_Click()Dim x As LongFor x = ① To 67998 Step 10If (x Mod 67 = 0) And (x Mod 78 = 0) ThenPrint ②End If③End Sub2、“考生文件夹\51\工程1.vbp”是采用“穷举法”求出所有水仙花数的程序,请完善程序并保存。
说明:若一个三位数abc,满足:abc=a3+b3+c3,则称abc为水仙花数。
如三位数153满足:13+53+33=1+125+27=153,则153是水仙花数。
'请不要更改源程序的结构,删除原题里的①、②、③。
填写正确的代码,使程序完善Private Sub Command1_Click()Dim i, a, b As IntegerFor i = 100 To ①a = i \ 100b = (i - a * 100) \ 10c = ②If a * a * a + b * b * b + c * c * c = i ThenPrint CStr(i)③Next iEnd Sub3、打开“考生文件夹\12\工程1.vbp”,完善程序并保存。
实现功能:在Text1中输入一个代表秒数的整数后,单击“计算”按钮后,在Label1、Label2、Label3中显示对应的小时、分钟和秒数。
如在Text1中输入“3672”,Label1、Label2、Label3中分别显示“1”、“1”、“12”,即1小时1分12秒。
全国计算机等级考试二级vb笔试试卷及参考答案(附详细解析)
全国计算机等级考试二级vb笔试试卷及参考答案(附详细解析)20XX年3月全国计算机等级考试二级vb笔试试卷及参考答案(考试时间90分钟,满分100分)一、选择题(每小题2分,共70分)(1)下列关于栈叙述正确的是A)栈顶元素最先能被删除B)栈顶元素最后才能被删除C)栈底元素永远不能被删除D)以上三种说法都不对(2)下列叙述中正确的是A)有一个以上根结点的数据结构不一定是非线性结构B)只有一个根结点的数据结构不一定是线性结构C)循环链表是非线性结构D)双向链表是非线性结构(3)某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)A)3 B)4 C)6 D)7(4)在软件开发中,需求分析阶段产生的主要文档是A)软件集成测试计划B)软件详细设计说明书C)用户手册D)软件需求规格说明书(5)结构化程序所要求的基本结构不包括A)顺序结构B)GOTO跳转C)选择(分支)结构D)重复(循环)结构(6)下面描述中错误的是A)系统总体结构图支持软件系统的详细设计B)软件设计是将软件需求转换为软件表示的过程C)数据结构与数据库设计是软件设计的任务之一D)PAD图是软件详细设计的表示工具(7)负责数据库中查询操作的数据库语言是A)数据定义语言B)数据管理语言C)数据操纵语言D)数据控制语言(8)一个教师可讲授多门课程,一门课程可由多个教师讲授,则实体教师和课程间的联系是A)1:1联系B)1:m联系C)m:1联系D)m:n联系(9)有三个关系R、S和T如下:R S T AB C A1 2 B2 1 C3 1则由关系R 和S 得到关系T 的操作是A )自然连接B )交C )除D )并(10)定义无符号整数类为UInt ,下面可以作为类UInt 实例化值的是A )-369B )369C )0.369D )整数集合{1,2,3,4,5}(11)在Visual Basic 集成环境中,可以列出工程中所有模块名称的窗口是A )工程资源管理器窗口B )窗体设计窗口C )属性窗口D )代码窗口(12)假定编写了如下4个窗体事件的事件过程,则运行应用程序并显示窗体后,已经执行的事件过程是A )LoadB )ClickC )LostFocusD )KeyPress(13)为了使标签具有“透明”的显示效果,需要设置的属性是A) Caption B) Alignment C) BackStyle D) AutoSize(14)下面可以产生20-30(含20和30)的随机整数的表达式是A) Int (Rnd*10+20) B) Int (Rnd*11+20)C) Int (Rnd*20+30) D) Int (Rnd*30+20)(15)设窗体上有一个名称为HS1的水平滚动条,如果执行了语句: HS1.Value=(HS1.Max-HS1.Min )/2+HS1.Min 则A )滚动块处于最左端B )滚动块处于最右端C )滚动块处于中间位置D )滚动块可能处于任何位置,具体位置取决于Max 、Min 属性的值(16)窗体上有一个名称为Cb1的组合框,程序运行后,为了输出选中的列表项,应使用的语句是A )Print Cb1.SelectedB )Print Cb1.List(Cb1.ListIndex)C )Print Cb1.Selected.TextD )Print Cb1.List(ListIndex)(17)为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是C 1 A B c 3A) 把这2组单选按钮设置为名称不同的2个控件数组B) 使2组单选按钮的Index属性分别相同C) 使2组单选按钮的名称分别相同D) 使2组单选按钮分别画到2个不同的框架中(18)如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是A)它的Y1、Y2属性的值相等B)它的X1、X2属性的值相等C)它的X1、Y1属性的值分别与X2、Y2属性的值相等D)它的X1、X2属性的值分别与Y1、Y2属性的值相等(19)设a=2,b=3,c=4,d=5,则下面语句的输出是Print 3>2*b Or a=c And b<>c Or c>dA) False B) 1 C) True D) -1(20)窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是A) Private Sub Form1_Click()…End SubB) Private Sub Form_Click()…End Sub C) Private Sub Command1_Click()…End SubD) Private Sub Command_Click()…End Sub(21)默认情况下,下面声明的数组的元素个数是Dim a(5,-2 to 2)A)20 B)24 C)25 D)30(22)设有如下程序段Dim a(10)……For Each x In aPrint x;Next x在上面的程序段中,变量x必须是A) 整型变量B)变体型变量C)动态数组D)静态数组(23)设有以下函数过程Private Function Fun(a() As Integer, b As String)As Integer …End Function若已有变量声明:Dim x(5)As Integer,n As Integer,ch As String则下面正确的过程调用语句是A. x(0)=Fun(x,"ch")B. n=Fun(n,ch)C. Call Fun x,"ch"D. n=Fun(x(5),ch)(24)假定用下面的语句打开文件:Open“Filel.txt”For Input AS #1则不能正确读文件的语句是A) Input #1 ,ch$ B) Line Input #1,ch$C) ch$=Input$(5,#1) D) Read #1 ,ch$(25)下面程序执行结果是Private Sub Command 1_Click()a=10For k=1 To 5 Step-1a=a-kNext kPrint a ;kEnd SubA) -5 6 B) -5 -5 C)10 0 D) 10 1(26)设窗体上有一个名为Text1 的文体框和一个名为Command1 的命令按钮,并有以下事件过程:Private Sub Command 1_Click()X!=Val(Text1.Text)Select Case xCase Is <-10,Is>=20Print “输入错误”Case Is<0Print 20-xCase Is <10Print 20Case Is<=20Print x +10End SelectEnd Sub程序运行时,如果在文本框中输入-5,则单击命令按钮后的输出结果是A) 5 B) 20 C) 25 D) 输入错误(27)设有如下程序Private Sub Command 1_Click()X=10:y=0For i=1 To 5Dox=x-2y=y+2Loop Unti1 y>5 Or x<-1NextEnd Sub运行程序,其中Do循环执行的次数是A) 15 B) 10 C) 7 D) 3(28)阅读程序Private Sub Command 1_ ClickDim arrDim i As IntegerArr=Array (0,1,2,3,4,5,6,7,8,9,10)For i=0 To 2Printarr(7 –i);NextEnd Sub程序运行后,窗体上显示的是:A) 8 7 6 B) 7 6 5C) 6 5 4 D) 5 4 3(29)在窗体上画一个名为Command 1的命令按钮,然后编写以下程序:Private Sub Command 1_Click()Dim a(10) As IntegerFor k=10 TO 1 Step -1a(k)=20-2*kNext kK=k+7Print a(k-a(k))End Sub运行程序,单击命令按钮,输出结果是A) 18 B) 12 C)8 D)6(30)窗体上有一个名为Command 1 的命令按钮,并有如下程序:Private Sub Command 1_Click()Dim a(10),x%For k=1 To 10a(k)=Int(Rnd*90+10)x=x+a(k) Mod 2Next kPrint xEnd Sub程序运行后,单击命令按钮,输出结果是:A) 10个数中奇数的个数B) 10个数中偶数的个数C) 10个数中奇数的累加和D) 10个数中偶数的累加和(31) 窗体上有一个名为Command 1的命令按钮和一个名为Timer 1 的计时器,并有下面的事件过程:Private Sub Command 1_Click()Timer 1.Enabled=TrueEnd SubPrivate Sub Form _Load()Timer 1.Interval=10Timer 1.Enabled=FalseEnd SubPrivate Sub Timer 1_Timer()Command 1.Left=Command 1.Left+10End Sub程序运行时,单击命令按钮,则产生的结果是A) 命令按钮每10秒向左移动一次B) 命令按钮每10秒向右移动一次C) 命令按钮每10毫秒向左移动一次D) 命令按钮每10毫秒向右移动一次(32)设窗体上有一个名为List1 的列表框,并编写下面的事件过程:Private Sub List 1_Click()Dim ch AS Stringch=List 1.List(List1.ListIndex)List 1.RemoveItem List1.ListIndexList 1.AddItem chEnd Sub程序运行时,单击一个列表项,则产生的结果是A) 该列表项被移到列表的最前面B) 该列表项被删除C) 该列表项被移到列表的最后面D) 该列表项被删除后又在原位置插入(33)窗体上有一个名为Command1的命令按钮,并有如下程序:Private Sub Command1_Click()Dim a As Integer, b As Integera = 8b = 12Print Fun(a, b); a; bEnd SubPrivate Function Fun(ByVal a As Integer, b As Integer) As Integera = a Mod 5b = b \ 5Fun = aEnd Function程序运行时,单击命令按钮,则输出结果是A)3 3 2 B)3 8 2 C)8 8 12 D)3 8 12(34)为了从当前文件夹中读入文件File1.txt,某人编写了下面的程序:Private Sub Command1_Click()Open "File1.txt" For Output As #20Do While Not EOF(20)Line Input #20, ch$Print chLoopEnd Sub程序调试时,发现有错误,下面的修改方案中正确的是A)在Open语句中的文件名前添加路径B)把程序中各处的“20”改为“1”C)把Print ch 语句改为Print #20,chD)把Open语句中的Output改为Input(35)以下程序运行后的窗体如图所示,其中组合框的名称是Combo1,已有列表项如图所示;命令按钮的名称是Command1。
国家二级VB机试(公共基础知识)模拟试卷4
国家二级VB机试(公共基础知识)模拟试卷4(总分:62.00,做题时间:90分钟)一、选择题(总题数:31,分数:62.00)1.数据模型的三个要素是( )。
(分数:2.00)A.外模式、概念模式、内模式B.实体完整性、参照完整性、用户自定义完整性C.数据增加、数据修改、数据查询D.数据结构、数据操作、数据约束√解析:解析:数据模型是数据特征的抽象,所描述的内容有三个部分:数据结构、数据操作、数据约束。
数据结构主要描述数据的类型、内容、性质以及数据间的联系等。
数据操作主要描述在相应数据结构上的操作类型与操作方式。
数据约束主要描述数据结构内数据间的语法、语义联系,它们之间的制约与依存关系,以及数据动态变化的规则,以保证数据的正确、有效与相容。
2.在数据库系统中,数据模型包括概念模型、逻辑模型和( )。
(分数:2.00)A.物理模型√B.空间模型C.时间模型D.谓词模型解析:解析:数据模型按照不同的应用层次分为3种类型:概念数据模型、逻辑数据模型、物理数据模型。
概念数据模型简称概念模型,它是一种面向客观世界、面向用户的模型;它与具体的数据库管理系统无关,与具体的计算机平台无关。
较为有名的概念数据模型有实体联系模型(E—R模型)、面向对象模型及谓词模型。
逻辑数据模型又称逻辑模型,它是一种面向数据库系统的模型,该模型着重于在数据库系统一级的实现。
逻辑数据模型有层次模型、网状模型、关系模型和面向对象模型。
物理数据模型又称物理模型,它是一种面向计算机物理表示的模型,此模型给出了数据模型在计算机上物理结构的表示。
3.建立表示学生选修课程活动的实体联系模型,其中的两个实体分别是( )。
(分数:2.00)A.学生和学号B.课程和课程号C.课程和成绩D.学生和课程√解析:解析:实体是概念世界中的基本单位,是客观存在并可以相互区别的事物。
要建立表示学生选修课程活动的实体联系模型,能互相区别并可以联系起来的实体是学生和课程。
国家二级VB机试(数据类型及运算)模拟试卷12(题后含答案及解析)
国家二级VB机试(数据类型及运算)模拟试卷12(题后含答案及解析)题型有:1. 选择题选择题1.若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是A.IntegerB.StringC.BooleanD.Variant正确答案:D解析:本题考查的考点是有关变量定义的。
在VB中有一种特殊的类型:变体类型(variant),这种类型可以包含大部分其它类型的数据。
在VB中,如果没有显式声明变量的类型,则该变量默认为变体型(variant)。
知识模块:数据类型及运算2.为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为A.Dim pi As IntegerB.Dim pi(7)As IntegerC.Dim pi As SingleD.Dim pi As Long正确答案:C解析:本题考查的考点是有关VB中的数据类型的。
VB提供了很多种数据类型,其中能接受小数值的有单精度型Single和双精度型Double。
知识模块:数据类型及运算3.若在窗体模块的声明部分声明了如下自定义类型和数组Private Type rec Code As Integer:Caption As String End Type Dim art(5)As rec 则下面的输出语句中正确的是A.Print arr.Code(2),arr.Caption(2)B.Print arr.Code,arr.CaptionC.Print arr(2).Code,arr(2).CaptionD.Print Code(2),Caption(2)正确答案:C解析:在标准模块中可以声明自定义类型,该类型由Type关键字声明,在声明中要定义类型的所有域。
若用自定义类型声明一个变量,则该变量拥有若干域,取得每个域的值需要用“变量名.域名”的形式。
作为一个自定义类型的数组,首先要取出某个数组元素然后才能访问该元素的某个域,所以要想访问arr(2)的域,需要使用arr(2).Code和arr(2).Caption。
二级VB练习题及答案
二级VB练习题及答案第一章Visual Basic程序开发环境习题1.与传统的程序设计语言相比,Visual Basic最突出的特点是:A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术答案:C2.在正确安装Visual Basic 6.0后,可以通过多种方式启动Visual Basic,以下方式中,不能启动VB的是:A.通过“开始”菜单中的“程序”命令B.通过“我的电脑”找到VB6.0.EXE,双击该文件名C.通过开始菜单中的“运行”命令D.进入DOS方式,执行VB6.0.EXE文件答案:D3.为了用键盘打开菜单和执行菜单命令,第一步应按的键是:A.功能键F10或ALTB.SHIFT+功能键F4C.CTRL和功能键F8D.CTRL+ALT答案:A4.Visual Basic 集成环境中的主窗口中不包括:A.标题栏B.菜单栏C.状态栏D.工具栏答案:C5.用标准工具栏中的工具按钮不能执行的操作是:A.添加工程B.打印源程序C.运行程序D.打开工程答案:B6.Visual Basic窗体设计器的主要功能是:A.建立用户界面B.编写源程序代码C.画图D.显示文字答案:A7.Visaul Basic 6.0分为3种版本:、、。
答案:学习版、企业版、专业版8.可以通过菜单中命令退出Visaul Basic。
答案:文件、退出9.退出Visual Basic的快捷键。
答案:ALT+Q10.快捷键CTRL+O的功能相当于菜单命令。
或者相当于工具栏上的按钮。
答案:文件、打开工程11.如果打开了不需要的菜单或对话框,可以用键退出。
答案:ESC12.工程文化的扩展名是,窗体文件的扩展名是。
答案:.vbp、.frm13.Visual Basic中的工具栏有两种形式,分别为形式和形式答案:固定、浮动第二章对象及其操作习题1.下列可以激活属性窗口的操作是()A.用鼠标双击窗体的任何部位。
B.执行“工程”菜单中的“属性窗口”命令。
国家二级VB机试(上机操作)模拟试卷100(题后含答案及解析)
国家二级VB机试(上机操作)模拟试卷100(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三.个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态见表3一1。
运行后的窗体如图3-11所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上画一个文本框,名称为Text1;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Show和Hide,标题分别为“显示”、“隐藏”,请编写适当的事件过程,使得在运行时,单击“隐藏”菜单项,则文本框消失;单击“显示”菜单项,则文本框显示出来。
运行后的窗体如图3-12所示。
要求程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
正确答案:第1小题本题只需按要求画出控件数组,并设置其Value属性。
【操作步骤】步骤1:新建一个“标准EXE”工程。
步骤2:在窗体Forml中加入一个标签和一个复选框,并用“复制”和“粘贴”的方法,生成包含三个元素的复选框数组。
步骤3:分别设置窗体和复选框数组中各元素的相关属性,其属性及值如表4.5所示。
步骤4:按要求将文件保存至考生文件夹中。
第2小题本题需用菜单设计器建立菜单,并编写“显示”和“隐藏”菜单项的单击事件过程控制文本框的visible属性变化。
【操作步骤】步骤1:新建一个“标准EXE”工程,在窗体Forml中画一个文本框,在属性设置窗口中将其Name属性值设置为Text1。
计算机二级VB练习题附答案
计算机二级VB练习题附答案计算机二级VB练习题附答案计算机二级考试是全国计算机等级考试(National Computer Rank Examination,简称NCRE)四个等级中的一个等级,考核计算机基础知识和使用一种高级计算机语言编写程序以及上机调试的基本技能。
那么计算机二级vb考试会怎么考?以下仅供参考!【计算机二级VB练习题一】1、为了在运行时能显示窗体左上角的控制框(系统菜单),可以设置以下哪个属性的值为True( )。
A.Contr01BoxB.MinButtonC.MaxButtonD.BorderStyle参考答案:A参考解析:本题考查窗体的常见属性。
窗体中ControlBox属性用来控制是否显示控制菜单,属性值为False时不显示控制菜单。
属性MinButton和MaxButton控制是否显示最大化和最小化按钮,属性BorderStyle则是设置窗体的边界样式。
2、组合框是文本框和( )特性的组合。
A.复选框B.标签C.列表框D.目录列表框参考答案:C参考解析:本题考查组合框。
组合框控件(ComboBox)是将文本框和列表框的功能结合在一起,用户可以在列表中选择某项(注:只能选取一项),或在编辑区域中直接输入文本内容来选定项目。
3、Visual Basic根据计算机访问文件的方式将文件分成3类,其中不包括( )。
A.顺序文件B.Unix文件C.二进制文件D.随机文件参考答案:B参考解析:本题考查VB文件的分类。
VB中根据文件的访问形式分为顺序文件、随机文件和二进制文件。
4、下列模式中,能够给出数据库物理存储结构与物理存取方法的是( )。
A.内模式B.外模式C.概念模式D.逻辑模式参考答案:A参考解析:数据库管理系统的三级模式结构由外模式、模式和内模式组成。
外模式,或予模式,或用户模式,是指数据库用户所看到的数据结构,是用户看到的数据视图。
模式,或逻辑模式,是数据库中对全体数据的逻辑结构和特性的描述,是所有用户所见到的数据视图的总和。
国家二级VB机试(常用标准控件)模拟试卷7(题后含答案及解析)
国家二级VB机试(常用标准控件)模拟试卷7(题后含答案及解析) 题型有:1. 选择题选择题1.为了使标签Label1透明且不具有边框,以下正确的属性设置是A.Label1.BackStyle=0Lahel1.BorderStyh=lB.Label1.BackStyle=0Label1.BorderStyle=0C.Label1.BackStyle=1Label1.BorderStyle=1D.Label1.BackStyle=1Label1.BorderStyle=0正确答案:B解析:BackStyle属性用于设置标签的背景样式,有两种值可选:0,表示透明;1,表示不透明。
BorderStyle属性用来设置标签的边框类型,有两种值可选:0,代表标签无边框;1,代表标签有边框。
知识模块:常用标准控件2.下列不包含滚动条的控件是A.列表框B.标签C.组合框D.文本框正确答案:B解析:标签控件不包含滚动条。
知识模块:常用标准控件3.窗体上有2个名称分别为Text1和Text2的文本框。
编写如下程序:Private Sub Form_Load( )Text1.Text=““Text2.Text=““End SubPrivate Sub Command1_Click( )Print Text1.Text+Text2.TextEnd Sub程序运行后,在Text1和Text2中依次输入100和200,并单击命令按钮Command1,则输出结果为A.100B.200C.300D.100200正确答案:D解析:单击命令按钮Command1,触发Command1_Click( )事件,Print语句连续输出文本框Text1和Text2的text值。
选D。
知识模块:常用标准控件4.窗体上有—个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为“VB Programming”。
运行程序后,选中其中的“VB”,并执行如下事件过程:Private Sub Command1_Click( )Text1 SelTaxt=“C++”End hub则文本框中显示的内容为A.VBB.VB ProgrammingC.文本框被清空D.C++Programming正确答案:D解析:文本框SelText属性返回或设置包含当前所选择文本的字符串;如果没有字符被选中,则为零长度字符串(““)。
计算机二级VB上机操作练习题及答案
计算机二级VB上机操作练习题及答案计算机二级VB上机操作练习题及答案Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言,下面店铺为为大家带来计算机二级VB上机操作练习题及答案,希望大家喜欢!一、基本操作题(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。
组合框中的文本内容为空,表项内容有“乒乓球”、“羽毛球”和“网球”3项。
运行后的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml、标题为“转换”的窗体上,画1个名称为Shapel、边框宽度为3的形状。
再画两个标题分别为“椭圆”和“圆”的命令按钮。
如下图所示。
要求:编写适当的事件过程,使得单击“椭圆”按钮时,Shapel 的形状变换为椭圆;单击“圆”按钮时,Shapel的形状变换为圆。
程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjr2.vbp,窗体文件名为sjr2.frm。
二、简单应用题(1)考生文件夹中有工程文件sjt3.vbv。
窗体上显示有一个列表框和一个文本框,且列表框中已有若干列表项。
程序的功能是,程序运行时,当用户在列表框中单击并选中某个列表项时,该项的内容将显示到文本框中,用户可以在文本框中对相关内容进行编辑,按回车键后,能够用编辑好的内容替换被选中的列表项,并自动清空文本框;当双击某个列表项时,则从列表框中删除该列表项;当用户直接在文本框中键入文本并按回车键后,则把该文本添加为列表框的一个新列表项,添加完成后,将文本框清空。
运行窗体如图所示。
要求:程序已经给出,但不完整,请将其中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序。
最后程序按原文件名存盘。
国家二级(VB)机试模拟试卷280(题后含答案及解析)
国家二级(VB)机试模拟试卷280(题后含答案及解析) 题型有:1. 选择题 2. 基本操作题 3. 简单应用题 4. 综合应用题选择题1.线性表常采用的两种存储结构是( )。
A.散列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储结构D.线性存储结构和非线性存储结构正确答案:C解析:线性表的存储通常要用两种存储结构:顺序存储结构和链式存储结构。
2.下列关于类、对象、属性和方法的叙述中,错误的是( )。
A.类是对一类具有相同的属性和方法对象的描述B.属性用于描述对象的状态C.方法用于表示对象的行为D.基于同一个类产生的两个对象不可以分别设置自己的属性值正确答案:D解析:类是对一类具有相同的属性和方法对象的描述,属性用于描述对象的状态,方法用于表示对象的行为,基于同一个类产生的两个对象是可以分别设置自己的属性值的。
3.确定一个控件在窗体上的位置的属性是( )。
A.Width或HeightB.Width和HeightC.Top或LeRD.Top和Left正确答案:D解析:本题考查对象的基本属性。
Height和Width属性决定了控件的高度和宽度,而Top和Left属性决定了控件在窗体中的位置属性。
4.一棵二叉树的前序遍历结果是ABCEDF,中序遍历结果是CBAEDF,则其后序遍历的结果是( )。
A.DBACEFB.CBEFDAC.FDAEBCD.DFABEC正确答案:B解析:由于该二叉树的前序遍历结果是ABCEDF,显然A结点为根结点,所以后序遍历时A结点是最后遍历的,其后睁遍历的结果为CBEFDA。
5.关系表中的每一行记录称为一个( )。
A.字段B.元组C.属性D.关键码正确答案:B解析:在关系表中,每一列称为一个属性,对应表中的一个字段;每一行称为一个元组,对应表中的一条记录。
6.当一个工程含有多个窗体时,其中启动窗体是( )。
A.启动Visual Basic时建立的窗体B.第一个添加的窗体C.最后一个添加的窗体D.在“工程属性”对话框中指定的窗体正确答案:D解析:VB规定,对于多窗体程序,必须在“工程属性”对话框中指定其中一个窗体为启动窗体。
国家二级VB机试(综合应用题)模拟试卷6(题后含答案及解析)
国家二级VB机试(综合应用题)模拟试卷6(题后含答案及解析) 题型有:1.1.考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Text1、Text2,都可以多行显示。
还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。
“取数”按钮的功能是将考生文件夹下的in5.dat文件中的50个整数读到数组中,并在Text1中显示出来;“排序”按钮的功能是对这50个数按升序排序,并显示在Text2中;“存盘”按钮的功能是把排好序的50个数存到考生目录下的out5.dat文件中,如图所示。
在窗体中已经给出了全部控件和部分程序代码,要求阅读程序并去掉程序中的注释符,把程序中的?改为正确的内容,并编写“排序”按钮的Click事件过程,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。
最后将修改后的文件按原文件名存盘。
正确答案:【操作步骤】步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,去掉程序中的注释符“‘”,将问号改为正确的内容,并编写代码。
参考答案Dim a(50) As Integer Private Sub C1_C1ick( ) Dim k As Integer,ch As String Open”in5.dat”For Input As #1 ch=”“For k=1 TO 50 Input #1,a(k) ‘将取出的数据存入数组a中ch=ch+Str(a(k))+”“‘将数据存入ch Next k Close #1 Text1.Text=ch ‘在Text1文本框中显示文件内容End Sub Private Sub C2_Click( ) End Sub Private Sub C3_Click( ) Open”out5.dat”For Output As #1 Print #!,Text2.Text Close #! End Sub 需编写的“排序”按钮的代码Private Sub C2_Click( ) Dim t As Integer Dim i As Integer Dim J As Integer Dim ch As String ch=”“For i=50 To 2 Step-1.使用冒泡算法从小到大排序For j=1 To 49 If a(j)>a(j+1) Then ‘两t=a(j+1) a(j+1)=a(j) a(j)=t End If Next j Next i For j=1 To 50 ‘将排序后的数组重新赋给ch ch=ch+Str(a(j))+”“Next j Text2.Text=ch End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷500(题后含答案及解析)
国家二级VB机试(上机操作)模拟试卷500(题后含答案及解析)题型有:1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画两个文本框,其名称分别为Text1、Text2,初始内容都为空,显示为三号字,且Text1 的初始状态为不可用;再画一个名称为Command1、标题为“开始”的命令按钮,如图1-7所示。
要求:编写适当的事件过程,使得单击“开始”按钮后,Text1文本框变为可用状态,且在Text1 文本框中输入字母串时,Text2文本框中用大写字母形式显示Text1 文本框中的内容。
程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
正确答案:第1小题【操作步骤】步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。
步骤2:按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。
步骤2:打开代码编辑窗口,编写Text1的Change事件过程和命令按钮的单击事件过程。
参考代码:Private Sub Command1_Click( ) Text1.Enabled = True End Sub Private Sub Text1_Change( ) Text2.Text = UCase(Text1.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。
简单应用题2.(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的20 个整数读入数组a 中,同时显示在Text1文本框中;②单击“变换”按钮,则数组a 中元素的位置自动对调(即第一个数组元素与最后一个数组元素对调,第二个数组元素与倒数第二个数组元素对调……),并将位置调整后的数组显示在文本框Text2 中。
全国计算机二级考试《VB》操作试题及答案
全国计算机二级考试《VB》操作试题及答案全国计算机二级考试《VB》操作试题及答案一、基本操作题(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把Textl中的内容复制到Text2中,单击“清除”选项菜单,则清除Text2中的内容(即在Text2中填入空字符串)。
运行时的窗体如图所示。
要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sit2.vbp,窗体文件名为sjt2.frm。
二、简单应用题(1)在考生文件夹F有一个工程文件sjt3.vbp,窗体上已经有一个标签Labell,请添加一个单选按钮数组,名称为Opl,含三个单选按钮,它们的Index 属性分别为0、1、2,标题依次为“飞机”、“火车”、“汽车”,再添加一个名称为Textl的文本框。
窗体文件中已经给出了Opl的Click事件过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得在程序运行时单击“飞机”或“火车”单选按钮时,在Textl中显示“我坐飞机去”或“我坐火车去”,单击“汽车”单选按钮时,在Text1中显示“我开汽车去”,如图所示。
计算机二级VB考试题及答案
计算机二级VB考试题及答案计算机二级VB考试题及答案「篇一」1.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "m/d/yy")Print Format(MyDate,"yyyy年m月dd日")End SubA.7/21/97 1997年7月21日B.7-21-97 1997年7月21日C.97/7/21 1997年7月21日D.7/21/97 97年7月21日2.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab(2); Format(MyDate, "mmmm-yy")Print Tab(2); Format(MyTime, "hh:mm:ss A/P")End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:303.以下程序段运行的结果为(C)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "dddd,mmmm,dd,yyyy")End SubA.21,07,1997B.21,07,21,1997C.Monday,July,21,1997D.Monday,07,21,19974.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后,单击命令按钮,结果为(B)(单)A.显示对话框,提示信息为"帐号正确"B.显示对话框,提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后,单击命令按钮,结果为(A)(单)A.显示对话框,提示信息为"帐号正确"B.显示对话框,提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"Gong",则程序运行结果为(A)(单)A.显示对话框,提示"密码帐号正确!"B.显示对话框,提示"密码错误"C.程序出错D.没有任何提示7.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <>4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"gong",则程序运行结果为(B)(单)A.显示对话框,提示"密码帐号正确!"B.显示对话框,提示"密码错误"C.程序出错D.没有任何提示8.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"123",显示"密码错误"对话框,关于此对话框描述正确的是(A)(单)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框,名称分别为text1、text2和text3,还有一个名称为label1的标签,一个名称为command1的命令按钮,编写如下代码:Private Sub Command1_ClickDim x, y, z, t!x = Text1y = Text2z = Text3If x < y Thent = xx = yy = tEnd IfIf y < z Thent = yz = tIf x< y Thent = xx = yy = tEnd IfEnd IfLabel1.Caption = x & "," & y & "," & zEnd Sub当在文本框text1、text2 和 text3 中分别输入5、3和8,则标签显示的结果为(C)(单)A.3,5,8B.5,3,8C.8,5,3D.3.8.510.以下程序段:Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后,输入1,则label1的标题显示结果为(A)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.511.以下程序段:Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后,输入2,则label1的标题显示结果为(B)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.512.以下程序段:Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的'整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后,输入3,则label1的标题显示结果为(C)(单) A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.513.以下程序段:Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数")) Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后,输入4,则label1的标题显示结果为(D)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.514.以下程序段的作用是(A)(单)Private Sub Picture1_ClickDim asci As Integer, i As Integeri = 0For asci = 32 To 126Picture1.Print Tab(7 * i + 2); Chr(asci); "="; asci;i = i + 1If i = 7 Then i = 0: Picture1.PrintNext asciA.打印ASCII码表,一行7个表达式B.打印九九乘法表,一行7个表达式C.打印ASCII码表,一行8个表达式D.以上说法都不正确15.我国现在人口有13亿,按人口增长0.8%计算,多少年后我国人口将超过26亿。
国家二级VB机试(数据类型及运算)模拟试卷18(题后含答案及解析)
国家二级VB机试(数据类型及运算)模拟试卷18(题后含答案及解析)题型有:1. 选择题选择题1.以下合法的VB变量名是A.aB.yPrintC.a-bD.Type正确答案:B解析:变量是用一个名称来表示的,给变量命名时应遵循规则:名称只能由字母、数字和下划线组成;名称的第一个字符必须是英文字母,最后一个字符可以是类型说明符;名称的有效字符为255个;不能用,VB的保留字作变量名,但变量名中可以包含保留字,如ConstA,变量名也不能是末尾带有类型说明符的保留字,如Dim!起不合法的变量名;不区分字母的大小写。
知识模块:数据类型及运算2.设在一个工程的窗体中有如下代码:Public x As IntegerPrivate Sub Form_Load( )Dim YAs IntegerEnd Sub在该工程的标准模块的声明部分有代码:Public a As Integer:Private b As Integer关于上述代码,以下叙述中错误的是A.变量X的作用域是整个工程B.变量Y的作用域是Form_Load过程C.变量a的作用域是整个工程D.变量b的作用域是整个标准模块正确答案:A解析:根据变量的定义位置和定义关键字的不同,变量可以分为局部(Local)变量、模块(Module)变量和全局(Public)变量3种类型:知识模块:数据类型及运算3.以下不合法的VB变量名是A.filenameB.readC._yD.e5正确答案:C解析:变量是用一个名称来表示的,给变量命名时应遵循规则:名称只能由字母、数字和下划线组成;名称的第一个字符必须是英文字母,最后一个字符可以是类型说明符;名称的有效字符为255个;不能用VR的保留字作变量名,但变量名中可以包含保留字,如ConstA;变量名也不能是末尾带有类型说明符的保留字,如Dim!是不合法的变量名;不区分字母的大小写。
知识模块:数据类型及运算4.以下关于变量作用域的叙述中,错误的是A.在标准模块声明部分用Public声明的变量的作用域为整个工程文件B.在标准模块声明部分用Private声明的变量的作用域为该标准模块C.在窗体的声明部分不能用Private声明变量D.在过程中不能使用Public声明变量正确答案:C解析:根据变量的定义位置和定义关键字的不同,变量可以分为局部(Local)变量、模块(Module)变量和全局(Public)变量3种类型:知识模块:数据类型及运算5.下列符号常量的声明中不合法的是A.Const a As Single=3.5B.Const a As Double=5+8C.Const a As Integer=“25”D.Const a=“OK”正确答案:C解析:声明特号常量用来代替数值或字符串。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
题目1请编写一个函数jsValue(int m,int k,int xx[]),该函数的功能是:将大于整数m且紧靠m的k个素数存入数组xx传回。
最后调用函数writeDat()读取10组数据,分别得出结果且把结果输出到文件out.dat中。
部分源程序存在文件prog1.c中。
例如:若输入17 5 则应输出:19,23,29,31,37。
请勿改动主函数main()和写函数writeDat()的内容。
int isP(int m){int i;for(i=2;i<m;i++)if(m % i==0)return 0;return 1;}void num(int m,int k,int xx[]){ int s=0;for(m=m+1;k>0;m++)if(isP(m)) { xx[s++]=m; k--;}}无忧id 14题(无isP()函数)#include <stdio.h>void jsValue(int m,int k,int xx[]){ int i,j,s=0;for(i=m+1;k>0;i++){ for(j=2;j<i;j++)if(i%j==0) break;if(i==j) { xx[s++]=i; k--;}}★题目2(无忧id 143 整数排序题)已知数据文件IN.DAT中存有200个四位数,并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:如果四位数各位上的数字均是0或2或4或6或8,则统计出满足此条件的个数cnt,并把这些四位数按从大到小的顺序存入数组b中。
最后main( )函数调用写函数writeDat()把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。
注意:部分源程序存在文件prog1.c中。
程序中已定义数组:a[200],b[200],已定义变量:cnt请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。
void jsVal(){ int i,j,qw,bw,sw,gw;for(i=0;i<MAX;i++){ qw=a[i]/1000; bw=a[i]/100%10;sw=a[i]%100/10; gw=a[i]%10;if(qw&&qw%2==0&&bw%2==0&&sw%2 ==0&&gw%2==0) b[cnt++]=a[i];}for(i=0;i<cnt-1;i++)for(j=i+1;j<cnt;j++)if(b[i]<b[j]) { qw=b[i]; b[i]=b[j]; b[j]=qw;}}★☆题目3(无忧id 133题;捷成id 59、99字符串位置倒置题)函数ReadDat( )实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中;请编制函数StrOR( ),其函数的功能是:以行为单位依次把字符串中所有小写字母o左边的字符串内容移到该串的右边存放,然后把小写字母o删除,余下的字符串内容移到已处理字符串的左边存放,之后把已处理的字符串仍按行重新存入字符串数组xx中。
最后main()函数调用函数WriteDat()把结果xx输出到文件OUT5.DAT中。
例如:原文:n any field.Yu can create anindexyou have the correctrecord.结果:n any field. Yu can createan indexrd. yu have the crrect rec原始数据文件存放的格式是:每行的宽度均小于80个字符,含标点符号和空格。
注意:部分源程序存放在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。
void StrOR(void){int i,righto,j,s,k;char tem[80];for(i=0;i<maxline;i++) /*倒序循环*/for(j=strlen(xx[i])-1;j>=0;j--){ k=0;memset(tem,0,80); /*初始化字符串数组tem*/if(xx[i][j]=='o') /*如果当前字符为'o',进入以下语句*/{righto=j; /*则将此字符中位置j的值赋给righto*/for(s=righto+1;s<strlen(xx[i]);s++)tem[k++]=xx[i][s]; /*从righto的下一跳开始将其后所有的字符都存入到tem中*/for(s=0;s<righto;s++) /*从当前行首部开始到出现字符'o'的位置(righoto)之前开始循环*/if(xx[i][s]!='o')tem[k++]=xx[i][s]; /*将不是字符'o'的字符全存入到tem中*/strcpy(xx[i],tem); /*将当前已处理的字符重新存入当前行xx*/}else continue;}}功能:将字符串src中前maxlen个字符连接到dest中相关头文件:string.hc h a r*s t r c p y(c h a r*de s t,c o n s t c h a r*s r c)功能:将字符串s r c拷贝到字符串d e s t中去相关头文件:s t r i n g.h★☆题目4(无忧id 24题捷成id 9 字符串单词倒置题)函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中,请编制函数StrOL(),其函数的功能是:以行为单位对行中以空格或标点符号为分隔的所有单词进行倒排。
最后把已处理的字符串(应不含标点符号)仍按行重新存入字符串数组xx中,最后调用函数writeDat()把结果xx输出到文件OUT6.DAT中。
例如:原文:You He MeI am a student.结果:Me He Youstudent a am I原始数据文件存放的格式是:每行的宽度均小于80个字符,含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。
/*在无忧及捷成版模拟系统中都通过测试(输入文件句末有标点的在输出文件中句前有空格*/void StrOL(void){ int i,j,k,s,m,strl;char str[80];for(i=0;i<maxline;i++){ strl=strlen(xx[i]);memset(str,0,80); /*初始化这字符串数组str*/s=k=0;for(j=strl-1;j>=0;j--) /*从当前字符串尾部开始向前倒序循环,实现题意要求的倒排*/{ if(isalpha(xx[i][j])) k++; /*如果当前字符是字母a~z或A~Z,则k加一*/else { for(m=1;m<=k;m++) /*否则将长度为k的单词顺序存入到字符串数组str中,s值加1*/str[s++]=xx[i][j+m];k=0; /*将k值清0,以方便下一个单词的长度计数*/}if(!isalpha(xx[i][j])) str[s++]=' '; /*如果当前字符不是字母a~z或A~Z,则以空格代之存入到字符串数组str中,s值加一*/}for(m=1;m<=k;m++) /*此时的k值为当前字符串中第一个单词的长度,但在上一个for循环中没能存入到字符串数组str中,所以在这里将其存入到str中*/str[s++]=xx[i][j+m];str[s]='\0'; /*在当前行尾加0以标记此行的结束*/strcpy(xx[i],str); /*将倒排好的当前字符串重新存回到当前行xx中*/}}捷成版模拟系统中的解法/*在无忧模拟系统中没通过测试(输入文件句末有标点的在输出文件中句前无空格*/void StrOL(void){int i, j ;char word[21], yy[80], zz[80], *p ;for(i = 0 ; i < maxline ; i++) {p = xx[i] ;j = 0 ;memset(word, 0, 21) ;memset(yy, 0, 80) ;while(*p) {if(isalpha(*p)) {word[j++] = *p++ ;if(*p) continue ;}strcpy(zz, yy) ;sprintf(yy, "%s %s", word, zz) ;j = 0 ;memset(word, 0, 21) ;while(*p && (!isalpha(*p))) p++ ;}strcpy(xx[i], yy) ;}}另一解法():/*在无忧及捷成版模拟系统中都通过测试(输入文件句末有标点的在输出文件中句前有空格*/void StrOL(void){ int i,j,m;char str[80];for(i=0;i<maxline;i++){ m=strlen(xx[i]);memset(str,0,80);for(j=m-1;j>=0;j--)if(!isalpha(xx[i][j])){ strcat(str,xx[i]+j+1);strcat(str," ");xx[i][j]='\0';}strcat(str,xx[i]);strcpy(xx[i],str);}}实际上机考试时上面几种解法都可以采用。
*****************************************★☆题目5(无忧id 8整数排序题)在文件in.dat中有200个正整数,且每个数均在1000至9999之间。
函数ReadDat()读取这200个数存放到数组aa中。
请编制函数jsSort(),其函数的功能是:要求按每个数的后三位的大小进行升序排列,然后取出满足此条件的前10个数依次存入数组bb中,如果后三位的数值相等,则按原先的数值进行降序排列。
最后调用函数WriteDat()把结果bb输出到文件out.dat中。
例:处理前6012 5099 9012 7025 8088 处理后9012 6012 7025 8088 5099 部分源程序存在文件prog1.c中。