Contoh Coding cari pada Vb net yang simple?

Dim j As Integer
For j = 0 To y - 1
If x(j) = z Then
Return j
End If
Next
Return -1

Jika ditemukan, maka return index data, selain itu return -1.

NB: kode itu untuk fungsi. jika tidak dalam fungsi, ubah return menjadi kode yang diinginkan.