Nothing

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

Nothing

将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

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