| 会员登录 立即注册
关注公众号

关注公众号拿干货

CATIA论坛公众号
加入联盟

扫微信(sakula)入联盟

CATIA软件
风格切换

catia教程

搜索

CATIA联盟论坛

[CATIA VBA] CATIA二次开发专题:如何批量修改装配下层物料名称

[复制链接]
CATIA正版多少钱 发表于 2019-8-15 13:53:09 | 显示全部楼层 |阅读模式
CATIA正版多少钱
2019-8-15 13:53:09 1098 0 看全部
  CATIA二次开发专题:如何批量修改装配下层物料名称

  假设oProduct为根目录产品,将下层的产品的零件编码与根产品零件编码保存一致,并添加上流水编号。比如,根产品为SMART3DE.Prodcut,下层物料为SMART3DE-00001,SMART3DE-0002...................SMART3DE-000N。

  下面展示核心代码:

  获取根产品零件编码
  oFatheroProductPartNumber=oProduct.PartNumber
  Dim products2 As Products
  Set products2=oProduct.Products

  获取下层物料数量
  N=products2.Count
  Dim ChildProduct As Product

  循环下层物料
  For i=1 To N
  Products2.Item(i).PartNumber=oFatheroProductPartNumber&"-"&i
  Next
  msgbox Products2.Item(i).PartNumber

  ---------------------------END--------------
  VB知识扩展:

  程序结构——循环结构

  循环结构是指对同一程序段重复执行若干次,被重复执行的语句块称为循环体。循环体的执行与否以及次数多少视循环类型和条件而定。VB中常用的循环语句有For…Next语句和Do…Loop语句。For…Next循环用于已知循环次数的情况下,而Do…Loop循环主要用于不知道循环次数的情况下,在给定的条件满足时执行循环体。
  For…Next循环
  Do...Loop循环
  循环的嵌套

CATIA二次开发专题:如何批量修改装配下层物料名称65

  For…Next循环

  For循环的语法格式如下:

  For循环变量=初值To终值[Step步长]

  [循环体]

  Next[循环变量]

  For…Next循环简称For循环。如果知道循环要执行多少次时,就可以使用For循环。For循环使用一个循环变量(计数器)控制循环体的执行次数。每执行一次循环之后,循环变量的值就会自动增加或者减少。

  格式说明:

  循环变量:必须为数值型。For和Next关键字后面的循环变量必须相同。

  初值和终值:均为数值型,可以是数值表达式。

  步长:数值型,可以是数值表达式,默认值为1。若步长为正数,应设初值≤终值;若步长为负数,应设初值≥终值,否则循环体不会被执行。步长不应为0,否则程序将陷入无限循环(死循环)。

  循环体:在循环中被执行的语句块。若循环体中无语句,则为空循环。在循环体中可根据条件加入Exit For语句强制退出循环。Exit For通常出现在选择结构中。

  循环实例:

  【例】编制程序,计算1+2+3+...+200的整数和。在窗体上放置一个命令按钮,编写如下代码:
  Private Sub Command1_Click()
  Dim Sum As Integer,i As Integer
  Sum=0
  For i=1 To 200
  Sum=Sum+i
  Next i
  Print"1+2+...+200="&Sum
  End Sub
CATIA论坛官方公众号
  • 您可能感兴趣
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则 返回列表

查看:1098 | 回复:0

CATIA教程| CATIA视频| CATIA培训| CATIA下载| CATIA安装| CATIA插件| CATIA入门| CATIA V5| CATIA V6| CATIA论坛
联系电话:18982019507 地址:成都市青羊区二环路西一段155号天祥广场4栋1801
版权所有 ©软易达 •( 蜀ICP备14018086号 )Copyright © 2001-2013 Comsenz Inc. All Rights Reserved.   Powered by Discuz! X3.4
联盟微信客服:
silhouette023CATIA软件


CATIA技术群

微信公众号 CATIA微信公众号
“CATIA联盟”