會寫程式的貓
2009年5月8日
網路程式設計 2009/05/10 作業
User:
MY BLOG
Class:
Java
,
Java - 網路程式設計 作業
/* 數字轉國字 JavaToChinese.ppt*/ import java.awt.*; import java.awt.event.*; public class TextBata3 implements TextListener , ActionListener{ Frame frm = new Frame("Text Event"); TextField sc = new TextField(12); TextField ans = new TextField(12); Button btn = new Button("轉換"); public TextBata3(){ frm.setLayout(new FlowLayout(FlowLayout.CENTER)); btn.addActionListener(this); sc.addTextListener(this); frm.add(sc); frm.add(btn); frm.add(ans); frm.setSize(500,200); frm.setVisible(true); } public void textValueChanged(TextEvent e){ } //按下 轉換 public void actionPerformed(ActionEvent e){ Button b=(Button)e.getSource(); // 取得事件來源物件 if(b == btn){ ans.setText(getNum(sc.getText())); } } private String getNum(String n){ String s = ""; String c[] = {"元","十","百","千","萬","十萬","百萬","千萬","億","十億","百億","千億"}; String c2[] = { "零","壹","貳","參","肆","伍","陸","柒","捌","玖" }; for( int x = 0 ; x < n.length() ; x++ ){ s += c2[n.charAt(x)-48] + c[n.length()-x-1]; } return s; } public static void main(String[] args){ new TextBata3(); } }
沒有留言:
張貼留言
較新的文章
較舊的文章
首頁
訂閱:
張貼留言 (Atom)
沒有留言:
張貼留言