RE:Evaluar expresiones con prioridad de operadores
Por lo que ten entiendo esto te podria ayudar:
Agrega a tu Form, TextBox: txtExpression; CommandButton: cmdEvaluate; Label:lblResult
Y pega:
Option Explicit
Private Sub cmdEvaluate_Click()
Dim excel_app As Object
Dim excel_sheet As Object
Set excel_app = CreateObject("Excel.Application")
excel_app.Workbooks.Add
If Val(excel_app.Application.Version) >= 8 Then ' Verificando version.
Set excel_sheet = excel_app.ActiveSheet
Else
Set excel_sheet = excel_app
End If
excel_sheet.Cells(1, 1) = "=" & txtExpression.Text
lblResult.Caption = excel_sheet.Cells(1, 1) 'resultado
excel_app.ActiveWorkbook.Close False
excel_app.Quit
Set excel_sheet = Nothing
Set excel_app = Nothing
End Sub
Al ingresar al textbox: (5*8) + 6^2, esto lo evaluara, si es con incognitas es muxo mas codigo ya tu ve.
Suerte!