• 回答数

    4

  • 浏览数

    226

小小米珠
首页 > 英语培训 > 随机生成英文名

4个回答 默认排序
  • 默认排序
  • 按时间排序

吃生鱼片的猫

已采纳

Private Sub Command1_Click()RandomizeDim a As Stringa = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"For i = 1 To 7Text1 = Text1 & Mid(a, Int(Rnd * Len(a) + 1), 1)Next iEnd Sub简单点的就这个~

随机生成英文名

292 评论(9)

多多吃好

随机生成名字

244 评论(15)

者尼私人影院

'事先写好一些名字,例如下面的a、b、c、d、e、f,然后随机抽取一个名字,注意把下面的6改成相应的个数 a = Array("a", "b", "c", "d", "e", "f") Randomize Print a(Fix(Rnd * 6)) '用楼上的更有意思,如果不幸生成了"Fuck"、"Sex"等等不雅词汇,楼主有的玩了,因为完全是随机生成字母组合,所以生成一个完整单词的概率不是很大

347 评论(8)

容妆淡淡

'事先写好一些名字,例如下面的a、b、c、d、e、f,然后随机抽取一个名字,注意把下面的6改成相应的个数 a = Array("a", "b", "c", "d", "e", "f") Randomize Print a(Fix(Rnd * 6)) 电脑又不是人脑,电脑不懂的人类的语言更别说让它随机生成一个人类用的名字了

225 评论(12)

相关问答