vb如何随机生成一个英文名-明月个性网

Private Sub Command1_Click()
Dim xName As String
Dim I As Integer
I = Int(3 + 6 * Rnd())
xName = Chr(int(64 + 26 * Rnd()))
For j = 1 To I
xName = xName & Chr(Int(97 + 26 * Rnd()))
Next
Print "New English Name=" & xName
End Sub
就是随即生成一个第一字母大写，后面字母小写的长度在4-10的英文字符串

佚名

2024-06-07 15:17:51

最佳回答

类似问题(10)

佚名

2024-06-07 21:34:07

问未央如何改成一个英文名字

答
Wien [vi:n] 是由德语转过来的Vienna [vi'en
佚名

2024-06-07 08:00:00

问EXCEL如何产生随机数？

答
Excel随机数函数
佚名

2024-06-07 08:00:00

问如何在EXCEL随机生成数字，要正负的！

答
1、如果按照随机函数公式=rand()输入的话，是无法生成随机的负数数字的。2、此时需要修改rand函数，输入：=(RAND()*9+1)*(-1)^INT(R...
佚名

2024-06-07 08:00:00

问EXCEL中把一个数随机分成几个数有如何操作？

答
=(11+MOD(INT(RAND()*100),6)*(MOD(INT(RAND()*100),2)*2-1))*15生成90-240之间的数字，明天再回答全...
佚名

2024-06-07 08:00:00

问求随机点名系统的VB程序？

答
直接在access数据库里就可以做随机了seed=round(rnd*9999)access数据库随机语法，主要是 rnd(-222-id-3333)sql2=...
佚名

2024-06-07 08:00:00

问用vb怎么生成3位随机数

答
randomize(不加这个的话,生成的随机数是固定排列的,即第一位是:500以后开启软件都是500,后面皆是)int((900*Rnd)+100)
佚名

2024-06-07 08:00:00

问VB中产生随机数

答
Private Sub cmdRanAngle_Click()Dim dblAngle As doubleDim dblSin As double'Random...
佚名

2024-06-07 08:00:00

问excel中如何实现随机生成中奖人的名字

答
这个要用VBA实现。等会给你。请见附件 “抽奖.xls”。
佚名

2024-06-07 08:00:00

问如何用Vb6生成随机字符串

答
Private Sub Command1_Click()zfc="..." '自己填,放不下cd = InputBox("长度")Randomizejg ...
佚名

2024-06-07 08:00:00

问中文名玉成如何取一个英文名

答
Yates 耶茨

vb如何随机生成一个英文名

问未央如何改成一个英文名字

问EXCEL如何产生随机数？

问如何在EXCEL随机生成数字，要正负的！

问EXCEL中把一个数随机分成几个数有如何操作？

问求随机点名系统的VB程序？

问用vb怎么生成3位随机数

问VB中产生随机数

问excel中如何实现随机生成中奖人的名字

问如何用Vb6生成随机字符串

问中文名玉成如何取一个英文名

风水

起名

网名

说说