VB净串联双数据类型

Question

这是我最终解决的奇怪的，但我希望有人可以向我解释为什么会发生：

Public Function s(ByVal SesVarName As String, Optional ByVal SesVal As String = Nothing)
    
    If SesVal IsNot Nothing Then System.Web.HttpContext.Current.Session("" & SesVarName & "") = SesVal 
    If System.Web.HttpContext.Current.Session("" & SesVarName & "") Is Nothing Then s = Nothing : Exit Function
    s = System.Web.HttpContext.Current.Session("" & SesVarName & "")

End Function

s("A",2)
s("B",2) 
DIM num as Double = s("A") + s("B")

在上面的情况下，Num返回22 4 ...怪异吧？

s("A",2)
s("B",2) 
Dim num1 as Double = s("A")
Dim num2 as Double = s("B")
DIM num as Double = num1 + num2

我猜这与会话变量以及我如何使用函数声明它们有关。我想念/搞砸了该功能？这是因为我自己的利益太聪明了吗？似乎在其他地方工作，这并不意味着什么。

我想我的主要问题是：不应该将num宣布为双重防止串联吗？关于该功能的指针也将不胜感激。

我要过度思考吗？我现在是否应该开始尝试找到我知道我可以加成的双重数据类型的理由？

谢谢