大学计算机VB程序设计考试题目.docVIP

实验三

第1题四那么运算题

设计如下窗体，为五个命令按钮编写5段代码完成四那么运算及退出程序，其中在计算除法时，如果第二个数是零，在消息框中显示信息“除数为零〞。

PublicClassForm1

PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click

Dima,bAsSingle

a=TextBox1.Text

b=TextBox2.Text

TextBox3.Text=a+b

EndSub

PrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.Click

Dima,bAsSingle

a=TextBox1.Text

b=TextBox2.Text

TextBox3.Text=a-b

EndSub

PrivateSubButton3_Click(ByValsenderAsSystem.Object,ByValeAsSyst