当前位置:主页 > bet8娱乐官网注册 >

bet8娱乐官网注册

问题VB使用Rnd函数随机生成25 10。

发布时间:2019-11-19 11:06
展开全部
如图所示
但是你没有图像。
我只能相信这个想法和转置矩阵的输出myfile2Fori = 0To24Text1(i)= Int((90)* Rnd + 10)。(K),Val(Text1(k + 1)),Val(文本1(k + 2)),Val(文本1(k + 3))Nextk关闭#1 EndSubPrivateSubCommand2_Click()OpenD: myfile1。
txtForInputAs#1 Fork = 1To5LineInput#1,strtmpa = Split(strtmp,)Form = 1To5Text2(5 * m-5 + k-1)= a(m-1)NextmNextkClose#1OpenD: myfile2。
txtForOutputAs#1 fork = 1 To25Step5写#1,Val(文本2(k-1)),Val(文本2(k + 1)),Val(文本2(k + 1)),Val(文本2(k +))2)),Val(文本2(k + 3))Nextk关闭#1 EndSub