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

codice:
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