Проверить, принадлежат ли все элементы массива1 массиву2

30.11.2012, 19:18. **Показов** 880. **Ответов** 2

Author24 — интернет-сервис помощи студентам

Всем привет!
Имеется два массива чисел. Проверить принадлежат ли все элементы массива1 массиву2

@Flamberg · 30.11.2012, 22:20

VB.NET

Dim M() As String = {"1", "2", "3"}
        Dim N() As String = {"g", "1", "y", "2", "3", "8"}
        Dim i, k As Integer
        Dim Fl As Boolean = True
        For i = 0 To M.Length - 1
            k = Array.IndexOf(N, M(i))
            If k = -1 Then Fl = False : Exit For
        Next
        If Fl = True Then
            MsgBox("Все элементы найдены")
        Else
            MsgBox("Найдено не все")
        End If

Добавлено через 1 минуту
не посмотрел, что у вас массивы числовые, но в данном случае разницы нет

@eJ_Studio · 01.12.2012, 23:55

indexof ищет индекс, а это доп время, проще проверять contains
то есть

VB.NET

1	if N.contains(mi)

Добавлено через 1 час 20 минут
сори, о другом думал

так правильно if n(i)...
попробуй так

VB.NET

  Dim arr() As String = {"baba", "boba", "buba"}
 
        For i As Integer = 0 To arr.Length - 1
            If arr(i).Contains("ba") Then MsgBox(arr(i))
        Next

ivan001
		1
	.NET 3.x Проверить, принадлежат ли все элементы массива1 массиву2 30.11.2012, 19:18. Показов 880. Ответов 2 Метки нет (Все метки) Всем привет! Имеется два массива чисел. Проверить принадлежат ли все элементы массива1 массиву2

	01.12.2012, 23:55