VB怎么写矩阵 需要一个1000*1000的矩阵 每一个格都是随机数 最后要保存到一个TEXT里面
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/16 08:48:53
VB怎么写矩阵 需要一个1000*1000的矩阵 每一个格都是随机数 最后要保存到一个TEXT里面
'主要代码就是这个
'这是使用二维数组
dim a(99,99) '声明一个二维数组
randomize '随机化,用于生成随机数
for i = 0 to 99
for j = 0 to 99
a(i,j) = fix(rnd * 10) '生成0~10的随机整数
next
next
for m = 0 to 99
s = ""
for n = 0 to 99
s=s&a(m,n)& " "
next
str = str & s & vbcrlf
next
msgbox str
'不使用数组也可以
randomize
for i = 0 to 99
s = ""
for j = 0 to 99
s=s & fix(rnd * 10) & " "
next
str = str & s & vbcrlf
next
msgbox str
再问: 问下 怎么怎么保存到TXT文件去?
再答: randomize for i = 0 to 999 s = "" for j = 0 to 999 s=s & fix(rnd * 10) & " " next str = str & s & vbcrlf next set fso = createobject("scripting.filesystemobject") set f = fso.createtextfile("矩阵.txt") f.write str f.close
'这是使用二维数组
dim a(99,99) '声明一个二维数组
randomize '随机化,用于生成随机数
for i = 0 to 99
for j = 0 to 99
a(i,j) = fix(rnd * 10) '生成0~10的随机整数
next
next
for m = 0 to 99
s = ""
for n = 0 to 99
s=s&a(m,n)& " "
next
str = str & s & vbcrlf
next
msgbox str
'不使用数组也可以
randomize
for i = 0 to 99
s = ""
for j = 0 to 99
s=s & fix(rnd * 10) & " "
next
str = str & s & vbcrlf
next
msgbox str
再问: 问下 怎么怎么保存到TXT文件去?
再答: randomize for i = 0 to 999 s = "" for j = 0 to 999 s=s & fix(rnd * 10) & " " next str = str & s & vbcrlf next set fso = createobject("scripting.filesystemobject") set f = fso.createtextfile("矩阵.txt") f.write str f.close
VB怎么写矩阵 需要一个1000*1000的矩阵 每一个格都是随机数 最后要保存到一个TEXT里面
矩阵乘法怎么算,保存在一个2*2的矩阵中
matlab里面如何将每次计算得到的数据(一个数)保存在矩阵中
lingo怎么输出矩阵,用@text输出的话就把矩阵的内容排成一个向量输出了
一个化到最后的阶梯行矩阵:
matlab中怎么把一个行向量保存到一个矩阵的任意一行?我现在有K个行向量,想依次保存在一个矩阵中怎么办?
在MATLAB里面怎么求一个矩阵的大小
请问用MATLAB 怎么样这样一个矩阵:1.8行14列,且每个数字都是0到14的随机数 2.每一行 除了0以外,互不
用VB 写程序,建立一个五行五列的魔方矩阵
怎么设计一个VB随机数,要9位随机数,其中要包括0到9十个数字和26个大写的英文字母,
求VB编程:给一个5*5的矩阵赋值,要求矩阵副对角线上方元素都是偶数,副对角线和它下方元素都为奇数.
线性代数的矩阵求法线性代数中,关于一个矩阵的K次方,怎么运算,怎么把K乘到矩阵里面去啊 ,符号又是怎么变得呢?还有关于一