随机字符串生成器

随机字符串生成器， "出错了")Exit SubEnd IfRandomizeDim jgjg = ""Dim iFor i = 1 To cdjg = jg & Mid(zfc，"，随机字符串生成器下载V0.1，"， vbCritical， "出错了")Exit SubEnd Ifabc = IsNumeric(cd)If abc = False Thenabc = MsgBox("字符串长度非法！ 1)Next iForm1.Text3.Text = jgEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then Call Command1_ClickEnd Sub 【基本介绍】随机字符串生成器用来生成随机字符串可指定字符串长度和用来生成的字符作密码的话强度应该非常强了使用前要装VB6运行库源码：Private Sub Check1_Click()If Form1.Check1.Value = 1 ThenForm1.Text2.Locked = Fa...