#include <Array.au3>

;===============================================================================
; Пример 1 (использование 1D массива)
;===============================================================================
Local $avArray[6] = [ _
"Строка0, Подстрока0", _
"Строка1, Подстрока1", _
"Строка2, Подстрока2", _
"Строка3, Подстрока3", _
"Строка4, Подстрока4", _
"Строка5, Подстрока5"]

_ArrayDisplay($avArray, "$avArray")

$sSearch = InputBox("Демонстрация _ArraySearch()", "Укажите текст для поиска")
If @error Then Exit

$iIndex = _ArraySearch($avArray, $sSearch, 0, 0, 0, 1)
If @error Then
	MsgBox(4096, "Не найдено", '"' & $sSearch & '" не был найден в массиве.')
Else
	MsgBox(4096, "Найдено", '"' & $sSearch & '" найден в массиве в позиции ' & $iIndex & ".")
EndIf

;===============================================================================
; Пример 2 (использование 2D массива)
;===============================================================================
Local $avArray[6][2] = [ _
["Строка0", "Подстрока0"], _
["Строка1", "Подстрока1"], _
["Строка2", "Подстрока2"], _
["Строка3", "Подстрока3"], _
["Строка4", "Подстрока4"], _
["Строка5", "Подстрока5"]]

_ArrayDisplay($avArray, "$avArray")

$sSearch = InputBox("Демонстрация _ArraySearch()", "Укажите текст для поиска")
If @error Then Exit

$sColumn = InputBox("Демонстрация _ArraySearch()", "Укажите колонку для поиска")
If @error Then Exit
$sColumn = Int($sColumn)

$iIndex = _ArraySearch($avArray, $sSearch, 0, 0, 0, 1, 1, $sColumn)
If @error Then
	MsgBox(4096, "Не найдено", '"' & $sSearch & '" не найдено в колонке ' & $sColumn & '.')
Else
	MsgBox(4096, "Найдено", '"' & $sSearch & '" найден в массиве в позиции ' & $iIndex & ' в колонке ' & $sColumn & '.')
EndIf