Imports System
Imports System.Linq
Public Class FillArrayWithSpecificValue_VB_NET
Public Shared Sub Main(ByVal args As String())
Dim arr As Integer() = Enumerable.Repeat(-1, 10).ToArray()
Console.WriteLine(String.Join(", ", arr))
End Sub
End Class
' run:
'
' -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
'