在VB编程中，计算公式可以通过以下几种方法实现：
使用ScriptControl控件
可以使用`ScriptControl`控件来执行VBScript代码，并计算表达式。
例如：
```vb
Dim vbs As Object
Set vbs = CreateObject（"ScriptControl"）
vbs.Language = "vbs"
vbs.ExecuteStatement "a1=3:a2=5:d=7:b=6:c=3"
MsgBox vbs.Eval（"a1+a2*d-b/c"）
Set vbs = Nothing
```
声明变量和运算符
在VB中，可以通过声明变量来存储计算结果和输入的值，使用算术运算符（如+、-、*、/）来执行所需的计算操作。
例如：
```vb
Dim num1 As Double
Dim num2 As Double
Dim result As Double
num1 = 10
num2 = 5
result = num1 + num2
MsgBox result
```
使用内置数学函数
VB提供了许多内置的数学函数，如`Math.Sqrt`和`Math.Pow`，可以用于执行更复杂的计算。
例如：
```vb
Dim squareRoot As Double
squareRoot = Math.Sqrt（25）
MsgBox squareRoot
```
编写函数
可以编写自定义函数来执行特定的计算任务，然后在主程序中调用这些函数。
例如：
```vb
Function AddNumbers（num1 As Double, num2 As Double） As Double
AddNumbers = num1 + num2
End Function
Dim sum As Double
sum = AddNumbers（5, 3）
MsgBox sum
```
使用控件
在VB的可视化编程环境下，可以使用控件（如按钮、文本框、标签）来构建用户界面，并通过事件处理程序来计算和显示结果。
例如：
```vb
Private Sub Command1_Click（）
Dim expression As String
Dim result As Double
expression = txbExpression.Text
result = Evaluate（expression）
txbValue.Text = result
End Sub
```
通过以上方法，可以在VB中灵活地计算各种公式。建议在实际编程中注意运算符的优先级和括号的使用，以确保计算结果的准确性。