Dim sum As Integer = 0, For i As Integer = 1, To 3, sum = sum + i, Next i, MsgBox(sum).

Tauler de classificació

Estil visual

Opcions

Canvia de fonament

Restaurar desada automàtica: ?