新手:怎样在vb中随机显示出汉字? 例如:在一个text中,想得到一行随机的汉字,怎样做? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 去一个从1到text中总字符数之间的随机数就行了 Function getaword() As StringRandomizerndword = "?"Do While rndword = "?"rndword = Chr((Int(Rnd * 20000) + 10000) * -1)Loopgetaword = rndwordEnd Function 怎么设置VB6.0默认保存位置? 请问在vb中如何更新插入删除多表关联记录集中其中一个源表中的记录 VSFlexgrid 第一行能合并吗? 【CSDN】【非常容易的几个小问题,可惜刚做项目,不清楚如何实现,请赐教】 vb如何实现中断的调用? 有VB程序的EXE文件,怎么可以得到源程序 高手请看看vb中关于几个关于form中比较难的问题! 请问在VB的ADODC控件中怎么调用SQL的存储过程? 怎么网格控件中数据导出到Excel 如果不用控件怎么连接SQL Server数据库? 好久没来vb版了,先散点分,再说点事。 vb 中是否有查找硬盘中文件的函数?
Randomize
rndword = "?"
Do While rndword = "?"
rndword = Chr((Int(Rnd * 20000) + 10000) * -1)
Loop
getaword = rndword
End Function