ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[¤À¨É] ÀH¾÷²£¥Í

¥»©«³Ì«á¥Ñ singo1232001 ©ó 2023-10-17 18:43 ½s¿è

¦^´_ 1# hcm19522


    Sub test()
tx = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
Debug.Print Mid(tx, Round(Rnd * 62, 0) + 1, 1)
End Sub




Sub ¤Q²ÕÀH¾÷¼Æ1¨ì62()
For i = 1 To 10
Debug.Print Round(Rnd * 62, 0) + 1
Next
End Sub

TOP

        ÀR«ä¦Û¦b : ¬°¤H³B¥@­n¤p¤ß²Ó¤ß¡A¦ý¤£­n¡u¤p¤ß²´¡v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD