搜索
编程论坛 → 开发语言 → 『 VB6论坛 』 → [求助]获取随机字符到text1
标题：[求助]获取随机字符到text1
只看楼主
横山居石
Rank: 2
等　级：论坛游民
帖　子：36
专家分：13
注　册：2009-6-22
结帖率：87.5%
楼主
 已结贴√  问题点数：20 回复次数：7 
[求助]获取随机字符到text1
现有一个1.txt文件内容为

1.盯万夫不
2.腥气埂睦
3.枯超大型
4.夺一夺取
5.万魂牵当
6.老于世故
 
要怎么随机取一段到text1.text中,代码怎么写
搜索更多相关主题的帖子: 字符　随机　获取　
2010-10-19 15:06
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8
第 2 楼
 得分:3 
你怎么写的？

无知
2010-10-19 20:16
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等　级：贵宾
威　望：66
帖　子：1310
专家分：5312
注　册：2009-2-26
第 3 楼
 得分:3 
先创建一个edit窗口，在把文件加载到edit里，后用EM_GETLINE取得行文本。
2010-10-19 21:40
jiashie
Rank: 8Rank: 8
等　级：贵宾
威　望：10
帖　子：237
专家分：999
注　册：2009-4-30
第 4 楼
 得分:3 
以下是引用bczgvip在2010-10-19 21:40:06的发言：

先创建一个edit窗口，在把文件加载到edit里，后用EM_GETLINE取得行文本。

呵呵，估计又得问EM_GETLINE是什么了，牵扯出sendMessage，然后讲API，再讲windows消息机制。。循序渐进，是个好老师。

把文件中的每一行内容读到一个数组中，然后对数组下标取随机数，取出相应的元素。
2010-10-20 08:37
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等　级：贵宾
威　望：66
帖　子：1310
专家分：5312
注　册：2009-2-26
第 5 楼
 得分:0 
嘿嘿，好老师，给段代码吧！
2010-10-20 13:11
卡卡希比
Rank: 5Rank: 5
等　级：贵宾
威　望：16
帖　子：2283
专家分：189
注　册：2007-7-1
第 6 楼
 得分:3 
.....此贴灌水

PLEASE FLUSH AFTER USE!
2010-10-20 16:50
zhuiis
Rank: 4
等　级：业余侠客
威　望：1
帖　子：201
专家分：286
注　册：2008-11-8
第 7 楼
 得分:3 
dim Str as string
Str=Edit.txt
Edit.txt=""
FOR I=0 TO UBOUND(Str,VBCRLF)-1
Edit.seltext=split(Str,vbcrlf)(i) & "" & Rnd()*10+1 & vbcrlf
NEXT I

以上实例是在编辑框中的内容，每行的后面追加 1 到 10 的随机数
2010-10-20 19:25
不说也罢
Rank: 13Rank: 13Rank: 13Rank: 13
等　级：贵宾
威　望：39
帖　子：1481
专家分：4989
注　册：2007-10-7
第 8 楼
 得分:3 
以下是引用Artless在2010-10-19 20:16:42的发言：

你怎么写的？





===================================================
讨厌C#的行尾的小尾巴;和一对大括号{ }
===================================================
2010-10-20 19:29



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




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

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