回复:WinCC、Excel、VBA、脚本、连通性软件包实例怎么没有数据

zhangli0

版主 西门子1847工业学习平台

  • 帖子

    17128
  • 精华

    63
  • 被关注

    887

论坛等级:至圣

注册时间:2003-06-06

钻石 钻石 如何晋级?

发布于 2016-01-18 09:51:52

1楼

那就说明你的指针是在记录的最后,你把判断是否在最后的条件删除,直接:

 oRs.MoveFirst

        i = 0

        Do While Not oRs.EOF

        Sheet1.Cells(i + 4, 2) = oRs.Fields("RealValue").Value

        oRs.MoveNext

        i = i + 1

        Loop

        oRs.Close


活到老,学到老!为了生活学习吧!
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32564条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。