更多"下面程序中,在主窗口单击鼠标后,就会生成一个新窗口。 import "的相关试题:
[简答题]下面程序中,在主窗口单击鼠标后,就会生成一个新窗口。
import java.awt.*;
import java.awt.event.*;
public class java3 extends Frame
java3( )
super("java3");
addNotify( );
addWindowListener(new WindowAdapter( )
public void windowClosing(WindowEvent e)
System.exit(0);
);
Insets insets=getInsets( );
setSize(insets.left+insets.right+150,
insets.top+insets.bottom+150);
this.addMouseListener(MouseEventHandler( ));
class MouseEventHandler implements MouseAdapter
public void mousePresse(MouseEvent evt)
Rectangle bounds=getBounds( );
int x=evt.getX( )+bounds.x;
int y=evt.getY( )+bounds.y;
java3 m=newjava3( );
m.setLocation(x,y);
m.show( );
static public void main(String[]args)
(new java3( )).show( );
[简答题]下面是一个Applet程序,程序的功能是用鼠标画图。本题是通过单击鼠标后画出一个Java字。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。
注意;不改动程序的结构,不得增行或减行。
源程序文件代码清单如下;
import java.awt.*;
import java.awt.event.*;
import java.applet.*;
/*
<applet code=SimpleHitMouse.java width=800 height=400>
</applet>
*/
public class SimpleHitMouse implements Applet
private java.util.Vector points=new java.util.Vector( );
public void init( )
addMouseListener(new MouseAdapter( )
public void mousePressed(MouseEvent e)
points.add(new Point(e.getX( ),e.getY( ))
paint( );
);
public void update(Graphics g)
repaint(g);
public void paint(Graphics g)
for(int i=0;i<points.size( );i++)
Point dot=(Point)points.elementAt(i);
g.drawString("x",dot.x,dot.y);
public static void main(String args[ ])
[简答题]下面是一个Applet程序,程序的功能是用鼠标点击画图。本题是通过点击鼠标后画出一个“Java”字。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。
注意:不改动程序的结构,不得增行或减行。
import java. awt.*
import java. awt. event.*;
import java. applet.*
/*
<applet code= SimpleHitMouse. java width= 800 height= 400>
</applet>
*/
public class SimpleHitMouse implements Applet
private java. util. Vector points= new java. util. Vector( );
public void init( )
addMouseListener(new MouseAdapter ( )
public void mousePressed(MouseEvent e) (
points, add (new Point (e. getX( ), e. getY ( ) ) );
paint( );
);
public void update(Graphics g)
repaint(g);
public void paint(Graphics g)
for(int i=0;i<points, size( ) ;i++)
Point dot= (Point)points. elementAt(i);
g. drawString("x" ,dot. x,dot, y),
public static void main(String args[])
Frame fram=new Frame("CelayTree");
[判断题]“开始”菜单中的“程序”级联菜单包含了一些程序和下一级级联菜单,单击某个程序名,就会启动该程序。( )
[填空题]下面程序代码实现单击命令按钮Command1时输出如下结果:
1 -1 -1
1 1 -1
1 1 1
该程序不完整,请填空。
Private Sub Command1_Click( )
DimX(3,3)
For I=1 To 3
ForJ=1 To 3
If______Then
X(I,J)=1
End If
If I<J Then
X(I,J)=-1
End If
Next J
NextI
ForI=1 To 3
ForJ=1 To 3
PrintX(I.J);
NextJ
Print
NeXtI
End SUb
[单项选择]下面程序运行后,单击命令按钮,输出的结果是 Pivate Sub Cornmand1_Click( ) Dim a%(1 To 4),b%(2 To 6),i%,str1#,str2# For i=1 To 4 a(i)=i Next For i=2 To 6 b(i)=i Next str1=YAG(a) str2=YAG(b) Print"str1=";str1;"str2=";str2 End Sub Function YAG(a( )As Integer) Dim t#,i% t=1 For i=LBound(a)To UBound(a) t=t*a(i) Next YAG=t End Function
A. str1=24 str2=720
B. str1=12 str2=360
C. str1=24 str2=180
D. str1=36 str2=720
[填空题]下面程序运行后,单击命令按钮,输出的结果是【 】。
Private Sub Commandl_Click( )
Dim a%(1 To 4) ,b%(2 To 6) ,i%,strl#,str2#
For i=1 To 4
a(i) =i
Next i
For i=2 To 6
b(i) =i
Next i
str1 =YAG(a)
str2 =YAG(b)
Print"strl";str1;"str2=";str2
End Sub
Function YAG (a( )As Integer)
Dim T#,i%
t=1
For i=LBound(a) To UBound(a)
t=t * a(i)
Next i
YAG =t
End Function