标题:(弱智问题)我是新手,什么都不懂,以下功能如何实现
只看楼主
121038
Rank: 1
等 级:新手上路
威 望:2
帖 子:414
专家分:0
注 册:2005-8-3
 问题点数:0 回复次数:3 
(弱智问题)我是新手,什么都不懂,以下功能如何实现
先定义个变量为a,a = 取随机数 1-401的随机数,然后取得一个文件中的一串数据,数据的地址在(a-1)*69814+1,取出的长度为69814个字节

这怎么做??
搜索更多相关主题的帖子: 弱智 随机数 变量 
2006-02-09 16:58
121038
Rank: 1
等 级:新手上路
威 望:2
帖 子:414
专家分:0
注 册:2005-8-3
得分:0 
还有一个问题,定义一个数组变量,然后打开一文本文件,以每个 回车 作为分割点把文本分割成N份放在那个变量中

这怎么做

[此贴子已经被作者于2006-2-9 17:03:40编辑过]


2006-02-09 16:59
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
得分:0 

[QUOTE]先定义个变量为a,a = 取随机数 1-401的随机数,然后取得一个文件中的一串数据,数据的地址在(a-1)*69814+1,取出的长度为69814个字节[/QUOTE]

1.随机数用 Rnd 函数, a = Rnd(Int(401)) * 401,读取文件用 Open 文件名 For Binary As #1,用 Put #1, (a-1)*69814+1, byteBuf 来获取数据。

2. 写入某文件用 Open 文件名 For Output As #1,输出数据用 Write #1, 输出的文本
分隔数组变量用 str = Split(数组,分隔符(换行符是 vbNewLine))

[此贴子已经被作者于2006-2-9 19:59:51编辑过]

2006-02-09 19:57
121038
Rank: 1
等 级:新手上路
威 望:2
帖 子:414
专家分:0
注 册:2005-8-3
得分:0 
以下是引用leon2在2006-2-9 19:57:00的发言:

先定义个变量为a,a = 取随机数 1-401的随机数,然后取得一个文件中的一串数据,数据的地址在(a-1)*69814+1,取出的长度为69814个字节


1.随机数用 Rnd 函数, a = Rnd(Int(401)) * 401,读取文件用 Open 文件名 For Binary As #1,用 Put #1, (a-1)*69814+1, byteBuf 来获取数据。

2. 写入某文件用 Open 文件名 For Output As #1,输出数据用 Write #1, 输出的文本
分隔数组变量用 str = Split(数组,分隔符(换行符是 vbNewLine))




感谢死了,等我赚了钱一定请你!


2006-02-09 21:52



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-44929-1-1.html




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

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