19/05/2023: A causa di un errore sono stati cancellati, insieme ad account creati da bot, alcuni account legittimi. Si prega di leggere qui: https://www.gambas-it.org/smf/index.php?topic=9733.0
Public Sub Main() MCalendar.CaricaCal Print MCalendar.RitornoNumero(0, 1), MCalendar.RitornoNumero(1, 1)End
Private calendario[2, 2] As IntegerPublic Sub CaricaCal() calendario[0, 0] = 12 calendario[0, 1] = 22 calendario[1, 0] = 33 calendario[1, 1] = 66 EndPublic Sub RitornoNumero(val1 As Integer, val2 As Integer) As Integer Dim i As Integer i = calendario[val1, val2] Return i End