(1)故《易》曰：             ，差以千里。      （《太史公自序》）

(2)古者富贵而名摩灭，不可胜记，                      。   （《报任安书》）

(3)力拔山兮气盖世，          。       ，虞兮虞兮奈若何！”（《项羽本纪》）

(4)             ，决胜于千里之外，吾不如子房。             （《高祖本纪》）

(5)江东子弟今犹在，                ？           （王安石《题乌江项王庙》）

(6)江东子弟多才俊，                     。              （杜牧《乌江亭》）

(7)                 ，壮士一去兮不复还！                   （《刺客列传》）

(8)不愤不启，             ，             ，则不复也。    （《论语》）

【说明】 在窗体上设计两个文本框和两个标签，标签上显示：“摄氏温度：”和“华氏温度：”，文本框一个用于输入摄氏温度数，一个用于输出对应的华氏温度。摄氏温度与华氏温度的转换公式为：c=(5/9)×(f-32) 要求：对输入的摄氏温度数有检查功能，以拒绝接收非数字字符。运行界面如图所示。

【Visual Basic代码】 Private Sub Commandl_Click () Text1 = "" Text2 = "" Text1.Enabled = True Text2.Enabled = True Text1.SetFocus End Sub Private Sub Command2 Click () End End Sub Private Sub Form Load () Text1 = "" Text2 = "" Text1.Enabled = False Text2.Enabled = False End Sub Private Sub Textl_Change () Text2.Text = (1) End Sub Private Sub Textl_KeyPress (KeyAscii As (2) ) If (3) ThenIf Chr ( KeyAscii ) ＜ "0" Or (4) Then (5) End If End If End Sub