05 November 2017

Generate Random Character using UFT

Const str = "abcdefghijklmnopqrstuvwxyz"

Num = cint(Inputbox("How many random char you want?"))

Randomize()

For i = 1 To Num
    strName = ""
    For j = 1 To Num
        k = Fix(26 * Rnd())
        strChar = Mid(str, k + 11)
        strName = strName & strChar
    Next
Next

Msgbox strName

No comments:

Post a Comment

AOM - Automation Object Model

'Creating QuicTest Object Set  qtapp =  createobject ( "QuickTest.Application" ) 'Launching the Application If  qtapp...