Case "-"
TextBox4.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
Case "*"
TextBox4.Text = Val(TextBox1.Text) * Val(TextBox2.Text)
Case "\"
If Val(TextBox2.Text) = 0 Then
MsgBox("分母为0")
Else
TextBox4.Text = Val(TextBox1.Text) \ Val(TextBox2.Text)
End If
Case "/"
If Val(TextBox2.Text) = 0 Then
MsgBox("分母为0")
Else
TextBox4.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
End If
End Select
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub
End Class
关于vb.net程序和VBNET程序设计与软件项目实训郑伟的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息 , 记得收藏关注本站 。
推荐阅读
- 单机游戏程序员,游戏 程序员
- 如何做社区水果营销,社区水果店赚钱吗
- 电商如何设置抽奖,电商如何设置抽奖活动
- excel交互命令怎么用,excel交互式的图表教程
- vb.neti++的简单介绍
- 隐藏直播历史的好处是什么,隐藏直播平台
- 911事件模拟游戏下载,3d模拟911事件
- java源代码查看,java如何看源码
- 递归函数c语言1到100 递归法c语言