L' unica differenza tra Sub e Function sta nel fatto che le function ritornano un valore le sub no

[CODE]
Dim myInt as Int32

Sub calcolaTotale()
var1 = var1 * 2
End Sub

Function CalcolaTotale() As Int32
var1 = var1 * 2
return var1
End Function

Nel primo caso dovrai fare

CalcolaTotale
myInt = var1

Nel secondo

myInt = CalcolaTotale


[CODE]