程序填空。。救急。。

程序界面如图(图在附件中)所示，两个文本框一个用于输入摄氏温度数（文本框名为Text1），另一个用于输出对应的华氏温度（文本框名为Text2）。摄氏温度C与华氏温度F的转换公式是：C＝（5/9）＊（F－32）。同时要求具有文本框输入摄氏温度的检查功能，以拒绝接收非数字字符。三个命令按钮的名称分别是"开始"：Command1，"下一个"：Command2，"结束"：Command3。 
程序如下：请补充完整。 　　Private Sub Command1_Click( ) 
　　 Dim x As Integer 
　　 (1) 
　　 Command1.Visible= (2)　  
　　 Command2.Visible=True 
　　 Command3.Visible= (3) 
　　End Sub 
　　Private Sub Command2_Click( ) 
　　 Text1.Text= (4) 
　　 Text2.Text= "" 
　　 Command1_Click 
　　End Sub 
　　Private Sub Command3_Click( ) 
　　 (5) 
　　End Sub 
　　Private Sub Form_Load( ) 
　　 Command2.Visible= (6) 
　　 Command3.Visible=False 
　　End Sub 
　　Private Sub (7)( ) 
　　 Text2.Text= (8) 
　　End Sub 
　　Private Sub Text1_KeyPress (KeyAscii As Integer) 
　　 If (48>KeyAscii Or KeyAscii>57) Then (9) 
(10) 
　　End Sub 
请在上述(1)到(10)处填上合适的语句以实现程序的运行!