与,Form1 x 运算退出 例9-1 加法CrH+A 咸法Ctr+5 12 +|34 46 Private Sub Add_ click abell. Caption=+ Label2 Caption==&(Val(Text1.Text)+ Val(Text2, Text)) 三 nd sub Private SubSub_click Label1 Caption E abel2. Caption==&(Val(Text1. Text) Val(Text2 Text)) 三 nd sub Private Sub Exit_click 三nd 三 nd sub例9-1 Private Sub Add_Click() Label1.Caption = "+" Label2.Caption = "=" & (Val(Text1.Text) + Val(Text2.Text)) End Sub Private Sub Sub_Click() Label1.Caption = "-" Label2.Caption = "=" & (Val(Text1.Text) - Val(Text2.Text)) End Sub Private Sub Exit_Click() End End Sub