填空题执行下面的程序,单击Command1按钮,窗体最后一行内容是______,共显示了______行。
Option Explicit
Private Sub Command1_Click()
Dim i As Integer
For i=1 To 10 Step 2
Call Sub1(i)
Next i
End Sub
Private Sub Sub1(a As Integer)
Static b As Integer
b=b+1
If(a+b) Mod 3=0 Then
Print a; b
Else
Call Sub1(a+1)
End If
End Sub
填空题目前在手机上配备的大多是______显示器。
填空题数据库JXSJ中有XS(学生)表和CJ(成绩)表。学生表中有XH(学号)、XM(姓名)等字段;成绩表中有XH(学号)、KCDM(课程代码)和CJ(成绩,数值型)等字段,两表通过XH字段创建的索引已建立了"一对多"关系。下列SELECT-SQL命令可用于查询各门考试成绩均在75分以上且考试的课程门数为5的学生,要求输出学号、姓名和总成绩,且仅输出前5条记录。
SELECT____( 14 )____ xs.xh AS学号,Xs.xm AS 姓名,SUM(Cj.cj) AS 总成绩;
FROM jxsj!xs INNER JOIN jxsj!cj;
ON Xs.xh=cj.xh;
GROUP BY Xs.xh;
HAVING MIN(Cj.cj)>=75 AND ____(15)____;
ORDER BY 3 DESC
填空题与十进制数 165 等值的十六进制数是__________。
填空题执行下面的程序,单击按钮Command1,A(1,1)的值是______,A(1,4)的值是______,窗体第二行输出的内容是______。
Option Base 1
Private Sub Command1_Click()
Dim a()As Integer, i As Integer, j As Integer
Dim k As Integer, n As Integer
n=4
ReDim a(n, n)
i=1:j=n:a(i, j)=1
For k=2 To n*n
If i+1>n Then
i=n-j+2:j=1
ElseIf i+1<=n And j+1>n Then
j=j-i:i=1
Else
i=i+1:j=j+1
End If
a(i, j)=k
Next k
For i=1 To n
For j=1 To n
Print Format(a(i, j), "00");
Next j
Print
Next i
End Sub
填空题二进位数进行逻辑运算1010 AND 1001的运算结果是______。
填空题在Windows系统中,可以利用一个称为______的系统工具程序来查看当前系统中有哪些应用程序正在运行。
填空题设当前工作目录中有两个表:学生档案表(文件名为xsda.dbf)和学生成绩表(文件名为xscj.dbf),前者存储了所有学生的基本档案信息,后者存储了已参加考试的学生的成绩信息。xsda表包含学号(字段名为xh)和姓名(字段名为xm)等字段,xscj表包含学号(字段名为xh)和成绩(字段名为cj)等字段。若要查询所有未参加过考试的学生名单,可以使用下列SELECT-SQL命令:
SELECT xh, xm FROM xsda WHERE xh______(SELECT xh FROM xscj)
填空题在浏览器中输入的网址(URL)为http://www. people. com. cn/,则屏幕上显示的网页一定是该网站的______。
填空题执行以下程序段中的语句"k=M*M+1"后k的值是____(4)____
#define N 2
#define M N+1
k=M*M+1:
填空题现在流行的所谓“MP3音乐”是一种采用国际标准______压缩编码的高质量数字音乐,它能以10倍左右的压缩比大幅减少其数据量。
填空题在计算机局域网中,目前最常用的传输介质是________。
填空题利用VALIDATE DATABASE命令可以检查数据库的有效性和更新数据库与表之间的链接。例如打开数据库后,可以使用命令VALIDATE DATABASE____(9)____来检查数据库的有效性并更新链接(注:如没有填写的关键字,则仅检查数据库的有效性)。
填空题执行SET CENTURY ON命令后,函数LEN(DTOC(DATE()))的返回值为______。
填空题以下程序的功能是验证"数学黑洞6174"。对于任意一个各位数字不全部相同的四位整数,将组成该数的数字组合成一个最大的数和一个最小的数,二者相减,判断其差值是否为6174,若不是,再将相减的结果组合成新的最大的数和最小的数,以上过程最多重复7次,必得结果6174。程序运行界面如图所示。
Option Explicit
Option Base 1
Private Sub Cmd1_Click()
Dim i As Integer,k As Integer
Dim max As Integer min As Integer
k=Val(Text1)
For i=1 T0 3 '判断4位数字是否全部一样
If Mid(CStr(k),i,1)<>Mid(CStr(k),i+1,1) Then ___(26)___
Next i
If i>3 Then
MsgBox "输入的数据不合要求"
Text1=""
Exit Sub
End If
For i=1 To 7
Call Validate(k max,min)
List1.AddItcm k &":" & max &"-" & min & "=" & max-min
If max-min=6174 Then
Exit For
Else
k=___(27)___
End If
Next i
If ___(28)___ Then List1.AddItem "验证失败!"
End Sub
Private Sub Validate(n As Integer,max As Integer,min As Integer)
Dim i As Integer,t(4)As Integer
Dim s As String,s1 As String,s2 As String
S=CStr(n)
For i=1 To 4
t(i)=Val(Mid(s,i,1))
Next i
Call sort(t)
For i=1 To 4
s1=s1 & CStr(t(i))
s2=___(29)___
Next i
min=Val(s1)
max=VaI(s2)
End Sub
Private Sub sort(a() As Integer)
Dim i As Integer,j As Integer,t As Integer
For i=1 To UBound(a)-1
For j=i+1 To UBound(a)
If ___(30)___ Then
t=a(i):a(i)=a(j):a(j)=t
End If
Next j
Next i
End Sub
填空题大多数DVD光盘驱动器比CD-ROM驱动器读取数据的速度______。
填空题[程序](2分)
#include
void main(void)
{
int x=0,y=0;
for(int i=0;i<4;i++){
x++;
for(int j=0;j<5;j++){
if(j%2){y++;continue;}
x++;
}
}
cout<<"x="<
填空题以下程序运行时,输出到屏幕的结果中第一行是______,第二行是______。
#include<iostream.h>
int main()
{
int x;
char a;
a=x=266;
cout<<x<<"/n"<<int(a)<<endl;
return 0;
}
填空题以下程序运行时输出到屏幕的结果中第一行是___(9)___.第二行是___(10)___。
#include
int f(int *a)
{ int b;
printf("%d\n",b=*a);
a++;
return b+*a;
}
void main()
{ int a[3]={2,3,4};
a[0]=f(
printf("%d\n",a[0]);
}
填空题PC机中的日期和时间信息保存在主板上的______中,关机后也不会丢失。
