编程开发论坛 - Powered by Discuz! Board

标题: 新手问几个问题 [打印本页]

作者: zhuozxcv11 时间: 2006-1-31 20:20 标题: 新手问几个问题

1。如果想实现从文本里随即掉写字到TEXT文件里（这些是很多打字游戏都用上的）我该怎么实现，能写个原代码不。
2.Winsock这个控件哪里找的到。

作者: Nothing 时间: 2006-2-3 12:49

2、Winsock 控件叫 Microsoft Winsock Control 控件
1、因为字母的ASCII的值在65到90之间(大写，小写在97到122之间)，所以可以使用随机数，然后转成字符即可。
例如下面的代码
Randomize Timer
Text1.Text = Chr(65 + Rnd * 26)

作者: zhuozxcv11 时间: 2006-2-4 19:52

我该怎么调文本里得字啊比如我要调用"f:123.txt"里面得随即字该怎么写
谢谢咯

作者: Nothing 时间: 2006-2-4 20:52

将f:123.txt里的内容读到字符串里，然后使用len函数得出字符串长度，用随机数和mid函数即可得到字符串
例如
open "f:123.txt" For Input As #1
Do While Not EOF(1) ' 循环至文件尾。
Line Input #1, TextLine ' 读入一行数据并将其赋予某变量。
tt=tt+TextLine
Loop

Clost #1
alen=len(tt)
Randomize Timer
Text1.Text = mid(tt,int(rnd * alen)+1,1)

作者: Nothing 时间: 2006-2-4 20:54

看你的水平，强烈建议你把所有VB的函数都看三遍，再决定如何学习VB。
看看这个，也许对你有帮助。
http://www.lihuasoft.net/bbs/viewtopic.php?t=471

欢迎光临编程开发论坛 (http://bbs.lihuasoft.net/)