您所在的当前位置: 计算机等级考试题库  

  • 1 [填空题] 执行下面的程序段后,s的值为______。 s=5 For i=2.6 To 4.9 Step 0.6 s=s+1 Next i
  • 2 [填空题] 如果容器采用 ______ 进行布局管理,在用add()方法添加构件的时候,必须注明添加到哪个位置。
  • 4 [单项选择题] 十进制数16的十六进制表示格式是 A.0x10 B.0x16 C.0xA D.016
  • 5 [单项选择题] 下列关于小应用程序说法错误的是 ( ) A.用户所编写的小应用程序的类必须为public B.用户所编写的小应用程序必须为javappleApplet的子类 C.用户所编写的小应用程序的类名称可以与它所在的文件名不相同 D.用户所编写的小应用程序可以不在浏览器上运行
  • 8 [填空题] 阅读以下程序,输出结果为_________。  class D{  public static void main (String args[]){  int d=21;  Dec dec=new Dec( );  dec. decrement (d):  System.out.println(d);  }  }  class Dec{  public void decrement(int decMe){  decMe=decMe-1:  }  }
  • 9 [问答题] 在1~n之间的自然数中,每次抽取k个数字来抽奖,计算中奖几率的算法为: n*(n-1)*(n-2)*...*(n-k+1)/1*2*3*...*k 请完善Java_2.java文件,并进行调试,使程序先显示输入窗口如下: 然后从自然数1~20中,每次抽3个数,计算中奖几率,并将最终结果在命令行中显示,其形式类似:你中奖的几率是1/1140.Good luck! 由于Java_2.j ava文件不完整,请在注释行“//*********Found********”下一行语句的下画线处填入正确内容,然后删除下画线,请勿删除注释行或其他已有语句内容。存盘时,文件必须存放在考生文件夹下,不得改变原有文件的文件名。 给定源程序: import javax.swing.*; public class Java_2 public static void main (String[] args) //*********Found******** String input=______.showInputDialog("你想抽几位数?"); //*********Found******** int k=Integer.parselnt(______); input=JOptionPane.showInputDialog("你想在自然数中抽的最高数是几?"); //*********Found******** int n=______.parselnt (input); int lotteryOdds=1; for (int i=1; i<=k; i++) lotteryOdds=lo
  • 11 [单项选择题] 已知某弹出式菜单名为“p1”,它的Visible属性为False。现在要让它在名为Form1的窗体上弹出,使用的命令是( )。 A.Popup P1 B.Form1.Popup P1 C.P1.Popup D.Popup Form1.p1
  • 12 [问答题] 完成下列问题:在考生文件夹下有一个工程文件sjt3.vbp,在程序运行时,单击“输入整数”按钮,可以从键盘输入一个整数,并在窗体上显示此整数的所有不同因子和因子个数。图4是输入53后的结果,图5是输入100的结果。已经给出了全部控件和程序,但程序不完整。 要求:请在程序中的横线处填写正确的内容。不能修改程序中的其他部分,也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。 [题目提供的源程序] Private Sub Command1_Click() Dim n As Integer Cls (1) =InputBox("请输入一个整数") Print "因子数="; fun(n) End Sub Function fun(m As Integer) Dim s As Integer s=0 For k=1 To Abs(m)/2 If m Mod k= (2) Then s=s+1 Print k End If Next k (3) End Function
  • 13 [填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如图1所示。程序运行时,在Form1中名称为Text1的文本框中输入一个数值(圆的半径),然后单击命令按钮"计算并显示"(其名称为Command1),则显示Form2窗体,且根据输入的圆的半径计算圆的面积,并在Form2的窗体上显示出来,如图2所示。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示"请输入数值数据!"。请填空。 Private Sub Command1_Click() If Text1.Text=" "Then MsgBox"请输入半径!" Elself Not IsNumeric( (9) )Then MsgBox"请输入数值数据!" Else r=Val( (10) ) Form2.Show (11) .Print"圆的面积是"&3.14"r*r End If End Sub
  • 14 [单项选择题] 设窗体上有一个文本框,名称为Text1,程序运行后,要求该文本框只能显示信息,不能接收输入信息,以下能实现该操作的语句是 A.Text1.MaxLength=0 B.Text1.Enabled=False C.Text1.Text=False D.Text1.Index=0
  • 15 [填空题] 若A=20,B=80,C=70,D=30,则表达式A+B>160 Or(B * C>200 And Not D >60)的值是 【8】 。
  • 16 [单项选择题] 在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:Dim SaveAll As StringPrivate Sub Form_ Load () Show Text1.Text=" " Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form_ KeyPress (KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为 ______。 A.vbVB B.不显示任何信息 C.VB D.出错
  • 17 [问答题] 下面是一个Applet程序,其功能是打印一个任意进制的乘法表。要求输入乘法表的进制,点击确定则打印出该乘法表。请改正程序中的错误(有下画线的语句),使程序能输出正确的结果。 注意:不改动程序的结构,不得增行或删行。 import java.awt.*; import java.applet.*; import java.lang.*; public class exl2_3 extends Applet{ private TextField tf; private Button btn; public void init(){tf=new TextField(25);add(tf);btn=new Button("确定");add(btn);resize(250,200); } public void paint(Craphics g){try{int n= tf.getText();int i,j,x=20,y=60;for(i=0;i<n;++){for(j=1;j<=n;j++){ g.drawString(Integer.toString(i)+"*" +Integer.toString(j)+"=" +Integer.toString(i*j),i*x,j*y); } } } catch(NuaberFormatEXCeption nfe){ g.drawString("error namber!",20,50); } } public boolean action(Event e,Object o){ if(o=="确定"){repaint();return true; } elsereturn false;} } exl2_3.html <HTML> <HEAD> <TITLE>exl2_3</TITLE> </HEAD> <BODY> <applet code="exl2_3.class"width=800 height=400> </applet> </BODY> </HTMI>
  • 18 [单项选择题] Applet可以做下列哪些操作( ) A.调用用户计算机上的系统去执行其他的应用程序 B.访问用户的文件系统 C.装入用户计算机上以其他程序语言所写的应用程序或函数库 D.读取客户端部分系统变量
  • 19 [填空题] 下面的程序是找出两个正整数a和b,使得a<b、a+ b=99、a和b的最大公约数是3的倍数,并统计满足条件数对的个数。Option ExplicitDim a As Integer, b As Integer, n As Integer, c As IntegerPrivate Function Gcd (ByVal a As Integer, Byval b As Integer) As Integer do c=a Mod b: a=b=c Loop 【13】 Gcd=aEnd FunctionPrivate Sub form_ Click() n=0 for a= 1 To 49 b= 【14】 c= Gcd (a, b) if c Mod 3= 0 then 【15】 Print a, b, c End if Next a Print nEnd Sub
  • 20 [填空题] 以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)~A(10)依次赋给B(1,1)~B(1,10),把A(11)~A(20)依次赋给B(2,1)~B(2,10),……,把A(91)~A(100)依次赋给B(10,1)~B(10,10)。请填空。 Option Base 1 Private Sub Form_Click() Dim i As Integer,j As Integer Dim A(1 To 100) As Integer Dim B(1 To 10, 1 To 10) As Integer For i=1 To 100 A(i)=Int(Rnd*100) Next i For i=1 To (8) For j=1 To (9) B(i,j)= (10) Print B(i,j) Next j Print Next i End Sub