试题35运行下列程序，在立即窗口显示的结果是（）Private Sub Command0_Click（)Dim I As Single ， J

运行下列程序，在立即窗口显示的结果是（）。

PrivateSub Command0_Click（）

Dim I AsInteger，J AsInteger

For I=2To 10

For J=2 To1

If I modJ=0 Then Exit For

Next J

IfJ＞sqr(I)Then Debug．Print I;

Next I

End Sub

A.1579

B.468

C.3579

D.2357

运行下列程序，在立即窗口显示的结果是

Private Sub Command0_Click()

Dim I As Integer,J As Integer

For I=2 To 10

For J=2 To I／2

If I mod J=0 Then Exit For

Next J

If J＞sqr(I) Then Debug．Print I；

Next I

End Sub

A．1 5 7 9

B．4 6 8

C．3 5 7 9

D．2 3 5 7

AsInteger For I=2To 10 For J=2 To1 If I modJ=0 Then Exit For Next J IfJ＞sqr(I)Then Debug．Print I; Next I End Sub

A.1579

B.468

C.3579

D.2357

A.1

B.-1

C.3

D.0

●试题七

【说明】

下面是一个Applet程序，其功能是通过一个按钮控制一个窗口的创建，显示与隐藏，并且以按钮文字作为提示，可以随着窗口的状态改变，即如果窗口出现，则按钮文字为"Hide myFrm"，提示用户点击按钮，则隐藏窗口，反之亦然。请将横线处语句补充完整。

程序运行结果如图5所示：

图5

import javA．awt.*;

import javA．applet.*;

/*

＜applet code="ex8_7.class" width=800 height=400 ＞

＜/applet＞

*/

public class ex8_7 extends Applet{

private Frame. frm;

private Button showBtn;

public void init(){

showBtn = new Button("Show Frame" );

(1) ;

}

public boolean action(Event e, Object o ){

if(e.target == showBtn ){

if((2) ){

(3) ;

frm.dispose();

(4) ;

showBtn.setLabel("Show myFrm");

}

else{

frm = new Frame("myFrm" );

frm.resize(200, 150 );

frm.setBackground(Color.gray );

(5) ;

showBtn.setLabel("Hide myFrm");

}

}

return true;

}

}

ex8_7.html

＜HTML＞

＜HEAD＞

＜TITLE＞ex8_7＜/TITLE＞

＜/HEAD＞

＜BODY＞

＜applet code="ex8_7.class" width=800 height=400 ＞

＜/applet＞

＜/BODY＞

＜/HTML＞

A.将桌面上某一窗口关闭，任务栏中相应的子图标不一定消失

B.处于后台运行的程序相应的小图标在任务栏中“凸出”显示

C.单击任务栏上的小图标，可把后台运行的相应程序拉到前台

D.刚被打开的窗口相应的小图标在任务栏中“凹进”显示

●试题六

【说明】

下面是一个Applet程序，其功能是建立一个图形用户界面的窗口，包括一个文本显示区和一个按钮，点击按钮，可以在文本区已有的文本基础上追加显示10条"Welcome to China"信息，并且文本区由滚动条控制文本的上下滚动。

程序运行结果如图4所示。

import javax.swing.*;

import javA．awt.*;

import javA．awt.event.*;

/*

＜applet code="ex5_6.class" width=800 height=400 ＞

＜/applet＞

图4

*/

public class ex5_6 extends JApplet {

JButton jb = new JButton("Add Text");

JTextPane jtp = new JTextPane();

public void init() {

jb.addActionListener(new ActionListener() {

public void actionPerformed(ActionEvent e){

for(int i = 1; i ＜ 10; i++)

(1) + "Welcome to China!＼n");

}

});

Container cp = (2) ;

cp.add(new JScrollPane(jtp));

cp.add((3) );

}

public static void main(String［］ args) {

ex5_6 obj5_6=new ex5_6();

String str = obj5_6.getClass().toString();

if(str.indexOf("class") !=-1)

str = str.substring (6) ;

JFrame. frm = new JFrame(str);

frm.addWindowListener(new (4) {

public void windowClosing(WindowEvent we) {

System.exit(0);

}

});

(5) .add(ex5_6);

frm.setSize(300, 400);

frm.setVisible(true);

}

}

ex5_6.html

＜HTML＞

＜HEAD＞

＜TITLE＞ex5_6＜/TITLE＞

＜/HEAD＞

＜BODY＞

＜applet code="ex5_6.class" width=800 height=400 ＞

＜/applet＞

＜/BODY＞

＜/HTML＞

下列程序运行后在立即窗口输出的结果是()。 Private Sub Form_Click() x="a":y="b" z=1:u=2 Debug.Print x;y,z;u Debug.Print z;x,y;u End Sub

A．ab 12 1 ab 2

B．ab 12 1a b2

C．ab 12 1a b2

D．ab 12 1a b2

●试题五

阅读以下应用说明、属性设置及Visual Basic程序代码，将应填入(n)处在字句写在答题纸的对应栏内。

【说明】

本应用程序的运行窗口如图2所示。

只要用户单击"闪烁"按钮，文字"欢迎光临"就会以0．3秒消失、0．3秒显示反复进行闪烁；单击"停止"按钮时，闪烁停止，恢复图示的初态。

在开发过程中，需要设置的属性如表1所示。

在开发过程中，需要编写的程序代码如下：

【程序】

Private Sub CmdF_Click()

Timer1． (3) =True

Labe1．Visible=False

End Sub

Private Sub Timer1_Timer()

(4) =not Label.Visible

End Sub

Private Sub CmdT_Click()

Timer1．Enabled= (5)

Labe1．Visible=true

End Sub

A.当用户为应用程序创建了快捷方式时，就是将应用程序增加一个备份

B.关闭一个窗口就是将该窗口正在运行的程序转入后台运行

C.桌面上的图标完全可以按用户的意愿重新排列

D.一个应用程序窗口只能显示一个文档窗口