Sub AddStringsAsNumber(Str1 As String, Str2 As String) As Double
Dim result As Double
If IsNumber(Str1) AND IsNumber(Str2) Then
result = Str1 + Str2
End If
Return result
End Sub
Sub ConcatenateStrings(Str1 As String, Str2 As String) As String
Return Str1 & Str2
End Sub
Sub AddCRLF(b As Int) As String
Return b & CRLF
End Sub
Sub Test
Log("AddStringsAsNumber: " & AddStringsAsNumber("19", "58")) 'Result = 77
Log("ConcatenateStrings: " & ConcatenateStrings("19", "58")) 'Result = 1958
Log("AddCRLF: Line1" & AddCRLF(27) & "Line2") 'Result Line127Line2 (on next line)
End Sub