VB程序员博客

为什么我下过来后  运行扫描C盘  时卡住 出现  错误？

试了好几次都这样

附件上传了  大家看看啥问题

头一次死在MakeStartReporting
第二次在CalcFileNow

第三次没找到原因

不过这个为什么会导致出错？？

Sub CalcFileNow()
    nFile = 0
    nInfect = 0
    nRepair = 0
    nCalcFiles = 0
    Dim strPath As String
    Dim extNow As String
    strPath = FixPath(frmMain.txtLocation.Text)
    strSavePath = strPath & "…"
    extNow = Left$(frmMain.cboExt, 5)
    If frmMain.optAllFiles.Value = True Then
        PathExt = vbAllFiles
        SearchFile strPath
    Else
        UseFileSpec = True
        FileSpec = extNow
        PathExt = FileSpec
        SearchFile strPath
        UseFileSpec = False
    End If
End Sub

只知道SMP是对称多处理器。学习我扫描C盘出现了  错误
上图为什么无法上图片？？？

各位高手，最近我编了一个简易的浏览器，用到了combobox 我想在实现输入字符下拉列表即自动出现以前输入过的匹配的项
当在下拉列表中选中它时自动浏览指定网页，请高手指教，谢谢了~~~~Public Declare Function SHAutoComplete Lib "Shlwapi.dll" (ByVal hWndEdit As Long, ByVal dwFlags As Long) As Long
Public Enum SHAC_Constants
    Default = &H0
    FileSystem = &H1
    UrlHistory = &H2
    URLMRU = &H4
    URLAll = (&H2 Or &H4)
End Enum

对于你的问题这样既可。注意，组合框的hWndEdit不是组合框的句柄，而是组合框中的类名为edit句柄。
如果要实现自定义资源，则需要实现自动完成接口还是不太懂啊~~
那具体该怎么写呢？请指教！！
怎么使用它 ，说详细点吧~~谢谢了用StrComp函数比较一下你正在输入的值（即combo1.text）跟combobox列表项之间存在什么关系？是相等，还是大于、小于列表项，根据不同有条件作出相应的处理（注意保存原始项目）。  怎么检查?是在change事件里吗? 还有要是相等了,怎么让下拉列表弹出?????

dim a() as string
redim a(0 to 0,0 to 1)
redim preserve a(0 to 10,0 to 1)
这样会报错。。说下标越界

如需要阅读该回复，请登录或注册

一般用一维数组，如果涉及到多个参数，我宁愿定义一个多变量的结构，再定义这个结构的一维数组明白啦。谢谢！！！

今年对我来说是非同寻常的一年,很多事让人记忆深刻~
希望2010一切顺心,快快乐乐~

祝大家虎年吉祥,平安幸福!同乐。<
看错了，是1分LZ同乐！！jf新年快乐…蹭蹭
新年快乐happy new year新年快乐新年快乐……新年快乐~新年快乐明年是寡妇年，争取抱得美人归。。新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！接<
祝大家 节日快乐新年快乐…jf 新年快乐 放假大家可以多睡个懒觉了新年快乐…~jF接分 快乐！09遇到过很多，不过都已经过去了新年新气象お新年、おめでとうございます。
oshinnen omedetou gozaimasu
接分来了新年快乐！普天同乐！HAPPY NEW YEAR!!!!!

文件目录如下 ,深度未知 ,搜索目标e: mpdb目录(包含子目录) 中不包含*.adb文件的上级文件名,例如00921
请用VB或批处理或DIR命令解析下,不胜感激

e: mpdb..
        00910.
              temp.adb
              database.db
              list.dat
        00921.
              description.db
              script.dat
        ……

vbs里调用file system object可以。
这句话没看懂
不包含*.adb文件的上级文件名,例如00921

<
再顶上去,,,继续等高手事实证明zhao4zhong1的代码是正确的,,我操作失误,,结贴给分,非常感谢:)

何为精华帖

这里的精华帖是指网友通过对帖子进行评价“对我有用”，从而让更多网友知道，达到分享的目的的帖子

规则：

1、网友使用帖子页中的评价，评价出的精华帖，评价前30名，且在被推荐帖中有回复，奖励20分可用分。

2、网友评价的精华帖阅读量最高，且被CSDN推荐到CSDN首页的“社区精华”“最新网摘”“程序人生”及社区首页的专题及焦点区（如图），奖励前10名（可视情况增加名额）帖主200分可用分+程序员杂志一本（不分期）

3、活动时间：2009年12月23日至2009年12月31日。

4、活动发分将于2010年1月8日前完成。

社区首页的专题及焦点区，如图

CSDN首页的“社区精华”“最新网摘”“程序人生”，如图

评价步骤：

在您认为精华的帖子内容右下角，点“对我有用”确定后即有机会获得奖励。

现在正在进行中的其它活动：

平安、圣诞 抢楼送祝福得可用分！sf…sfbd对我有用[]
呵呵 支持up哦接分。对我有用
yes~~恩 不错哈！顶起来啊 圣诞接分了不错 活动丰富啊顶  顶好sfbucuoha ,呵呵呵干脆送积分什么的得了。
每天都有个积分红包拿，岂不有意思些。每天回帖即可获得10分可用分！小技巧：教您如何更快获得可用分

这应该很有用把~~
<
分享了｀谢谢看看 谢谢了tks哦up 谢谢了分享来接分的看不懂是啥意思。zenmede，怎么参加可以得分？我没有分了祝福祝福  一大堆一大堆的祝福  吉祥如意  开开心心  快快乐乐今天放了个屁吧大家都逗乐了，希望大家开开心心

看不懂是啥意思。接分才是正道！！！up up up对我有用 送祝福了。今天是平安夜 我们这里流行晚上12点的时候吃苹果。顶了,看不懂jf来看看。接分。。。。。。。。。。。。。。。jf接分 评价我的吧 我都发了那么多帖子昨天怎么没看到呢？一大早就来了，接分吧50是不是真的啊，我很傻，会当真的！有用！jf继续支持观望楼主IDjfsfjf先接分jf不知道是在搞什么。jf 传说中每天回帖即可获得10分可用分！看完这个帖子之后我首先把楼主的“对我有用”点了一下，呵呵元旦快乐！！SFqfOH,my god!ding。。。。。。。。。。顶个 ，jfhao  ,wo ding 好，不错支持 顶起此帖不错的活动这个帖子算不算撒jfupup updingup  呵呵 什么啊呵呵  好的啊啊啊啊？？？？？？对我有用会不会有更多有收获啊，我一直点，不停的点Up接分来了~参于一下对我没有用来接分的~~good支持..接分JF这么多活动….
我咋才知道啊顶

dim a() as string
redim a(0 to 0,0 to 1)
redim preserve a(0 to 10,0 to 1)
这样会报错。。说下标越界

如需要阅读该回复，请登录或注册

一般用一维数组，如果涉及到多个参数，我宁愿定义一个多变量的结构，再定义这个结构的一维数组明白啦。谢谢！！！

今年对我来说是非同寻常的一年,很多事让人记忆深刻~
希望2010一切顺心,快快乐乐~

祝大家虎年吉祥,平安幸福!同乐。<
看错了，是1分LZ同乐！！jf新年快乐…蹭蹭
新年快乐happy new year新年快乐新年快乐……新年快乐~新年快乐明年是寡妇年，争取抱得美人归。。新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！新年快乐！！！！！！！！！！！接<
祝大家 节日快乐新年快乐…jf 新年快乐 放假大家可以多睡个懒觉了新年快乐…~jF接分 快乐！09遇到过很多，不过都已经过去了新年新气象お新年、おめでとうございます。
oshinnen omedetou gozaimasu
接分来了新年快乐！普天同乐！HAPPY NEW YEAR!!!!!

文件目录如下 ,深度未知 ,搜索目标e: mpdb目录(包含子目录) 中不包含*.adb文件的上级文件名,例如00921
请用VB或批处理或DIR命令解析下,不胜感激

e: mpdb..
        00910.
              temp.adb
              database.db
              list.dat
        00921.
              description.db
              script.dat
        ……

vbs里调用file system object可以。
这句话没看懂
不包含*.adb文件的上级文件名,例如00921

<
再顶上去,,,继续等高手事实证明zhao4zhong1的代码是正确的,,我操作失误,,结贴给分,非常感谢:)

何为精华帖

这里的精华帖是指网友通过对帖子进行评价“对我有用”，从而让更多网友知道，达到分享的目的的帖子

规则：

1、网友使用帖子页中的评价，评价出的精华帖，评价前30名，且在被推荐帖中有回复，奖励20分可用分。

2、网友评价的精华帖阅读量最高，且被CSDN推荐到CSDN首页的“社区精华”“最新网摘”“程序人生”及社区首页的专题及焦点区（如图），奖励前10名（可视情况增加名额）帖主200分可用分+程序员杂志一本（不分期）

3、活动时间：2009年12月23日至2009年12月31日。

4、活动发分将于2010年1月8日前完成。

社区首页的专题及焦点区，如图

CSDN首页的“社区精华”“最新网摘”“程序人生”，如图

评价步骤：

在您认为精华的帖子内容右下角，点“对我有用”确定后即有机会获得奖励。

现在正在进行中的其它活动：

平安、圣诞 抢楼送祝福得可用分！sf…sfbd对我有用[]
呵呵 支持up哦接分。对我有用
yes~~恩 不错哈！顶起来啊 圣诞接分了不错 活动丰富啊顶  顶好sfbucuoha ,呵呵呵干脆送积分什么的得了。
每天都有个积分红包拿，岂不有意思些。每天回帖即可获得10分可用分！小技巧：教您如何更快获得可用分

这应该很有用把~~
<
分享了｀谢谢看看 谢谢了tks哦up 谢谢了分享来接分的看不懂是啥意思。zenmede，怎么参加可以得分？我没有分了祝福祝福  一大堆一大堆的祝福  吉祥如意  开开心心  快快乐乐今天放了个屁吧大家都逗乐了，希望大家开开心心

看不懂是啥意思。接分才是正道！！！up up up对我有用 送祝福了。今天是平安夜 我们这里流行晚上12点的时候吃苹果。顶了,看不懂jf来看看。接分。。。。。。。。。。。。。。。jf接分 评价我的吧 我都发了那么多帖子昨天怎么没看到呢？一大早就来了，接分吧50是不是真的啊，我很傻，会当真的！有用！jf继续支持观望楼主IDjfsfjf先接分jf不知道是在搞什么。jf 传说中每天回帖即可获得10分可用分！看完这个帖子之后我首先把楼主的“对我有用”点了一下，呵呵元旦快乐！！SFqfOH,my god!ding。。。。。。。。。。顶个 ，jfhao  ,wo ding 好，不错支持 顶起此帖不错的活动这个帖子算不算撒jfupup updingup  呵呵 什么啊呵呵  好的啊啊啊啊？？？？？？对我有用会不会有更多有收获啊，我一直点，不停的点Up接分来了~参于一下对我没有用来接分的~~good支持..接分JF这么多活动….
我咋才知道啊顶