Imports System
Public Class Program
Public Shared Sub Main()
Dim f_arr() as Single = {3.141592f, 2.876f, 9.27f}
Console.WriteLine(f_arr(0))
Console.WriteLine(f_arr(1))
Console.WriteLine(f_arr(2))
End Sub
End Class
' run:
'
' 3.141592
' 2.876
' 9.27
'