填空题执行下面程序,单击命令按钮Command1,窗体上显示的第一行内容是___(1)___,第二行内容是___(2)___,第三行内容是___(3)___.
Option Explicit
Private Sub Command1_Click()
Dim a As Integer, b As Integer, i As Integer
a = 1
b = 5
For i = b To a Step -1
a = a + i
b = b + a
If b > 30 Then Exit For
Print a, b
Next i
Print a, b
End Sub
填空题设当前工作目录中有两个数据库表:课程表(表名为KC)和成绩表(表名为CJ),它们均属于数据库JXSJ。课程表包含课程代码(字段名为KCDM)和课程名称(字段名为KCMC)等字段,成绩表包含学生选修的课程代码(字段名为KCDM)和成绩(字段名为CJ,数据类型为数值型)等字段。如果要查询每门课程的最高成绩,可用下列SELECT-SQL命令:
SELECT Kc.kcdm AS 课程代码,Kc.kcmc AS 课程名称,MAX(Cj.cj) AS 最高成绩;
FROM jxsj!kc INNER JOIN jxsj!cj;
___ (15) ___ ;
GROUP BY Kc.kcdm
填空题执行下面的程序,单击命令按钮Command1后,窗体上显示的第一行内容是______,第二行是______,第三行是______。
Private Sub Command1_Click()
Dim A As Integer, K As Integer
A=1
K=Fun(Fun(A, A), A)
Print "K="; K
End Sub
Private Function Fun(X As Integer, Y As Integer)As Integer
Static K As Integer
K=K+X+Y
X=X+Y
Y=Y+K
Fun=X+Y
Print Fun; X; Y
End Function
填空题为了解决异构网互连的通信问题, IP协议定义了一种独立于各种异构网的数据包格协议,称之为IP____________,用于网间的数据传输。
填空题下列程序显示的结果是______。
S=0
I=4
D0 WHILE S<20
S=S+I
I=MOD(I+3, 7)
ENDDO
? S
填空题利用______器,一个USB接口最多能连接100多个设备。
填空题一个工作区中仅能打开一个表,但同一个表可以在多个工作区中同时打开.例如XS表已在1号工作区打开,则在5号工作区再次打开该表,可以使用命令USE xs IN 5 ___(8)___ .
填空题[程序](2分)
#include
class A{
int a;
public:
A(int aa) { a=aa;}
void print() { coutprint(); p2->print () ;
p1= p1->print () ;
}
执行程序后,第二行是__________ ,第三行是__________
填空题在Visual FoxPro中,自由表与数据库表有许多不同之处。以索引来说,数据库表可以创建主索引、候选索引、普通索引、唯一索引等类型,但自由表不能创建______。
填空题在设计和创建表结构的过程中,有些数据类型的字段宽度是固定的,不需要用户设定。例如,逻辑型字段的宽度为1、日期型字段的宽度为8、日期时间型字段的宽度为___(3)___。
填空题以太网中的每台计算机必须安装有网卡,用于发送和接收数据。大多数情况下网卡通过______线把计算机连接到网络。
填空题使用电子邮件给对方发送一个已有的电子文档时,可以把该文档放在______中进行发送。
填空题在Visual FoxPro中,处理对象时可以使用绝对引用和相对引用。采用相对引用时,可以利用系统规定的一些关键字或属性来指代某个对象,例如ThisForm、Parent、ActivePage等。如果指代当前活动表单中具有焦点的控件(即活动对象),可以使用___(21)___属性。
填空题与自由表相比,数据库表可以设置许多字段属性和表属性。其中,表属性主要有表名(即长表名)、表注释、记录有效性和____(10)____等。
填空题本程序的功能是找出一组连续的整数,它们的和数等于给定的数。通常给定一个数,可能会找出多组符合要求的连续整数。查找的方法是穷举法。请完善本程序。
Option Explicit
Private Sub CmdRun_Click()
Dim m As Integer,sum As Integer,st As String
Dim i As Integer,j As Integer,k As Integer
m=Text1
For i=1 To m-1
___(19)___
For j=i To m
sum=___(20)___
If sum=m Then
st="" 'st赋以空值
For k=i To j
st= ___(21)___
Next k
List1.AddItem Left(st,Len(st)-1)
End If
Next j
Next i
End Sub
填空题1994年由JVC、Philips等公司联合定义了一种在CD光盘上存储数字视频和音频信息的规范——VCD,该规范规定了将______编码格式的音频/视频数据记录在CD光盘上的文件系统的标准。
填空题如果登录QQ后想使用其提供的功能,但又不想让别人打扰你,可以选择______登录方式。
填空题声明"FILE *p;"中的类型标识符"FILE"是在头文件 __【5】__中定义的。
填空题已知成绩表(cj.dbf)的表结构如下:
字段名
类型
宽度
含义
xh
C
3
学号
qz
N
3
期中成绩
qm
N
3
期末成绩
表中已有3条记录,按输入时的物理顺序排列如下:
xh
qz
qm
001
69
93
002
98
73
003
80
87
该表已创建结构复合索引如下:
索引顺序
索引名
索引表达式
降序
CJA
qz+qm
升序
CJB
STR(qz)+STR(qm)
若在命令窗口中执行命令:
LJSE CJ ORDER TAG CJA
BROWSE
则在浏览窗口中学号为“001”的记录显示在第______行。
填空题执行下面的程序,在“输入:”文本框Text1中输入“12,3,5,18,9”后单击“输入数组”按钮Command1,则数组元素a(2)的值是________,在单击“数组处理”按钮Command2后数组元素a(2)的值变为________。程序参考界面如下图所示。OptionExplicitOptionBase1Dima()AsInteger"定义模块级数组PrivateSubCommand1_Click()"输入数组DimiAsInteger,stAsString,jAsIntegerst=Text1.TextDoUntilInStr(st,",")=0i=InStr(st,",")j=j+1ReDimPreservea(j)a(j)=Val(Left(st,i-1))st=Right(st,Len(st)-i)LoopReDimPreservea(j+1)a(j+1)=stEndSubPrivateSubCommand2_Click()"数组处理DimiAsInteger,tAsInteger,jAsIntegerFori=2ToUBound(a)Ifa(i)>a(1)Thent=a(i)Forj=iTo2Step-1a(j)=a(j-1)Nextja(1)=tEndIfNextiFori=1ToUBound(a)Text2.Text=Text2.Text&Str(a(i))NextiEndSub
