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