[решено] Программа в VisualBasic 6.0

[z01]

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

[Vovchick1]

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

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

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

[ivank]

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

[z01]

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