2024年河北省计算机对口招生考试试题带部分答案.doc

河北省一般高等学校对口招生考试
计算机专业理论试题（A）
注意事项：
1．本试卷共八道大题。总分240分。
2．第I卷“一、选择题”、第II卷“二、判断题”的答案填涂在机读卡上，其他各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。
3．答题前将密封线内项目填写清楚。
第Ⅰ卷（选择题 共100分）
一、选择题（本大题共50小题，每题2分，共100分。在每题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上）
1．下列计算机外部设备中，既属于输入设备又属于输出设备的是．．．．．．．．．．．．．．．（　　）
A．鼠标 　C．键盘　 B．硬盘　　 D．扫描仪
2．以晶体管为重要元器件的计算机属于第几代计算机．．．．．．．．．．．．．．．．．．．．．．．．．（　）
A．四 　 　 B．三　　　 C．二　　　 　D．一
3．有关计算机软件描述错误的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　　）
A．Windows 7是操作系统，属于系统软件
B. Fortran语言是高级语言，属于系统软件
C．CAI是计算机辅助教学软件，属于系统软件
D. WPS是文字处理软件，属于应用软件
4．二进制数1101111.11B转换成十六进制数是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　）
A．DE.CH 　 　 B．DE.3H　　 　 C．6F.3H　　　　 D．6F.CH
5．下列有关计算机病毒论述错误的是 ．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　　）
A．计算机病毒具备潜伏性　
B．计算机病毒是人为编制的计算机程序　　　
C．计算机病毒对设置密码较复杂的文献感染的几率很低
D．杀毒软件要不停的升级病毒库并时常查杀才能有效的确保计算机安全
6．计算机应用领域最广泛的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　　）
A．科学计算 　 B．辅助技术　 　C．数据处理　 D．人工智能
7．下列点阵的字模，需要占用存储空间最小的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．10个16*16点阵的中文字模
B．5个24*24点阵的中文字模
C. 10个32*32点阵的中文字模
D．5个48*48点阵的中文字模
8．计算机一次处理二进制位最长的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．8位微机 　 B．16位微机　　　C．32位微机　　 D．64位微机
9．在Windows XP中，当按下“SHIFT”键的同时，用鼠标左键在不一样驱动器之间拖动对象，
系统进行的操作是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．复制 　　B．移动 　　　C．创建快捷方式 　D．无操作
10．在Windows XP中查找文献时，能够使用通配符来匹配文献名中不能确定的字符。假如需要
查找的文献主名长度为4个字符，且主名第一个字符为“f”的Word格式的文献，
下列输入的查找文献名得到的成果最精准的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（ ）
A．f*.doc 　　B．f***.doc 　C．f?.doc 　　 D．f???.doc
11．对Windows XP进行系统设置的功效组件都放置在．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．控制面板 B．工具菜单 C．系统属性 D．“开始”菜单
12．在Word编辑状态下，将字体效果设置成空心，使用的主菜单是．．．．．．．．．．（　 　）
A．编辑 B．插入　　 　 C．格式　 　D．表格
13.在Word中，不能实现的功效是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．段落设置 　B．字体设置　　 C．函数使用　　 D．高级筛选
14.在Word中，使用表格菜单将表格转换成文字功效时，分隔符不能是．．．．．．．（　 　）
A．分栏符 　B．段落标识　　　 C．逗号　　 　D．制表符
15．在Excel文档中，对高考分数进行高级筛选，假如条件是性别为男，高考分数不小于500
并且小于540，则下述表示正确的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．　　　　　　　　　　　　　　　　　B．　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
性别
高考分数
高考分数
男

>500
男
<540

性别
高考分数
高考分数
男
<540

男

>500
性别
高考分数
男
<540
男
>500
C． D．
性别
高考分数
高考分数
男
<540
>500
16．打开Excel工作簿，在单元格中输入内容 “河北对口招生”，要在其下面
连续单元格内出现内容为“河北对口招生”，下述操作错误的是．．．．．．．．．．（　 　）
A．选中内容单元格及要填充的区域，点击编辑菜单，点击填充，选中向下填充　
B．选中内容单元格，按住Ctrl键，然后拉动向下填充句柄进行填充
C．选中内容单元格，直接拉动向下填充句柄进行填充　　　
D．选中内容单元格，右键复制，选中要填充的区域，粘贴　　
17．在Excel中进行成绩统计，计算单元格B2：B31中的平均成绩，下述措施不正确的是
．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．指定区域输入等号，使用函数average(B2:B31)求平均分
B．指定区域输入等号，使用函数sum(B2:B31)求平均分　　　
C．指定区域输入等号，使用函数sum(B2:B31)/30求平均分　　　　
D．指定区域输入等号，使用sum(B2:B20,B21:B31)/30求平均分　　
18．在Visual Basic中，Print "12" + 45语句执行的成果是．．．．．．．．．．．．．．．．．．．（　 　）
A．1245　 　 B.57 　 C. "12" + 45 D.类型错
19．在Visual Basic中，有关文献保存的说法正确的是．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．只保存扩展名是.frm的文献
B. 只保存扩展名是.vbp的文献
C. 只保存扩展名是.bas的文献
D. 扩展名是.frm，.vbp，.bas这三类文献都能够保存
20．在Visual Basic中，设置窗体Form1的标题为“VB程序窗体”的指令是．．．．．．．（　 　）
A．Form1.name=”VB程序窗体” 　 B．Form1.top=”VB程序窗体”
C. Form1.caption=”VB程序窗体” D. Form1.topic=”VB程序窗体”
21．读下面Visual Basic程序，最后一行输出成果是．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
a = -262: b = 5
c = Len(Str(a) + Str(b))
Print c
A． 4 　　　　　　 B．5 　　　　　　 C．6 　　　　　　　 D．7
22．设a = 2: b = 4: c = 7: d = 8，Visual Basic体现式Not a < b Or c = 9 And d <> 9的值是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．1 B．-1 C．True D．False
23．在Visual Basic中，向图片框（picture1）装入图片(” c:\a.jpg”)正确的语句是．（　 　）
A．picture1.Picture =Load(” c:\a.jpg”)
B．picture1.Picture.Load(” c:\a.jpg”)
C．picture1.Picture =Loadpicture(” c:\a.jpg”)
D．picture1.Picture =Loadpicture.Load(” c:\a.jpg”)
24．在Visual Basic中，有关控件说法不正确的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．能够创建控件数组 B．控件都有名称
C．控件都有单击事件 　 D．用Visible属性能够变化某些控件的可见性
25．下面Visual Basic中数据中，表示1978年10月20日正确的格式是．．．．．．．．．．．（　 　）A．10-20-1978 　 B．10/20/1978 　 C．#1978.10.20# 　 D．#10-20-1978#
26．Visual Basic中文本框的默认属性是哪个选项．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．Caption B．Text　　　　　　 C．SelText D．Selstart
27．在Visual Basic中，下面有关双击窗体要触发的事件说法正确的是．．．．．．．．．．．．．．（　 　）
A． 只触发Click事件 B．只触发DblClick事件
C． 能够触发Click和DblClick事件 D．能够触发Load和DblClick事件
28．在关系型数据库管理系统中有3种基本的关系操作，不包括下面哪种．．．．．．．．．．．（　 　）
A．筛选 　 B．比较 　 C．投影 D．连接
29．在Visual FoxPro中，运算成果是“Test”的体现式为 ．．．．．．．．．．．．．．．．．．．．．．（　 　）
A. LEFT("YourTest",ASC("F")-ASC("A"))
B. RIGHT("YourTest",AT("Test","YourTest"))
C. SUBSTR("Your"+UPPER("test"),5,4)
D. SUBSTR("YourTest",AT("Test","YourTest"),4)
30．在下列有关Visual FoxPro变量的论述中，正确的是．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．使用一个简单变量之前要先申明
B．在Visual FoxPro中，变量分为字段变量和内存变量
C．假如内存变量名与目前数据表中的字段变量名相同，则内存变量优先被使用
D．不能将不一样类型的数据赋给同一个变量
31．在Visual FoxPro表设计器的“字段”选项卡中，字段有效性的设置项里不包括．．．．．（　 　）
A. 规则 B. 信息 C. 默认值 D.标题
32．如下是在Visual FoxPro中设置系统菜单有关的命令，其中错误的是．．．．．．．．．．．（　 　）
A．SET SYSMENU TO AUTOMATIC B．SET SYSMENU TO DEFAULT
C．SET SYSMENU ON D．SET SYSMENU TO
33．下列在Visual FoxPro中有关视图的说法中，不正确的是．．．．．．．．．．．．．．．．．．．．．（　 　）
A. 视图保存在数据库中
B. 视图能够是本地的、远程的，但不能够带参数
C. 通过视图能够对表进行查询
D. 使用对视图进行查询时必须事先打开该视图所在的数据库
34．在Visual FoxPro的DO WHILE…ENDDO 循环结构中，LOOP 命令的作用是．．．．（　 　）
A．退出循环过程，返回程序开始处
B．转移到DO WHILE 语句行，开始下一次判断和循环
C．终止循环，将控制转移到本循环结构ENDDO 背面的第一条语句继续执行
D．终止程序执行
35．在Visual FoxPro中，假如一个函数里只有一条RETURN语句但没有指定体现式，那么
该函数的返回值为．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．.T. 　 B．.F. 　 　 C．空值 　 D．没有返回值
36．计算机网络技术的发展方向不包括．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．高速网络 　 　B．无线通信　　　 C．智能网络　　　　D．即时通信
37．目前计算机网络使用的互换技术重要是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．电路互换　　　　B．报文互换　　　 C．分组互换　　　　D．端口互换
38．假如某局域网中任何一个节点出现故障都不影响整个网络的工作，该局域网的拓扑结构
是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．总线型结构　　　B．树型结构　　 　C．环型结构　 　D．星型结构
39．在OSI模型中，第N层与第N+1层的关系是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．第N+1层把从第N层接收到的数据进行封装
B．各自独立完成对应的功效，各层相互没有影响
C．第N+1层的协议数量一定比N层要多
D．第N层为第N+1层提供服务
40．在OSI参考模型中，用于协商通信双方字符编码和压缩格式的层次是．．．．．．．．（　 　）
A．应用层　 　 B．表示层 　C．会话层 D．传送层
41．TCP/IP中的传输层负责处理网络端到端的通信服务，其中“端”指的是．．．．．．（　 　）
A．应用进程 B．计算机主机 　 C．网络互换设备　 D．网卡
42．有关DHCP服务的描述错误的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．DHCP服务能够为客户机分派IP地址、子网掩码等常用的网络参数
B．客户机一般每次都会取得不一样的IP地址
C．因为DHCP服务重要配备的是IP地址，因此其使用的DHCP协议属于TCP/IP的网际层
D．使用DHCP转发代理能够让不一样子网的客户机共用一台DHCP服务器
43．IEEE802委员会制定的局域网技术标准中，将OSI参考模型的数据链路层分为两个子层，分别是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．.．．．．．．．．．．．．．．．．（　 　）
A．LLC和MHS 　 B．IP和MAC 　 C． MAC和LLC 　 D．IP和LLC
44．有关网络操作系统的描述错误的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．网络操作系统的开放性体目前不一样类型的网络操作系统能互连通信
B．网络操作系统是专门用于运行网络服务的操作系统，客户机不能使用
C．网络操作系统的基本任务是用统一的措施管理各主机之间的通信和资源共享
D．常用的网络操作系统有Windows Server 、Linux、Unix等
45．在下列传输介质中，受外部电磁干扰影响最小的是．．．．．．．．．．．．．．．.．．．．．．．．．（　 　）
A．同轴电缆 B. 光缆 　　　 C. 微波 　　 　 D. 屏蔽双绞线
46．有关互联网“微博”的描述错误的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．是一个Internet上的信息资源共享服务
B．一般用于组织或个人公布公开短信息
C．浏览信息的用户能够针对某条信息刊登评论
D．用户必须安装微博专用的客户端软件才能使用
47．可用于Internet主机的合法IP地址是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．192.168.1.1 B．122.25.16.1 C．127.0.0.1 D．10.1.20.1
48．在我国四大骨干网络中，以向教育和科研机构提供信息服务为目标是．．．．．．．．．．（　 　）
A．CHINANET　　 B．CHINAGBN 　　 C．CSTNET　　　　D．CERNET
49．如下有关ADSL描述错误的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．在电话线路上能够同时进行语音和数据传输
B．ADSL的非对称性一般是指上行速率和下行速率不一样
C．ADSL在线路上传输的是数字信号
D．ADSL的传输速率一般比在PSTN上使用老式的MODEM要高
50．用户A使用的邮箱向用户B的邮箱发送邮件，下列描述错误的是．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．（　 　）
A．假如用户A向用户B发送邮件，该邮件将首先保存在的邮件服务器上
B．假如用户A通过的Web界面登录邮箱发送邮件，用户A和126．com的服务器之间使用HTTP协议通信
C．的邮件服务器向的邮件服务器转发邮件时使用的是SMTP协议
D．假如用户A和B同时使用Outlook收发邮件，则邮件会直接投递，不转交给邮件服务器
第Ⅱ卷（非选择题 共140分）
二、判断题（本大题14小题，每题1分，共14分。将答案填涂在机读卡上，正确的填涂“√”格，错误的填涂“×”格）
1．字节是计算机内中央处理器（CPU）进行数据处理的基本单位。（ ）
2．中央处理器（CPU）能够直接和硬盘互换数据。（ ）
3．Windows XP桌面上的图标大小是系统指定的，不能变化。　（ ）
4．Windows XP桌面上的任务栏由“开始”按钮、迅速开启栏、打开的程序按钮和通知区域组成。（ ）
5．在Word编辑状态下，假如能看到页眉、页脚的编辑区，一定是“页面视图”。（ ）
6．在Word表格中，假如点击“表格”菜单命令隐藏虚框，表格中一部分线条被隐藏，这部分线条在打印输出时不会被打印。（ ）
7．在Excel文档中，工作表指的是工作簿。（ ）
8．在Excel中，图表生成后还能够对图表选项、图表类型、图表位置进行修改。（ ）
9．在Visual Basic中，write #语句是把数据写入次序文献中，print #语句是把次序文献中的内容打印出来。（ ）
10．在Visual FoxPro中，定义一个4行6列的数组ARRSUM，使用的命令是：dimension ARRSUM(4,6)。（ ）
11．OSI参考模型的物理层传输数据的单位是帧。（ ）　
12．主机假如有合法的IP地址，只需要在本机设置主机名，其他主机都能通过DNS服务将该主机名解析到对应的IP地址。（ ）
13．用户在IE地址栏输入“”访问Internet上的资源，省略了端口号，客户机会通过“http”字段判断所访问的是Web服务，并向服务器的80端口提出祈求。（ ）
14．网卡TCP/IP参数中子网掩码的作用是，和IP地址进行“与”运算以获取网络地址。（ ）

三、填空题（本大题共13小题，每题2分，共26分。请将答案填写在答题纸上）
1．世界上第一台电子计算机（英文字母大写） 　　　 诞生于1946年。
2．既有无符号二进制数1111111B，则它的左数第一位1比后6位1的总和多　 。
3．一般情况下，计算机的内部存储器比外部存储器的存取速度要 　 。
4．在Windows XP的“资源管理器”窗口中，假如要显示出系统属性或隐藏属性的文献或
文献夹，能够选择 　　　　　　　 菜单中的“文献夹选项”进行设置。
5．在Word中，要同时关闭或保存打开的多个文档，需按住 　　　　　 键。
6．在Excel格式的高考成绩文档中，假如按照高考成绩总分进行计算，能够计算出高考成绩不小于500分的单元格数目标函数是 　　　　　　　　　　　 。
7．在Visual Basic中，取得命令按钮的标题使用的属性是 。
8．代数式在Visual Basic中的对应体现式是 。
9．在Visual FoxPro中，通过表单设计器创建表单时使用 　　　　　　　　　
设计器定义和修改数据源。
10．在Visual FoxPro中，设X="11",Y="1122"，则体现式：NOT(X==Y)AND(X$Y) OR (X◇Y)的值为 。
11．计算机网络协议的三要素中，用来要求通信双方互换数据和控制信息格式的是
。
12．在对数据的传输效率要求高，但对数据传输可靠性要求不高的场所，一般使用的TCP/IP
传输层协议是 　　　 。
13．IPv6协议中使用的二进制地址长度为 　　　 位。
四、依照已知的环境与题意，写出对应的Visual FoxPro操作命令或SQL语句，要求每题用一条命令或语句完成（本大题共5小题，每题4分，共20分，请填写在答题纸上）
既有数据库ZGGL，其中包括表“职工.dbf” 和“工资.dbf”，其中表 “职工.dbf”有字段：系部名称(C,20)、姓名(C,8)、职工号(C,9)、性别(C,2)、职称(C,8)、年龄(N,2)，表“工资.dbf”有字段：职工号(C,9)、基本工资(N,7,2)、津贴(N,7,2)、扣款(N,7,2)，在对应数据库和表已打开的前提下，写出完成下述功效的命令。
1．将所有系部名称为“计算机系”的职工的年龄加1。（用Visual FoxPro命令）
2． 以系部名称+年龄降序建立唯一索引的复合索引，索引名为XN，索引文献名为XB.CDX。（用Visual FoxPro命令）
3．查询系部名称为“数理系”的职工的姓名、基本工资、津贴，成果保存表SLX.DBF中。（用SQL语句）
4．计算每个系部职工的平均年龄，并显示在屏幕上。（用SQL语句）
5．删除“职工.DBF”表中所有年龄不小于55（不包括55）的统计（用SQL语句）
五、程序分析（本大题共2小题，每题5分，共10分，读程序并分析成果，请填写在答题纸上）
1．阅读下面的Visual Basic程序，分析程序中n = n + 1的执行次数是
Dim m As Integer, n As Integer
Dim j As Integer, k As Integer
m = 3
For j = 1 To m Step 1
For k = -j To 3 Step 2
n = n + 1
Next k
m=4
Next j
Print n
2．有数据库KSHGL.dbc，包括四个表： KSHB.DBF、SSCOREB.DBF、TABLETJ.DBF和LQ.DBF，其中KSHB.DBF的结构为：考生号(C，10)、姓名(C，6)、性别(C，2)、单位(C，20)、出生日期(D)，SSCOREB.DBF的结构为：考生号(C，10)、数学(N，5，1)、英语(N，5，1)、政治(N，5，1)、专业课(N，5，1)，TABLETJ.DBF的结构为：考生号(C，10)、姓名(C，6)、课程名(C，8)、分数(N，5，1)），LQ.DBF的结构为：考生号(C，10)、姓名(C，6)、总分(N，6，1)，有如下程序：（代码中行末的分号为逻辑行连接符）
SET TALK OFF
OPEN DATABASE KSHGL
SELECT * FROM TABLETJ INTO TABLE TEMP1
SELECT * FROM LQ INTO TABLE TEMP2
SELECT 1
USE KSHB
INDEX ON 考生号 TAG 考生号
SELECT 2
USE SSCOREB
INDEX ON 考生号 TAG 考生号
SET RELATION TO 考生号 INTO KSHB
GO TOP
DO WHILE .NOT. EOF()
IF SSCOREB.数学<60
INSERT INTO TEMP1 VALUES(KSHB.考生号,KSHB.姓名,'数学 ',SSCOREB.数学)
ELSE
IF SSCOREB.英语<60
INSERT INTO TEMP1 VALUES (KSHB.考生号,KSHB.姓名,'英语',SSCOREB.英语)
ELSE
IF SSCOREB.政治<60
INSERT INTO TEMP1 VALUES (KSHB.考生号,KSHB.姓名,'政治',SSCOREB.政治)
ELSE
IF SSCOREB.专业课<60
INSERT INTO TEMP1 VALUES (KSHB.考生号,KSHB.姓名,'专业课',;
SSCOREB.专业课)
ELSE
INSERT INTO TEMP2 VALUES(KSHB.考生号,KSHB.姓名,;
SSCOREB.数学+SSCOREB.英语+SSCOREB.政治+SSCOREB.专业课)
ENDIF
ENDIF
ENDIF
ENDIF
SKIP
ENDDO
SELECT * FROM TEMP1 ORDER BY 分数,考生号 DESC INTO ARRAY ARR
INSERT INTO TABLETJ FROM ARRAY ARR
SELECT * FROM TEMP2 ORDER BY 总分,考生号 ASC INTO ARRAY ARR
INSERT INTO LQ FROM ARRAY ARR
CLOSE DATABASE
CLOSE TABLES ALL
DROP TABLE TEMP1
DROP TABLE TEMP2
SET TALK ON
RETURN
该程序的功效是： 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
六、写出下列程序的运行成果（本大题共5小题，每题5分，共25分，请填写在答题纸上）
1．窗体中有一命令按钮，此按钮单击事件程序如下：
Private Sub Command1_Click()
Dim m As Integer
Dim a As Integer
Dim b As Integer
a = 1: b = 2: m = 0
m = vb1(a, b)
m = m + a+b
Print m
End Sub
函数:
Function vb1(w As Integer, ByVal n As Integer)
w = 100: n = 200
vb1 = w + n
End Function
窗体开启后单击命令按钮，最后m的值是 。
2． 如图所示，图中有一个文本框（名称为T1），两个选项按钮(名称分别为Op1，Op2)，两个复选框(名称分别为Ch1，Ch2)，两个框架，一个命令按钮（Command1），命令按钮的单击事件中代码如下：
提示：函数Instr(位置，字符串1，字符串2)的功效：返回字符串2在字符串1中的起始位置，假如找不到返回值是0，位置表示从第几个字符开始查找。

Private Sub Command1_Click()
T1.Text = ""
If Op1.Value = True Then
T1.Text = T1.Text + Mid(Op1.Caption, InStr(1, LCase(Op1.Value), "true"), 2)
End If
If Op2.Value = True Then
T1.Text = T1.Text + Mid(Op2.Caption, InStr(1, LCase(Op2.Value), "true"), 2)
End If
T1.Text = T1.Text + Mid(Ch1.Caption, 1, Ch1.Value + 1)
T1.Text = T1.Text + Mid(Ch2.Caption, 1, Ch2.Value + 1)
End Sub
窗体开启后,先选中如图所示的各选项,然后再单击命令按钮,此时文本框中显示内容是

3．有如下Visual FoxPro程序：
CLEAR
a=12345
c=0
b=0
DO WHILE a>0
b=a
DO tub WITH a,b
a=a-1
c=c+b
ENDDO
?c
PROCEDURE tub
PARAMETER x,y
flag=.T.
DO WHILE flag
y=x%10+y*10
x=int(x/10)
IF x=0
flag=.F.
ENDIF
ENDDO
RETURN
运行上面的程序，显示的成果为： 　　　
4．在Visual FoxPro的表单上添加一个标签，其Name属性为：Lba，Caption属性为：请输入字符串，添加一个文本框，其Name属性为：txt，添加一个标签，其Name属性为：Lbb，Caption属性为：空，添加一个命令按钮，其Name属性为：Command1，Caption属性为：确定。
Command1的Click事件代码如下：
mystr=ThisForm.txt.Value
mystr=Trim(mystr)
n=LEN(mystr)
DIME arr(n)
FOR i=1 TO n
arr(i)=SUBSTR(mystr,i,1)
ENDFOR
m=3
j=0
FOR i=n TO 1 STEP -1
IF arr(i)=[*]
j=j+1
ELSE
EXIT
ENDIF
ENDFOR
b=[ ]
c=[ ]
s=0
IF j>m
s=m
ELSE
s=j
ENDIF
FOR i=1 TO n-s
IF (arr(i)>=[0] and arr(i)<=[9])
b=b+arr(i)
ELSE
c=c+arr(i)
ENDIF
ENDFOR
mystr=c+b
ThisForm.lbb.Caption=mystr
Return
运行上面的表单，在文本框中输入：d12&%##ef34*****，单击“确定“按钮，在Lbb标签中显示的是：
5．设有数据库文献SHANGPIN.DBC，包括3个表，分别是goods、orderList、orderitem。其中goods的结构为：商品号(C，6)、商品名(C，20)、单价(N，6，2)，orderlist的结构为：订单号(C，4)、客户名(C，8)、签订日期(D)，orderitem的结构为：订单号(C，4)、商品号(C，6)、数量(N，2)，其表中数据如下：
Goods.dbf
统计号　商品号　　商品名　　　　　　单价
1 a00001 数据库原理 23.80
2 a00002 计算机操作系统 31.00
3 a00003 汇编语言 33.50
4 a00004 C++程序设计 23.90
Orderlist.dbf
统计号　订单号 客户名 签订日期
1 0001 zhangby 02/29/00
2 0002 haom 03/14/00
3 0003 liuyj 03/18/00
4 0004 liubing 03/21/00
5 0005 lixing 03/25/00
6 0006 hailan 04/01/00
Orderitem.dbf
统计号　订单号 商品号 数量
1 0001 a00001 2
2 0002 a00002 2
3 0003 a00003 3
4 0004 a00003 4
5 0005 a00004 3
6 0006 a00003 2
有如下程序：（代码中行末的分