Vb6, Как я делаю Случайную строку 0-9 и a-z x символов

Question

Vb6, Как я делаю Случайную строку 0-9 и a-z x символов

Я с трудом пытаюсь понять, что вы хотите сделать с этой строкой кода, но вот мой шанс. Он вернет Boolean = False только в том случае, если A1 пусто, а A2 нет, или если A1 не пусто, но A2 равно.

If (A1 = "" and A2 <> "") OR (A1 <> "" and A2 = "") Then
    Boolean = False
End If

11

random vb6

задан 15 November 2008 в 07:02

7 ответов

Другие вопросы по тегам:

random vb6

Похожие вопросы:

score 27 · Answer 1

Function RandomString(cb As Integer) As String

    Randomize
    Dim rgch As String
    rgch = "abcdefghijklmnopqrstuvwxyz"
    rgch = rgch & UCase(rgch) & "0123456789"

    Dim i As Long
    For i = 1 To cb
        RandomString = RandomString & Mid$(rgch, Int(Rnd() * Len(rgch) + 1), 1)
    Next

End Function

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

score 1 · Answer 2

Я забыл весь свой VB6 (слава Богу), но в псевдокоде это довольно легко:

    all_chars = an array of all the valid chars
    seed random number generator
    for i = 1 to x do
        random_index = get a random number between 1 and length of all_chars
        'I remember how to concat and comment in VB6 :-)
        string = string & all_chars[random_index] 
    end for

    done!

Таким образом, это - просто вопрос обнаружения, как создать массив и заполнить его символами, как получить длину массива и как получить случайное число между первыми и последними индексами упомянутого массива.

Ну, все это и цикличное выполнение, конечно.

score 0 · Answer 3

Использование рандомизирует
Интервал (Rnd * верхняя граница) + (нижняя граница) генерирует случайное число
Генерируйте массив со значениями от asc ("a") к asc ("z") и от asc ("0") к asc ("9")
Генерируйте случайное число между 1 и 26 (10+26) и ищите его в массиве.

Не имейте VB6 установленным больше.

score 1 · Answer 4

Вдохновленный этим вопросом, я задал аналогичный вопрос , где я предлагаю использовать GUID для генерации последовательности. Недостаток этого, как я отмечаю, заключается в том, что если в моей логике нет других недостатков, то это будет случайная последовательность от A до F и 10 цифр. Если вы можете смириться с тем фактом, что буквы от G до Z отсутствуют, это может быть для вас решением.

score 1 · Answer 5

Метод Джоэла в порядке (за исключением целочисленной переменной цикла и использования "+" для конкатенации). (-:

Однако вывод можно сделать более интересным несколькими способами.

Во-первых, вы можете сгенерировать строки с таким же приблизительным частотным распределением, что и обычный английский текст, создав начальную строку со многими другими Символы Ee и Tt, а не символы Zz. Строка из 1000 символов (вдвое больше, если смешанный регистр) в это приблизительное сочетание подойдет.

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

Затем используйте случайный селектор в диапазоне 1..Len ( seedstring), чтобы выбрать каждый символ, как в примере Джоэла.

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

Второй вариант - создать две такие исходные строки, одну из согласных с весом корпуса, а другую с гласными с одинаковым весом (больше E, чем O, чем U и т. Д.). Я бы использовал только один регистр, а не смешанный.

Затем чередуйте два случайных выбора, сначала из согласных, затем из гласных, чтобы создать орграфы, такие как TI, WO, DE и так далее. Объедините их вместе, чтобы образовать «слова».

Поскольку полученный результат можно произносить, его гораздо легче запомнить. К тому же он выглядит устрашающе японским. (-: