以下是一个用VB编写的简单加减法运算的示例代码:
Public Class Form1
Private Sub btnCalculate_Click(sender As Object, e As EventArgs) Handles btnCalculate.Click
Dim num1, num2, result As Integer
num1 = CInt(txtNum1.Text)
num2 = CInt(txtNum2.Text)
If rbAdd.Checked Then
result = num1 + num2
ElseIf rbSubtract.Checked Then
result = num1 - num2
End If
lblResult.Text = "Result: " & result.ToString()
End Sub
End Class
在窗体上放置两个文本框(分别命名为txtNum1和txtNum2)、两个单选按钮(分别命名为rbAdd和rbSubtract)、一个按钮(命名为btnCalculate)和一个标签(命名为lblResult),然后将上述代码复制粘贴到窗体的代码文件中即可。
当用户输入两个数字并选择加号或减号后,点击计算按钮,程序将会计算并显示结果在标签中。
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,请发送邮件至 55@qq.com 举报,一经查实,本站将立刻删除。转转请注明出处:https://www.szhjjp.com/n/930194.html