历年VB题案.docVIP

历年Visaul Basic程序设计（编程题） A类题 说明：A类题以顺序结构的解析算法为主，解决学生在数学、物理和生活中遇到的简单计算问题。 用到的控件有：标签框、文本框、命令按钮等。 A01、制作一个加法器，在文本框中输入两个数值后，单击“计算”按钮可以计算出两数之和并显示在标签中； 单击“清除”按钮可以清除各项数值。 Private Sub Command1_Click() a = Val(Text1.Text) b = Val(Text2.Text) label4.caption = a + b End Sub Private Sub Command2_Click() Text1.Text = Text2.Text = label4.caption = End Sub A02、已知y= x3＋|x－10|＋4， 编程求y的值 。要求：在文本框中输入x的值，单击“计算” 按钮后在“y”框中显示y的值；单击“退出”按钮退出程序。 Private Sub Command1_Click() X= Val(Text1.Text) Text2.text = x ^ 3 + Abs(x - 10) + 4 End Sub Private Sub Command2_Click() End End Sub A03、编程实现：在“半径”框中输入圆的半径，单击“确定”按钮时