Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
BlackJack113
0 / 0 / 0
Регистрация: 10.04.2017
Сообщений: 7
1

Работа со строковыми переменными

06.06.2017, 16:30. Просмотров 175. Ответов 4
Метки нет (Все метки)

Помогите пожалуйста, не могу сообразить. Слово, составленное из последних символов всех слов списка. Слова водятся с клавиатура(желательно inputbox)
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.06.2017, 16:30
Ответы с готовыми решениями:

[Статья] Производительность при работе со строковыми функциями
http://www.aivosto.com/vbtips/stringopt.html (англ.)

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

работа со строковыми переменными
1 заменить "о" на "а" 2 определить количество цифр в тексте, подсчитать их...

Работа со строковыми переменными
Тест зашифрирован подстановкой букв наоборот.Выссчитать исходный тескт.

Работа со строковыми переменными
Поиск позиции N-го вхождения символа C в строке s. Если такой количества...

4
_shark
162 / 164 / 27
Регистрация: 11.10.2016
Сообщений: 524
06.06.2017, 17:28 2
для начала вам надо получить все слова в списке. То есть введем их через InputBox и разделим при вводе пробелами. Далее понадобится разбить слова для удобства в массив, это можно сделать функцией Split, ar = Split(s, " "). После этого организуем цикл с нулевого до последнего (UBound(ar)) элемента этого массива и из каждого слова забираем последний символ с помощью функции Right$(ar(i),1) возвращающей крайний правый символ из очередного элемента массива ar(i). Полученный символ сохраняем в текстовой переменной V и плюсуем его с предыдущими, например V = V + s.
Если у вас есть хотя бы небольшой опыт программирования на VB, то без труда разберетесь, подсказки я вам дал
0
BlackJack113
0 / 0 / 0
Регистрация: 10.04.2017
Сообщений: 7
06.06.2017, 20:06  [ТС] 3
Я попробовал сам разобраться и смог написать вот такой код, но это не много не то, что надо. Я понимаю, что его можно сделать меньше, но я не понимаю как. Я сделал, что бы массив заполнялся, но как сделать что бы последние буквы слов в конце соединялись? Более простым способом
PureBasic
1
2
3
4
5
6
7
8
9
Private Sub Command1_Click()
Dim p, q(), L, V As String
ReDim q(1 To 2)
For p = 1 To 2 Step 1
q(p) = InputBox("Введите слова")
L = Len(q(p))
Print Right(q(1)) + Right(q(2))
Next p
End Sub
0
_shark
162 / 164 / 27
Регистрация: 11.10.2016
Сообщений: 524
07.06.2017, 10:32 4
Цитата Сообщение от BlackJack113 Посмотреть сообщение
Print Right(q(1)) + Right(q(2))
замените на V = V & Right$(q(p),1)
после Next p напишите MsgBox V
0
Genn55
378 / 225 / 108
Регистрация: 26.12.2012
Сообщений: 744
07.06.2017, 23:21 5
Можно так
Visual Basic
1
2
3
4
5
6
7
8
9
10
Option Explicit
Private Sub Form_Load()
    Dim v, s$, St$
    s = "Слово составленное из последних символов всех слов списка" ' для теста чтобы не вводить можете убрать
    's = InputBox("Введите слова через пробел")'раскомментируйте
    For Each v In Split(s)
      St = St & Right$(v, 1)
    Next
    MsgBox "Новое слово: " & St
End Sub
0
07.06.2017, 23:21
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.06.2017, 23:21

Работа со строковыми переменными
В двух данных словах(слова любые) найти максимальную общую часть.

работа со строковыми переменными
в строке удалить символ двоеточие ":". Подсчитать кол-во удаленных символов

Работа со строковыми переменными.
Задача №1. Дан текст. Удалить в нём третью букву каждого слова. Задача №2. В...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru