以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 随机生成有大小写字母和数字的字符串 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=169242) |
-- 作者:cd_tdh -- 发布时间:2021/6/8 13:06:00 -- 随机生成有大小写字母和数字的字符串 老师怎么随机生成有大小写字母和数字的字符串,这样只能生产小写的 Dim Val1 As String = Rand.NextString(6) [此贴子已经被作者于2021/6/8 13:06:39编辑过]
|
-- 作者:有点蓝 -- 发布时间:2021/6/8 13:42:00 -- Dim Val1 As String = Rand.NextString(6) Output.Show(Val1) Dim sb As new StringBuilder For Each c As Char In val1 If Char.IsLetter(c) AndAlso rand.Next(0,2) = 0 Then sb.Append(cstr(c).ToUpper) Else sb.Append(c) End If Next Output.Show(sb.ToString) |
-- 作者:cd_tdh -- 发布时间:2021/6/8 18:08:00 -- 谢谢老师,可以了,这一句代码是什么意思,没看懂 If Char.IsLetter(c) AndAlso rand.Next(0,2) = 0 Then
[此贴子已经被作者于2021/6/8 18:10:23编辑过]
|
-- 作者:有点蓝 -- 发布时间:2021/6/8 20:08:00 -- Char.IsLetter(c) 是字母 rand.Next(0,2)随机取0,1其中一个 rand.Next(0,2) = 0 随机取0,1其中一个,如果等于0 就是如果是字母,随机改为大写,有可能改,有可能不改
|