展开全部
.版本 2
.支持库 spec
.程序集 窗口程序集1
.程序集变量 数字数组, 文本型, , "0"
.程序集变量 文本数组, 文本型, , "0"
.程序集变量 结果1, 整数型
.程序集变量 结果2, 整数型
.子程序 _按钮1_被单击
置随机数种子 ()
数字数组 = 分割文本 (编辑框1.内容, #换行符, )
文本数组 = 分割文本 (编辑框2.内容, #换行符, )
结果1 = 取随机数 (1, 取数组成员数 (数字数组))
结果2 = 取随机数 (1, 取数组成员数 (文本数组))
调试输出 (数字数组 [结果1] + “☆☆☆” + 文本数组 [结果2])
.支持库 spec
.程序集 窗口程序集1
.程序集变量 数字数组, 文本型, , "0"
.程序集变量 文本数组, 文本型, , "0"
.程序集变量 结果1, 整数型
.程序集变量 结果2, 整数型
.子程序 _按钮1_被单击
置随机数种子 ()
数字数组 = 分割文本 (编辑框1.内容, #换行符, )
文本数组 = 分割文本 (编辑框2.内容, #换行符, )
结果1 = 取随机数 (1, 取数组成员数 (数字数组))
结果2 = 取随机数 (1, 取数组成员数 (文本数组))
调试输出 (数字数组 [结果1] + “☆☆☆” + 文本数组 [结果2])
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询