相关试卷

1、十进制正整数n转换为二进制数，该二进制数末位是“0”。下列说法正确的是（）

A、无法确定n是奇数还是偶数 B、若该二进制数的位数是4,则n的最大值是15 C、n与n+1分别转换为二进制数，这两个二进制数的位数可能不同 D、该二进制数末位的“0”去掉后，再转换为十进制数，所得的值是n/2

查看解析
2、算式3EH-1001B的运算结果是（）

A、110101B B、101011B C、63D D、3DH

查看解析
3、下列将二进制数(1010)₂转换成十进制数的算式中，正确的是（）

A、0×2³+1×2²+0×2¹+1×2⁰ B、1×2³+0×2²+1×2¹+0×2⁰ C、1×2³+1×2²+0×2¹+0×2⁰ D、1×2³+0×2²+0×2¹+1×2⁰

查看解析
4、使用Word软件编辑某文档，部分界面如图所示。

对于图中信息，下列说法正确的是（）

A、批注的对象是“AP”,批注的用户为“B1” B、图片的环绕方式为“上下型” C、接受所有修订后，第二段首行文字中的“AP”将变为“无线访问节点” D、拒绝所有修订后，第三段首行文字变为“因为考虑到流量问题，所以视频功能是不开放的，这个占用流”

查看解析
5、下列有关网络信息获取和表达的说法，正确的是（）

A、在搜索引擎中输入关键词搜索信息时，关键字越多搜到的信息越少 B、鼠标移至网页某处图片时变成 “小手”形状，表示了该处存在脚本程序 C、浏览器收藏夹不仅收藏了网页的URL，还保存了该网页中的所有内容 D、网页是由HTML语言表述的，其源代码可以由IE浏览器编辑和执行

查看解析
6、一封电子邮件的附件携带病毒，在WEB模式下，当用户打开该附件时，病毒会向该用户邮件通讯录中每个用户发送带病毒的邮件，这充分说明了病毒具有较强的（）

A、寄生性 B、潜伏性 C、破坏性 D、传染性

查看解析
7、有关信息与信息技术，下列说法正确的是（）

A、当信息失去价值时，不再依附于载体 B、通过上网搜索得到若干关于某问题的答案，一般可以通过查看广大网友对该问题的赞成程度选择解答，因为统计评价具有较高的可信度 C、通过手语表述信息，这属于信息的表达技术 D、共享软件就是可以任意使用的软件，包括用技术手段突破一些软件的功能限制

查看解析
8、下列关于信息的说法正确的是（）

A、语言、文字、声音属于信息的载体，磁带、光盘、书本不属于信息的载体 B、人类社会的三大要素，物质、能源和信息都具有共享性 C、信息的处理必须依靠计算机，所以信息技术是近代才有的 D、因特网上信息的检索需要甄别信息的时效性和真伪性

查看解析

9、我国居民身份证号是由18位字符组成，其中前17位是数字，第18位是校验位（校验位字符在“0”~“9”或“X”中选取）。由前17位数字经过一定的规则计算得到校验值，在查验居民身份证号有效性时，如果校验位中的字符与计算所得校验值相等则身份证号有效，否则无效。

校验值计算规则如下：

第一步：将身份证号前17位数字分别乘以不同的系数后相加，对应系数如下表所示。

位数	1	2	3	4	5	6	7	8	9	10	11	12	13	14	15	16	17
系数	7	9	10	5	8	4	2	1	6	3	7	9	10	5	8	4	2

第二步：将第一步的计算结果除以 11，得到余数。第三步：根据第二步的计算结果从下表获取对应的校验值。

余数	0	1	2	3	4	5	6	7	8	9	10
校验值	1	0	X	9	8	7	6	5	4	3	2

例如：某身份证号为 34052419800101001X。要计算此身份证的校验值步骤如下：第一步：计算 3*7+4*9+0*10+5*5+……+1*2=189

第二步：189除以11得到余数为2

第三步：由余数2获取校验值X。

根据以上规则小王编写了一个验证身份证号是否有效的VB程序，功能如下：在文本框Text1中输入身份证号，单击“验证”按钮Command1后，在列表框List1中显示验证结果。程序运行界面如图1所示。

(1)、设计程序界面时，应使用图2中的（填写相应编号）添加列表框对象 List1。

(2)、实现上述功能的 VB 程序如下，请在划线处填入合适代码。

Private Sub Command1_Click()

Dim i As Integer, a As Integer, b As Integer, sum As Integer, pos As Integer

Dim idCode As String, result As String

Const xs = "0709100508040201060307091005080402" '存储前17位每位系数

Const checkCodeStr = "10X98765432" '存储余数对应的检验值

sum = 0

For i = 1 To 17 Step 1

a = Val(Mid(idCode, i, 1))

b =

sum = sum + a * b

Next i

pos =

checkCode = Mid(checkCodeStr, pos, 1)

If checkCode = Mid(idCode, 18, 1) Then

result = "有效"

Else

result = "无效"

End if

List1.AddItem (idCode & " " & result)

End Sub

(3)、程序中加框处代码有误，应修改为。

查看解析

10、素数只能被1和它本身整除，不能被其他自然数整除。编写VB程序实现如下功能：单击“产生奇数并判断”按钮Command1，随机产生一个三位正奇数显示在文本框Text1中，并在文本框Text2中显示其是否为素数的判断结果。例如，当随机产生的三位正奇数为953时，程序运行界面如图1所示。

图1

图2

(1)、在设计程序界面时，应使用图2所示“控件工具箱”中的(填写相应编号)添加文本框Text1。

(2)、实现上述功能的VB程序如下，请在划线处填写合适的代码。
Private Sub Command1_Click()

Dim n As Integer, i As Integer

Dim flag As Boolean    ‘用于标记是否为素数

Randomize

n = Int( )*2+1   ‘随机生成三位正奇数

Text1.Text = Str(n)

flag = True    ‘标记为素数

i = 3

Do While i <= n - 1 And flag = True

    If n Mod i = 0

        i = i + 2

Loop

    If flag=true Then

        Text2.Text = Str(n) + “是素数”

    Else

        Text2.Text = Str(n) + “不是素数”

    End If

End Sub

(3)、以下选项中，与加框处表达式“n Mod i = 0”等价的是(单选，填字母）。
A.n \ i = Int(n / i) B.n \ i = n/ i   C.n Mod i = n \ i

查看解析
11、现要编写一个统计2018~2100年间闰年次数的程序。已知出现闰年条件是：年份数能被4整除但不能被100整除，或者能被400整除。如图所示，要求程序运行后单击按钮，在列表框中显示闰年年份，并将统计次数显示在Label1。

(1)、代码“PrivateSubCmd1_Click()”中的Cmd1_Click()是。（单选，填字母：A .对象名；B .事件；C .事件处理过程；D .方法）

(2)、下面的VB程序可用来实现上述功能，请在划线处填写合适的代码。
Private Sub Cmd1_Click（）

Dim c As Integer, year As Integer

c=0

If Then

c=c+1

EndIf

Next year

Label1.Caption="闰年共有"+Str(c)+"次"

EndSub

(3)、上述代码段中缺少了List1.AddItemStr(year)，此句代码应该加在（填字母）位置。

查看解析
12、台州市政公共停车的收费标准如下：
30分钟以内不收费，1小时及以内收费5元，超过一小时后超过部分2元\小时收费（不足1小时的按1小时计算）。小明据此设计了以下VB程序，程序运行界面如图。

(1)、若将窗体标题改为“台州停车收费”，应修改窗体属性栏中的属性。

(2)、运行程序，在文本框Text1中输入当天停车时间（分钟），单击“收费”按钮Command1，在文本框Text2显示所对应的费用（元），实现上述功能的VB程序如下，请在划线处填写合适的代码。
Private Sub Command1_Click()

Dim t As Integer , cost As Integer , h As Integer    ‘h是小时时长

t=Val(Text1.Text)

    If t <= 30 Then

      cost=0

    Else

        h=(t-1)\60+1

      If Then

            cost=5

        Else

            cost=

        EndIf

    EndIf

    Text2.Text=

EndSub

查看解析
13、有如下VB程序段：
Dim n As Integer , I As Integer

Dim s As String , ch As String

s=text1.Text

n=Len(s)        '⑴

For I = 1 To n        '⑵

    ch=Mid(s,i,1)

    If Asc(ch) >= 65 and Asc(ch) <= 97 Then

        ch=Chr(Asc(ch)+32)

    End If

    Label1.Caption=Label1.Caption+ch

Next i

已知字母“A”的ASCII码65，字母“a”ASCII码97。若在Text1中输入“Happy2018”，则Label1中应显示（）

A、H2018 B、APPY2018 C、HAPPY2018 D、Happy2018

查看解析
14、某算法的部分流程图如图所示，以下运算结果正确的是（）

A、k=0 B、s=9 C、s=25 D、a=64

查看解析
15、某算法表示如下：
①将0赋值给变量Num，将1赋值给变量i

②若i除以2余0，则将变量Num的值增加1并输出i

③变量i的值增加1，若变量i小于等于10，则转②

④结束

关于该算法的说法不正确的是（）

A、该算法是用自然语言来描述的 B、该算法结束后i=11 C、该算法最后输出5个数值 D、该算法只能用Do While语句实现

查看解析
16、某两段VB程序分别如图1和图2所示：

当n的值为10时，关于该两段程序，下列说法不正确的是（）

A、两段程序中i的初值相同 B、两段程序都采用了循环结构 C、图1程序实现了算式“1+4+7+10”的运算 D、图2程序中i=i+2执行了4次

查看解析
17、有如下VB程序段：
Dim x As Integer, y As Integer, s As Integer

    x=3:y=4

    If x<y And y<0 Then

        s=x Mod y

    ElseIf y>0 and y<x Then

        s=x*y

    ElseIf x=0 Or y=0 Then

        s=x+y

    Else

        s=0

    End If

该程序段运行之后，变量s的值为（）

A、0 B、3 C、7 D、12

查看解析
18、下列VB表达式中值最大的是（）

A、Sqr（2018） B、Abs（-2018） C、Len（"2018"）+1 D、int(rnd*2018)

查看解析
19、建立一个VB程序窗体，如图所示，下列说法正确的是（）

A、该窗体的名称是“第一个VB小程序” B、当前选中对象的类名是“Lab4” C、当前界面共有7个对象 D、“VB01.vbp”是窗体文件名

查看解析
20、将一个时长为1分钟、分辨率为800*600的NTSC制式的黑白动画压缩为MPEG格式文件，压缩后的文件大小为10MB，则其压缩比约为（）

A、5：1 B、9：1 C、10：1 D、20：1

查看解析

上一页 1547 1548 1549 1550 1551 下一页跳转