Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > .NET Frameworks (точка нет фреймворки) > Общие вопросы .NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.10.2017, 11:00   #1
Sergey Nachynov
Новичок
Джуниор
 
Регистрация: 02.08.2017
Сообщений: 1
По умолчанию VB.net Как получить число из последовательности целых чисел в TextBox-е

Я написал следующий код для управления извлечением случайных контрольных параметров из базы данных

Код:
 ' Генерируем случайные чисела, используя системное значение в качестве основы.
        Dim RandTest As New Random()
        ' Генерируем и отображаем 10 случайных чисел в диапозоне от 1 до 30.
        Mass = Enumerable.Range(1, 30).OrderBy(Function(n) RandTest.Next).Take(10).ToArray()
        ' Записываем их текстовый блок
        TextMass.Text = String.Join(", ", Mass.[Select](Function(x) x.ToString()).ToArray())
        ' Производим поиск        
        Dim str As String = TextMass.Text
        Dim MassQ() As String = str.Split(",  ")
        ' Проверка путем просмотра в MsgBox (работает прекрассно), т.е MassQ.Count = 10
        ' MsgBox("Количество элементов массива: " & MassQ.Count)
        ' Извлекаем значения
        For I = 0 To MassQ.Count - 1
        ' Проверка путем просмотра в MsgBox - последовательно показывает соответствующие значения
            'MessageBox.Show(MassQ(I))
        ' Выводим данные для управления ресурсами
            а = MassQ(I) ' контрольное значение
            element1(a)  ' функция поиска и открытия ресурса

        Next
Приведенный код выводит крайнее значение последовательности и не изменяется.

Помогите, пожалуйста найти ошибку!!! Заранее благодарен.
Nachynov

_____
Код программы нужно выделять (форматировать) тегами [CODE] (читать FAQ)
Модератор

Последний раз редактировалось Serge_Bliznykov; 03.10.2017 в 11:09.
Sergey Nachynov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Утверждение: "Значение любого элемента этой последовательности – одно из трех чисел целых положительных чисел. Четвертого числа не встречается.". vas23052003 Паскаль, Turbo Pascal, PascalABC.NET 2 14.02.2017 21:05
с++ Вводится последовательность ненулевых чисел,0-конец последовательности, определить наибольшее число в последовательности ЮськаЮськовна Помощь студентам 3 10.11.2015 15:20
Осуществить ввод последовательности целых чисел. Alimzhan93 C# (си шарп) 1 07.06.2013 06:29
Дана последовательность N целых чисел. Определить число членов последовательности, для которых выполняется условие dmitriy20104 Паскаль, Turbo Pascal, PascalABC.NET 3 29.06.2012 10:25
дана последовательность n целых чисел, найти минимальный и максимальный члены последовательности и их номера dmitriy20104 Паскаль, Turbo Pascal, PascalABC.NET 1 22.06.2012 13:45