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程序设计与软件项目实训郑伟的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息 , 记得收藏关注本站 。
- redis连不上可能的原因 redis程序连接报错
- mysql的存储程序包括 mysql支持存储过程吗
- redis使用技巧 redis在程序中的使用
- redis过期策略六种 程序怎么redis过期
- 前端访问redis 程序怎么访问redis
- sql数据库打包 程序打包mysql数据
- redis应用开发 redis和微信小程序
- windows安装程序无法将windows配置为在此计算机上运行 windows安装mongodb
- 黑马程序员在线课程 黑马程序员redis课程
- 编译好的redis包 redis打包到程序里
