# 请多用点想像力哦

Posted by 笋子 on December 03, 1998 at 01:15:10:

In Reply to: 拜托~~~救救我!!!!! posted by vb新手~ on December 02, 1998 at 16:12:07:

: 我要用common Dialog来做开启旧档~~我要开启的是
: 不知道要怎么改~~~请高手们教教我吧
: Private Sub open_Click()
: common.Filter = _
: "text(*.txt)|*.txt"
: common.ShowOpen
: Text1.Text = common.ShowOpen
: End Sub
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
'此时你可以用 Line Input 读取一行，或是用 Input
'来读取一笔资料。
Do While Not EOF(1)
Line Input #1 ABC$
'读取第一行资料给 ABC 字串变数中
Loop
笋子刚碰到CommonDialog要开档或写档的时候，也是因为
烂书所害，因为每本书都写
Open "c:\123.bat" For Input As #1
^^^^^^^^^^^^-->绝对路径
，所以试了半天，用了一点想像力，才试了出来，唉，笋
子手上有8本vb的书，这些书的作者完全没想到 vb 的初
学者跟本不知道该如何去用...归纳起来，写程式要有想
像力哦，cww、小吴，您说是吗~~~浅见..浅见...

Follow Ups:

- Re: 请多用点想像力哦 尧仔 13:09:35 12/03/98 (0)
- 呜...我就是没有想像力才走这一行的... 小吴 08:45:54 12/03/98 (1)
  - 那请问小吴是怎么学好 VB 的哩，给大家来个经验谈:) 笋子 18:34:17 12/03/98 (0)