0

この文字列の意図は、次の形式で乱数を生成することです: l = 文字 n = num,

LLNNN

代わりに、次のようになります。

NN

または時々:

N

コード

Local $destination = "C:\Users\Ryan\Pictures\Aurora.jpg"

If Random() < 1 Then
    $Lettera = Chr(Random(Asc("A"), Asc("Z")))
Endif
If Random() < 1 Then
    $Letterb = Chr(Random(Asc("A"), Asc("Z")))
Endif
If Random() < 1 Then
    $Numbera = Chr(Random(48, 57, 1))
Endif
If Random() < 1 Then
    $Numberb = Chr(Random(48, 57, 1))
Endif
If Random() < 1 Then
    $Numberc = Chr(Random(48, 57, 1))
Endif

SplashImageOn("Splash", $destination, 312, 146, 450, 300, 1)
Sleep(9000)
SplashOff()
If MsgBox(1, "code generator", "Create a new key?") = 1 Then
    msgBox(0, "code generator", "Your registry is:" + $Lettera + $Letterb + $Numbera + $Numberb + $Numberc)
EndIf
4

1 に答える 1