for each 遇到的问题

2009-07-02 04:10:19 77 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

CMN-700组件全解析：从XP路由器到HN-F主节点的实战配置指南本文深入解析Arm CMN-700片上网络IP的核心组件与实战配置。重点剖析了XP网格路由器的拓扑规划与CHI通道管理，以及HN-F全一致性主节点在维护缓存一致性、管理SLC和地址映射中的关键作用。通过一个12×12网格的配置案例，为硬件工程师提供了从组件布局、地址映射到性能调优的系统级设计指南。阅读详情



Private Type CFSReceivingdata

     SO As String

     KGS As Integer

     CBM As Single

     Yn As Boolean

     rwindex As Integer

End Type

Private CFSRecedata(50000) As CFSReceivingdata



..............

..............

 With TagSheet

       For Each rwobj In .Rows

           Dim cfsobj As CFSReceivingdata

           cfsobj.SO = Trim(.Cells(rw, 1).Text)           

           cfsobj.KGS = CInt(Trim(.Cells(rw, 12).Text))

           cfsobj.CBM = CSng(Trim(.Cells(rw, 11).Text))

           cfsobj.Yn = False

           cfsobj.rwindex = rw

           CFSRecedata(i) = cfsobj

           rw = rw + 1

           i = i + 1

       Next

  End With



'Error message is :

'For each may not be used on array of user-defined type or fixed-length string



  for each obj in CFSRecedata   '<---CFSRecedata 被加亮



     ..........

     ..........

  next 



请朋友纠正并指出出错的原因