Excel怎么做20位随机英文加数字的乱码？望指教。谢谢

在要生成密码的单元格输入

=PASSWORD(16)

这个就是生成16位的密码.改变括号的数字,就可以任意生成你所需要的密码长度.

Public Function password(ByVal n As Integer)

Dim a As String

a = ""

For x = 1 To n

b = Rnd()

If b <= 0.33 Then

a = a &Chr(Int(Rnd() * 10) + 48)

ElseIf b <0.66 And b >0.33 Then

a = a &Chr(Int(Rnd() * 26) + 65)

Else

a = a &Chr(Int(Rnd() * 26) + 97)

End If

Next

password = a

End Function

**************纯数字密码.

Public Function password(ByVal n As Integer)

Dim a As String

a = ""

For x = 1 To n

a = a &Chr(Int(Rnd() * 10) + 48)

Next

password = a

End Function

您好，亲爱的管家用户

您好！收到乱码说明定位未成功。系统会下发一条短信去被盗手机去做一个这样的定位指令，如果指令接受成功，这条短信是不会被看到的，管家会自动屏蔽掉。反之，当能看到这条短信的时候就代表定位失败，管家没能第一时间抢占到这个读取短信的端口，导致定位命令失败，而这种情况下，通常都是用户手机可能装了其他安全软件，被他们优先抢占端口造成的。防盗功能需开启了手机防盗，手机开机且信号良好，腾讯手机管家未被卸载。感谢您对手机管家的支持！

感谢您对腾讯手机管家的支持！

---