[решено] Программа в VisualBasic 6.0 - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)

- - [решено] Программа в VisualBasic 6.0 (http://forum.oszone.net/showthread.php?t=79497)

Программа в VisualBasic 6.0

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

Для начала создайш массив и помещаеш в него все буквы из введённого слова

Код:

Dim Mas 

Dim T 

Dim L, I

T=Form1.Text1.Text 'заполняем переменную

L = Len(T) 'узнаём длинну слова

ReDim Mas(1 To L) 'объявляем переменную Mas как массив из L элементов

For I = 1 To L

 Mas(I) = Mid(T, I, 1) 'Заполняем масив

Next I

Цитата:

и вывода всех возможных вариантов сочетаний букв из этого слова

Затрудняюсь ответить потом гляну отвечу

BoingS
Аогоритм примитивен. Объяснять своими словами лень, благо в интернете на эту тему много: http://rain.ifmo.ru/cat/view.php/vis...2003/algorithm . Адаптировать к VB и буквам, я думаю, труда не составит.

благадарю камрады