阅读量:0
以下是一个用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),然后将上述代码复制粘贴到窗体的代码文件中即可。
当用户输入两个数字并选择加号或减号后,点击计算按钮,程序将会计算并显示结果在标签中。