如何随机生成汉字，做人名用。 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 如何随机生成汉字，做人名用。

标题：如何随机生成汉字，做人名用。

只看楼主

txxb

等　级：论坛游民
帖　子：104
专家分：59
注　册：2014-10-8
结帖率：96%

楼主

已结贴√ 问题点数：20 回复次数：3

如何随机生成汉字，做人名用。

随机生成2-3个汉字，有啥好办法？

搜索更多相关主题的帖子: 汉字　如何　

2014-12-04 21:23

xzlxzlxzl

来　自：湖北
等　级：贵宾
威　望：125
帖　子：1091
专家分：5825
注　册：2014-5-3

第 2 楼

得分:10

Private Sub Command1_Click()
  Dim a As String
  Randomize
  a = Chr((Int(128 + 127 * Rnd)) * 256& + Int(127 * Rnd + 128))
  Print a;
End Sub

这样出来的汉字无意义，还有乱码，建议输入一篇文章，取随机行列值得到该汉字

2014-12-04 22:13

风吹过b