简单算术计算器

简单算术计算器 Private Sub Command1 Click a Val Text1 Text b Val Text2 Text c a b Text3 Text c End Sub Private Sub Command2 Click Text1 Text "" Text2 Text "" Text3 Text "" End Sub Private Sub Command3 Click Unload Form4 End Sub