


全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
import java.awt.*;import java.awt.event.*;import javax.swing.*;import java.lang.*;public class Test51 Frame f;TextArea center;Label la1,la2,la3;Panel east,south,north;Button b1,b2,b3,b4;Choice l1;TextField t1;public static void main(String args)Test51 mb = new Test51();mb.go(); private void go() f = new Frame(留言版程序); f.addWindowListener(new WindowAdapter() public void windowClosing(WindowEvent evt) f.setVisible(false); System.exit(0); ); f.setBounds(0,0,600,400); f.setLayout(new BorderLayout(); f.setResizable(false); north = new Panel(); south = new Panel(); east = new Panel(); center = new TextArea(留言内容:); center.setEditable(false); b1 = new Button(清屏); b2 = new Button(至顶); b3 = new Button(至尾); la1 = new Label(留言版); la2 = new Label(你); la3 = new Label( 地说:); t1 = new TextField(20); b4 = new Button(提交); l1 =new Choice(); l1.add(微笑 ); l1.add(生气 ); l1.add(伤心 ); f.add(BorderLayout.NORTH,north); f.add(BorderLayout.SOUTH,south); f.add(BorderLayout.EAST,east); f.add(BorderLayout.CENTER,center); north.add(BorderLayout.CENTER,la1); south.add(la2); south.add(l1); south.add(la3); south.add(t1); south.add(b4); east.setLayout(new GridLayout(9,0,1,10); east.add(b1); east.add(b2); east.add(b3); f.setVisible(true); b4.addActionListener(new ActionListener() public void actionPerformed(ActionEvent e) String text1,text2; text1 = l1.getSelectedItem(); text2 = t1.getText(); t1.setText(null); if(t1.getText() != ) center.append(n); center.append(text1); center.append(text2); ); b1.addActionListener(new ActionListener() public void actionPerformed(ActionEvent e) center.setText(留言内容:); ); b2.addActionListener(new ActionListener() public void actionPerformed(ActionEvent e) center.requestFocusInWindow(); center.setCaretPosition(8); ); b3.addActionListener(new ActionListener() public void actionPerformed(ActionEve
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- GB/T 30111-2025星敏感器通用规范
- 高频开关直流电源柜项目投资可行性研究分析报告(2024-2030版)
- 电子产品制造技术专业教学标准(高等职业教育专科)2025修订
- 2025年中国DLP光显屏行业市场调查研究及发展趋势预测报告
- 采掘知识培训课件
- 2025年中国柑桔行业市场全景评估及发展战略规划报告
- 2024-2030年中国云VR行业发展运行现状及投资潜力预测报告
- 2025年中国制糖行业发展运行现状及投资潜力预测报告
- 2025年中国蓝宝石长晶炉行业发展趋势预测及投资战略咨询报告
- 2025年 云南省化工仪表操作证理论考试练习题附答案
- 2024年陕西省中考道德与法治真题(A卷)(含解析)
- EN71-1 2014 A1-2018 玩具安全 第1部份 物理和机械性能-中文版
- DLT 572-2021 电力变压器运行规程
- 新疆维吾尔自治区石河子市五年级数学期末高分通关试卷详细答案和解析
- DL∕ T 1166-2012 大型发电机励磁系统现场试验导则
- 湿热灭菌工艺验证方案1
- 2024年广东省初中学业水平考试生物押题卷
- 网络安全知识竞赛考试题库300题(含答案)
- 国开电大2023年春季期末考试《机械CAD、CAM》试题及答案(试卷代号1119)
- 审计 第7版 课件 第10章采购与付款循环审计
- (高清版)DZT 0145-2017 土壤地球化学测量规程
评论
0/150
提交评论