7 lines
158 B
Text
7 lines
158 B
Text
|
Public Sub Main()
|
||
|
|
Dim sList As String[] = ["Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"]
|
||
|
|
|
||
|
|
Print sList[Rand(0, 11)]
|
||
|
|
|
||
|
|
End
|