今天突然翻到自己前年写给电脑报的文章，纠正他报上程序错误的。竟然没被发，今天发到大富翁，(200分)

现在已经把VB语法忘记一干二净<br>&nbsp; 我发过去后编辑告诉我，一个月后肯定会给我消息，但后来竟然没法，虽说是个小问题<br>但作为全国也算是权威性的报纸，这样做是误人子弟，看来编辑没有审过发表的程序（当写到这句话时候，突然想起电脑<br>报主页会有论坛么？）<br>大家请看，（以前主页已经被取消了，要收费了，主题不是编程的，是道教内容）<br><br>贵报2001年1月1日第一期软体世界编<br>程乐园中重庆杜伟先生所投稿的“公用对话框控件的应用”一<br>文中存在一个小问题。杜先生在范例中将vb通用对话框的 name<br>属性设置为cd。用 if cd.filename="" then来判断用户单击<br>“取消”按钮。此法存在一个bug。就是再次点击“打开文件”<br>按钮，出现打开文件通用对话框，用户如果点击“取消”，程<br>序仍然认为用户点击了“确定”。怎么消除这个bug？<br>&nbsp; cd.filename="" 在通用对话框打开前强制文件名为空 <br>&nbsp; cd.showopen &nbsp; <br>&nbsp; 在通用对话框打开前强制文件名为空, 问题好象是解决了，<br>但是如果用户选中一个文件，点击“取消”的话，程序还是<br>要执行点击了“确定”的过程。怎么才能真正判断用户在通用<br>对话框立点击了“取消”呢？贫道将程序修改如下:<br>&nbsp; &nbsp; Private Sub Command1_Click() &nbsp; &nbsp;' 设置“CancelError”为 True,用户点击取消时就会发生错误<br>&nbsp; &nbsp; CD.CancelError = True &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; '一出错就跳到行 errhandler<br>&nbsp; &nbsp; On Error GoTo ErrHandler &nbsp; &nbsp; &nbsp; &nbsp;'设置标志<br>&nbsp; &nbsp; CD.Flags = cdlOFNHideReadOnly &nbsp; '隐藏对话框中“以只读方式打开”复选框<br>&nbsp; &nbsp; CD.Filter = "文本文件|*.txt|所有文件|*.*" &nbsp; '设置过滤器<br>&nbsp; &nbsp; CD.FilterIndex = 1 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;'指定缺省的过滤器<br>&nbsp; &nbsp; CD.ShowOpen &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;' 显示打开文件对话框<br>&nbsp; &nbsp;MsgBox "你选择打开的文件是:"&amp;cd.filename' &nbsp; &nbsp;'显示选定文件的名字<br>&nbsp; &nbsp; Exit Sub<br>&nbsp; &nbsp;ErrHandler：<br>&nbsp; '用户按了“取消”按钮，退出过程<br>&nbsp; &nbsp;Exit Sub<br>&nbsp; &nbsp;End Sub<br><br>&nbsp; &nbsp; 杜先生肯定也注意到了CancelError这个属性，而<br>且将这个属性在属性框设置为false。因为CancelError<br>为true的话，无论何时选取“取消”按钮，均产生 32755<br>&nbsp;(cdlCancel) 号错误。对于所有公共对话框调用时都是以<br>在显示对话框时捕获错误，以此检测是否按了“取消”按钮。<br>不过话说回来，这还是微软设计的不周。谁会想到这么来检<br>测按了“取消”按钮呢？贫道也是看vb5所带的联机手册才知<br>道的。贫道现在改用delphi了，在delphi中调通用对话框很方<br>便，就拿上面那个例子来说。在窗体上放一个打开文件的对话<br>框控件，默认名为opendialog1<br><br>if opendialog1.Execute then<br>showmessage('你所打开的文件是'+opendialog1.filename);<br>end;<br><br>&nbsp; &nbsp; 就这么简单一切都是自动的。当然vb的好处也不少，上手快，<br>编程速度快，现在很多多媒体演示软件都是vb编的。乘此机会打<br>个广告 : 欢迎来和贫道辩论vb很delphi的优缺点，贫道的主页是http://fdo.126.com 邮箱firemonk@sina.com，oicq 306665 留<br>言，来信，聊天都欢迎。<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; <br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 2001-1-14 <br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 火龙子于李白故里

"贫道"???张三丰是你什么人？？？

真人什么东东都留着？服了！值得大家学习呀！

佩服佩服

火龙子于李白故里?<br><br>李白故里是哪里？

张三丰可能是他大哥[][]

李白故里，可能，是现在的俄罗斯境内吧？

什么叶？<br><br>忘了

to：Hecules,<br>李白故里，可能，是现在的俄罗斯境内吧？<br><br>那是郭沫若乱说的，说是在的碎叶。<br>有两个叫碎叶的地方 一就是你所说俄罗斯境内的碎叶还有一个碎叶在新疆，<br>2001年我在江油李白纪念馆住。李白的故里是江油。这是有考证的<br>不过现在教科书还没有改。现在省内一些地方教科书已经改了<br>只因为郭沫若是文学界权威，结果竟然当时没人反驳他。<br>&nbsp; &nbsp; <br><br><br>

电脑报里面的错误还少吗?我已经很多年不看那些东西了.

up

UP

<br>信不信由你：<br><br>《电脑报》创刊时是由我门系和重庆市科委合办的，那时我还很小，只有21岁，<br><br>在读大四！嘻嘻！！！<br>

若干年以前，我选择看电脑报<br>若干年以后，我选择Dfw.

竟然這樣?為什么不早點找他們?

2001年1月1日。唉，这种东西还留着它做什么啊。好汉不提当年勇。

[]

电脑报应该是www.yesky.com

<br>火龙真人：<br><br>&nbsp; &nbsp; 请问你是高母母还是辛肝炎？？？<br><br>若都不是则抱歉！<br>

有意思！<br><br>能写稿，敬佩！