相关试卷

1、某学校举办运动会采用了运动会管理软件，赛前能自动生成比赛秩序册，比赛时很方便就能查找出某项目的实时成绩与团体总分等数据，这种做法采用的管理方式是（）

A、智能管理 B、人工管理 C、文件管理 D、数据库管理

查看解析
2、信息资源管理包括人工管理、计算机文件管理和数据库管理，以下没有应用数据库管理技术的是（）。

A、火车站售票系统 B、优酷视频专题网站 C、用Excel登记学生学籍 D、华文电子杂志超市——龙源期刊网

查看解析
3、下面所列的条目中属于数据库的特点的是（）。
①存储大量数据②高效检索③管理操作烦琐④通过网络实现数据共享

A、②③④ B、①②③ C、①②④ D、①③④

查看解析
4、下列没有涉及网络数据库应用系统的是（）。

A、查询龙源期刊网 B、使用支付宝网上支付 C、使用QQ远程控制 D、登录中国国家数字图书馆

查看解析
5、王老师登陆学籍管理系统，想查找李明的相关信息，此操作是对数据库的（）。

A、添加 B、查询 C、统计 D、编辑

查看解析
6、学校需要统计学生的作业完成数，需要将学生的完成数按从高到低显示，下列程序模拟该信息处理过程，程序在数据库stud中找到的学生信息（编号和完成次数），并将所有学生按照完成数从高到低显示。先将所有学生的编号和完成次数从数据库stud的info表中ID和finshed两字段中取出分别保存在数组a和数组b中，第i个学生的编号保存在a(i)中，对应的作业完成次数保存在b(i)中。
数据库文件“stud. accdb”信息如图所示。

程序界面如图所示，左边列表框List1中显示所有学生信息（包括编号和完成次数），单击“排序”按钮（Command），所有编号按照作业完成次数从高到低显示在列表框List2中。

代码如下：

Dim conn As New ADODB. Connection

Dim rs As New ADODB. Recordset

Dim n As Integer

Dim a(500)As String

Dim b(500)As Integer

Private Sub Fom Load()

    Dim i As Integer

    conn. Connection String="Provider=Mi-crosoft. AC

    A.OLEDB. 12.0；DATA Source="& App. Path &"\stud. accdb"

    conn Open

    Set rs. Active Connection=conn

    rs. Open "Select*From info"

    n=0

    Do While not rs.EOF            '到记录集最后一条记录后退出循环

        n=n+1

        a(n)=rs. fields("id")

        b(n)=rs. fields("finshed")

        rs. MoveNext                '移动到下一条记录

    Loop

    For i=1 To n

        List1. AddItem a(i)+" "+Str(b(i))

    Next i

    rs. Close

    conn. Close

    Set rs= Nothing

    Set conn= Nothing

End sub

Private Sub Command1_Click()

    Dim i As Integer, j As Integer, t1 As Integer, t2 As String, k As Integer

    For i=1 To n-1             'n表示学生总数

        k=i           'k保存第i大的数，一开始假定是a(i)

        For j=i+1 To n

            If b(k)<b(j) Then k=j           '比较完成数

                ①

            If    ②      Then

                t1=b(i): b(i)=b(k): b(k)=t1           '交换完成次数

                t2=a(i): a(i)=a(k): a(k)=t2          '交换编号

            End If

        Next j

    Next i

    For i=1 To n          '在列表框List2中输出排序结果

        Listt2. Addltem a(i)+" "+Str(b(i))

    Next i

End sub

(1)、当“Form_Load()”事件处理过程运行结束时，变量n的值为。

(2)、加虚线框中的代码采用的排序算法为。

(3)、为实现上述功能，程序中划线处的代码为①；②。

查看解析
7、通过ADO的Recordset对象从数据库中获取数据的基本过程有以下几个步骤：
①通过实例的Open方法打开记录集 ②设置实例的ActiveConnection属性值 ③创建ADO的Recordset对象实例

正确的操作顺序是（）。

A、①②③ B、③②① C、②①③ D、①③②

查看解析
8、某 Access 数据表编辑界面如图所示，下列说法不正确的是（）

A、Access 是数据库应用程序 B、数据表的名称为“图书.accdb” C、可在“收藏日期”字段输入“2020/05/20” D、“28.00 元”是“定价”字段的有效输入值

查看解析
9、某大于1小于 128 的十进制奇数 x，将其转化为二进制数 y，下列说法正确的是（）

A、二进制数 y 的最低位一定是 0 B、十进制数 x+1 转化为二进制数一定不超过 7 位 C、十进制数 x \ 2 的运算结果转化为二进制数一定比 y 少 1 位 D、十进制数 x Mod 16 的运算结果与二进制数y的左侧4位的值相等

查看解析
10、一个二位十六进制正整数n，末位是“9”，下列说法正确的（）

A、无法确定 n 是奇数还是偶数 B、n+1 是一个三位十六进制数 C、转换为十进制数，最小值是 25 D、转换为二进制数，位数一定是8

查看解析
11、字符“A”比“a”的ASCII码值小32（十进制），已知字符“G”的二进制ASCII码值为1000111，则字符“g”的二进制ASCII码值是（）

A、1001111 B、1010111 C、1011111 D、1100111

查看解析
12、一幅未经压缩800×600像素的256色BMP图像，其文件存储容量大小约为( )

A、156KB B、469KB C、469MB D、236KB

查看解析
13、用二进制对以下对象进行编码，编码中前后两段分别用以代表不同形状和不同纹理，则该二进制编码至少需要（）

A、5位二进制 B、6位二进制 C、7位二进制 D、8位二进制

查看解析
14、在古代军队作战中需要使用特定旗语相互沟通，若要对100种旗语指令进行二进制编码，则二进制编码至少需要（）。

A、100位 B、10位 C、6位 D、7位

查看解析
15、使用UItraEdit软件观察字符“China！生日快乐”的内码，部分界面如图所示，下列说法正确的是（）

A、图中共有4个GB-2312编码 B、英文字符“J”的内码表示成十六进制为50 C、字符“生”的内码表示成二进制为“11001001 11111010” D、“乐”字的内码是D6 A3

查看解析
16、将二进制数11B，十进制数15D和十六进制数10H按从大到小排序，下列排序结果正确的是（）

A、10H 11B 15D B、10H 15D 11B C、15D 10H 11B D、15D 11B 10H

查看解析
17、现有二进制数，则加框处数码所对应的权值是（）

A、21 B、22 C、23 D、24

查看解析
18、某对分查找算法的VB程序段如下：
i=1: j=6: n=0: f=False

key=Val(Text1.Text)

Do While i<=j and Not f

    n=n+1

    m=Fix((i+j)/2)

    If key=a(m)then f=True

    If key<a(m)then j=m-1 Else i=m+1

Loop

数组元素a(1)到a(6)的值依次为“12，19，27，31，46，55”，文本框Text 1中输入“31”后运行该程序，则以上程序段运行结束后，下列说法不正确的是（   ）

A、变量i的值为4 B、变量j的值为4 C、变量m的值为4 D、变量n的值为3

查看解析
19、某排序算法，VB代码如下：
i=1

Do While i<=5

    If i = 0 or a(i - 1)<= a(i) Then

        i=i+1

    Else

        t=a(i): a(i)=a(i-1): a(i-1)=t

        i=i-1

    End If

Loop

数组元素a(0)到a(5)依次为：“0，41，22，53，99，36”，经过该程序段处理后，数组元素a(3)的值为（   ）

A、36 B、53 C、41 D、22

查看解析
20、在平面坐标系中，给定任意个点，求出这些点中与点（1，1）距离最远的点。小李编写出了相应功能的程序：在文本框Text1中输入这些点的坐标值（数据都用逗号分隔并以逗号结尾），单击“计算”按钮Cmd后，程序计算这些点到（1，1）的距离后，结果显示在列表框List1中，并且输出最大距离的点。程序运行界面如图所示。

(1)、由图可知，窗体中的对象共有类；

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

    Dim i, k As Integer

    Dim x1, y1, x2, y2 As Single

    Dim v As Singie, maxd As Single

    Dim s As String, pos zb As String

    List1.Clear

    s=Text1.Text

    x1=1: y1=1

    t="": k=1: j=1

    List1.AddItem"坐标点" & "距离"

    For i=1 To Len(s)

        If Mid(s, i, 1)="," Then

            v=Val(Mid(s,j,i-j))

            j=

            If k Mod 2=1 Then

                x2=v

            Else

                y2=v

                d=Sqr((x2-x1)^2+(y2-y1)^2)

                If Then

                    maxd=d

                    pos="(" & Str(x2)& "," & Str(y2)& ")"

                End If

                List1.AddItem"(" & Str(x2)& "," & Str(y2)& ")" & Str(d)

            End If

            k=k+1

        End If

    Next i

    Label1.Caption="距离（1, 1）最远的点为"& pos &"距离为"& Str(maxd)

End Sub

(3)、若文本框Text1中输入的内容为“31，41，26，51，1，56”，程序运行结束后，距离（1，1）最远的坐标点是。

查看解析

上一页 867 868 869 870 871 下一页跳转