我正在写一个非常简单的数学游戏。我希望能做到的是:
Dim symbol as String
Private Sub Math()
symbol = "+"
1 symbol 1 = 2
symbol = "-"
1 symbol 1 = 0
end sub
我知道这不起作用,但这是我想要的想法,提前谢谢。
答案 0 :(得分:1)
使用if else或switch case,在条件中使用实际符号,例如
if symbol == "+":
return a+b;
if symbol == "-":
return a-b;
答案 1 :(得分:1)
正如Marc Gravell已经提到的,你可以使用lambda表达式。这是它在VB中的工作方式:
Private Sub Calculate(f As Func(Of Double, Double, Double))
Dim a As Double = 1.5, b As Double = 3.14
Console.WriteLine(f(a,b));
End Sub
然后你会像这样调用Calculate:
Calculate(Function(x,y) x+y)
Calculate(Function(x,y) x-y)
Calculate(Function(x,y) x*y)