I moduli sono usati per raggruppare delle procedure che sono correlate tra loro, in modo da poter essere riutilizzate in più parti delle nostre applicazioni.
Sono in parte simili a delle classi, consentono infatti al programmatore di realizzare dei componenti contenenti funzioni riutilizzabili, senza dover conoscere la programmazione ad oggetti.
Module modEstrazioneCarte
Dim myRandom As Random = New Random()
Function estraiCarta() As Integer
Return myRandom.Next(1,11)
End Function
End Module
Module modCarte
Sub Main()
Dim carta As Integer = 0
Dim estratta As Integer = 0
Dim vinte As Integer = 0
Do While (carta <> -1)
Console.Write("Scegli una carta: ")
carta = Console.ReadLine()
estratta = modEstrazioneCarte.estraiCarta()
If (carta = estratta) Then
Console.WriteLine("Hai vinto")
vinte += 1
End If
Loop
Console.WriteLine("Hai vinto " & vinte & " mani")
End Sub
End Module