VB从text1的数字中随机生成一个数字
在text1里有若干个数字，用“，”分割开，要求随机生成一个数字，如果text1里没有这个数，则重新生成。...
在text1里有若干个数字，用“，”分割开，要求随机生成一个数字，如果text1里没有这个数，则重新生成。
展开
展开全部
nums=split(text1,"，"） '使用split函数分割text1，得到数组nums
n=ubound(nums)+1 '计算数组nums的元素个森早拿数此搭
m=int(rnd*n) '生成[0,n-1]的随机整数
mynum=val(nums(m)) '将生成的随机整数作为下标，取得数组nums中的睁虚某个数
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
