-
1
[填空题] 下列软件系统结构图的宽度为【 】
-
2
[单项选择题] 设R和S为两个关系，分别代表选择、投影、乘积关系代数的运算符号是
A．σ
F(、п
A(、R×S
B．EA(、VA(、R*S
C．R∩S、R∪S、R×S
D．п
A(、σ
F(、R×S
-
3
[填空题] 设x，y，max均为int型变量，x，y已赋值。用三目条件运算符求x，y的最大值，这个赋值语句应是max=______。
-
4
[填空题] 阅读下面代码： import java.awt.*; public class Exam11_1 { private Frame f; private Button bl,b2,b3,b4; public static void main(String args[] { Exam11_1 that = new Exam11_1 (); that. go(); } public void go () { ______; f.setLayout(new FlowLayout());; bl = new Button ("Button 1"); b2 = new Button ("Button 2"); b3 = new Button ("Button 3"); b4 = new Button ("Button 4"); f.add(b1); f.add(b2); f.add(b3); f.add(b4); f.pack(); f.setVisible(true); } } 请在程序中画线处填写正确的语句 【13】 ，以便编译运行程序后得到正确的结果。
-
5
[填空题] 窗体上有一个名称为List1的列表框，一个名称为Picture 1的图片框。Form_ Load事件过程的作用是，把Datal.txt文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物品对应的图片显示在图片框中如图所示。以下是类型定义及程序，请填空。 Private Type Pic gName As String*10‘物品名称 picFile As String*20 ‘物品图片的图片文件名 End Type Dim p（4）As Pic，pRec As Pic Private Sub Form Load（） Open”Datal.txt" For Random As＃1 _【11】_=Len（pRec） For i=0 To 4 Get＃1，i+l，P（i） LIStI.AddItem p（i）.gNaine Next i Close＃1 End Sub Private Sub List I-DbICIickO For i=OTo4 If RTrim（List一List（i））=RTrim（_【12】_）Then Picture l.，Picture=LoadPicture（p（i）．_【13】_） Exit For End If Next End Sub
-
6
[单项选择题] 如果要在任何新建的模块中自动插入option Explicit 语句，则应采用下列______ 操作步骤。
A．在“工具”莱单中选取“选项”命令，打开“选项”对话框，单击“编辑器”选项卡，选中“要求变量声明”选项
B．在“编辑”菜单中执行“插入文件”命令。
C．在“工程”菜单中执行“添加文件”命令。
D．以上操作均不对
-
7
[填空题] 计算机网络分为局域网和广域网，因特网属于______。
-
8
[单项选择题] 下列不属于低级事件的一项是______。
A．PaintEvent
B．InputEvent
C．FocusEvent
D．ActionEvent
-
9
[单项选择题] 调用以下哪些方法可以使运行状态的线程进入阻塞状态( )
A．start( ),yield( ),sleep( ),join( )和wait( )
B．start( ),yield( ),sleep( ),join( ),wait( )和stop( )
C．yield( ),sleep( ),join( )和wait( )
D．yield( ),sleep( ),join( ),wait( )和stop( )
-
10
[填空题] 有下列程序，程序运行后，单击“Command1”按钮，在列表框List1中显示的第一行和第二行的结果分别是 【13】 和 【14】 ，最后一行的结果是 【15】 。 Type type_a chr1 As String*1 num1 As Integer End Type Private Sub Command1_Click() Dim testdata As type_a, n As Integer Dim f1 As Integer, c()As String*1 f1=FreeFile Open "d:data. txt" For Random As #f1 Len=Len(testdata) n=1 For I=97 To 102 ReDim Preserve c(n) c(n)=Chr(I) testdata. chr1=c(n) testdata. num1=I n=n+1 Put #f1, , testdata Next I Seek #f1, 1 For I=1 To UBound(c) Get #f1, , testdata List1. AddItem testdata. chr1 & testdata num1 Next I List1. AddItem UBound(c) Close End Sub
