Office中国论坛/Access中国论坛

标题: 关于数组和非数组的处理 [打印本页]

作者: huangyz_xy 时间: 2010-9-14 19:02
标题: 关于数组和非数组的处理
本帖最后由 huangyz_xy 于 2010-9-17 10:01 编辑

在选择文件的时候可以进行多选和单选,那么有一个问题,如果是多选的话就按照数组的语句执行,如果是单选的话同样要执行,怎么办?
If IsArray(strInputFileName) Then
      For J = 0 To UBound(strInputFileName)
         filename = strInputFileName(J)
      file(J) = filename
      hfile(J) = FreeFile
      Open file(J) For Input Access Read Shared As hfile(J)
Do While Not EOF(hfile(J))
      .
      .
      .
loop
next j
endif
以上语句能执行选择的超过两个以上的文件,但是单个文件就不执行!我现在需要的是如果值选择一个文件,同样能执行,怎么办,请高手指点!

作者: tmtony 时间: 2010-9-14 20:49
可以在IF条件加个 or 把单个的情况加进去

作者: huangyz_xy 时间: 2010-9-14 22:35
这样好像不行吧,后面怎么识别啊?

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)