0 / 0 / 1
Регистрация: 27.04.2011
Сообщений: 84
1

Вывести все слова строки, в которых есть удвоение букв

25.05.2015, 23:21. Показов 829. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте! Задание в сабже. Ввожу в TextBox1 строку, а в итоге нужно получить список слов с удвоением букв в ListBox1. Не могу понять в чём проблема. Выдаёт ошибку: "Индекс находился вне границ массива" на строке 6.

VB.NET
1
2
3
4
5
6
7
8
9
10
11
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim Str As String = TextBox1.Text
    Dim WrdArr() As String = Split(Str)
    For Each Word In WrdArr
        For i = 0 To Word.Length - 1
            If Word(i) = Word(i + 1) Then
                ListBox1.Items.Add(Word)
            End If
        Next
    Next
End Sub
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.05.2015, 23:21
Ответы с готовыми решениями:

Вывести все слова строки, в которых есть удвоение букв
Помогите написать программу которая выводит все слова из строки в которых есть удвоение букв, а...

Напечатать слова в которых есть удвоение букв
Напечатать те слова из введенного предложения, в которых есть удвоение букв, или вывести сообщение...

Удалить из текстовой строки все слова в которых есть непарное количество согласных букв
удалить из текстовой строки все слова в которых есть непарное количество согласных букв.

Вывести на экран все слова, состоящие из K букв, в которых есть по крайней мере две одинаковые буквы, стоящие рядом
Напишите пожалуйста программу В алфавите языке племени «тумба-юмба» четыре буквы: «Ы», «Ш», «Ч»...

1
15147 / 6420 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
25.05.2015, 23:33 2
Я не знаю, как там в VB.Net - индекс первого символа 0 или 1. Если 0, то 5 строка For i = 0 To Word.Length - 2
Если 1, то 5 строка For i = 1 To Word.Length - 1
0
25.05.2015, 23:33
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.05.2015, 23:33
Помогаю со студенческими работами здесь

ввести строку длиной 70 символов, а в другую строку перенести все слова из этой строки, которые имеют удвоение букв.
помогите сделать .!!!!! нужно ввести строку длиной 70 символов, а в другую строку перенести все...

Вывести слова,в которых есть сочетание букв ам или ма
Помогите найти ошибку!Использовал оператор like для нахождения нужного сочетания букв,на экран...

В строку S2 перенести все слова, которые имеют удвоение букв
Ввести с клавиатуры строку S1 длиной до семидесяти символов. В строку S2 перенести все слова...

Выведите все слова,в которых встречается удвоение буквы
написать программу на Pascal через string. Введите строку длинною 70 символов. Выведите все...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru