| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 783 人关注过本帖
标题:记事本里的矩阵怎么赋给一个数组?
只看楼主 加入收藏
yanzechina
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2005-9-28
收藏
 问题点数:0 回复次数:2 
记事本里的矩阵怎么赋给一个数组?
我要在VB程序里读记事本里的矩阵(记事本里的内容只有一个矩阵),我想设一个数组和这个矩阵对应起来,比如说矩阵为
1  2.1   3
3  4    5
6  7   -8
数组为a(),我怎么将矩阵的值赋给这个数组呢?比如说把1赋给
a(1,0)。这个记事本文件应该怎样读入VB程序呢?
知道的朋友麻烦你说一下,我急着用啊。
搜索更多相关主题的帖子: 矩阵 记事本 
2005-09-28 14:23
luperfect
Rank: 1
等 级:新手上路
帖 子:65
专家分:0
注 册:2005-4-23
收藏
得分:0 
将记事本的数据先读出,可采用读字节的方式,或读文本的方式。前者,读出直接赋值,后者,要处理后,赋值。

2005-09-30 18:50
cosixu
Rank: 1
等 级:新手上路
帖 子:68
专家分:0
注 册:2004-10-11
收藏
得分:0 
Option Base 1
Private Sub Form_Click()
Dim a(80) As Integer
Dim t As Integer
i = 1
Open "D:\Microsoft Visual Studio\VB98\out.txt" For Input As #1
Do While Not EOF(1)
         Input #1, t
         a(i) = t
         i = i + 1
Loop
Close #1
n = i - 2
For j = 1 To n
    Print Tab(4 * j); a(j);
Next j
End Sub
2005-10-02 08:38
快速回复:记事本里的矩阵怎么赋给一个数组?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013743 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved