Searches for the first occurrence of the duplicated value in the last section of the Array : Array Search « Data Structure « VB.Net
Searches for the first occurrence of the duplicated value in the last section of the Array
Imports System
Imports Microsoft.VisualBasic
Public Class SamplesArray
Public Shared Sub Main()
Dim myArray As Array = Array.CreateInstance(GetType(String), 12)
myArray.SetValue("1", 0)
myArray.SetValue("2", 1)
myArray.SetValue("3", 2)
myArray.SetValue("4", 3)
myArray.SetValue("5", 4)
myArray.SetValue("6", 5)
myArray.SetValue("4", 6)
myArray.SetValue("8", 7)
myArray.SetValue("9", 8)
myArray.SetValue("10", 9)
myArray.SetValue("11", 10)
myArray.SetValue("12", 11)
PrintIndexAndValues(myArray)
Dim myString As String = "4"
Dim myIndex As Integer = Array.IndexOf(myArray, myString, 4)
Console.WriteLine(myIndex)
End Sub
Public Shared Sub PrintIndexAndValues(myArray As Array)
Dim i As Integer
For i = myArray.GetLowerBound(0) To myArray.GetUpperBound(0)
Console.WriteLine(myArray.GetValue(i))
Next i
End Sub
End Class
