乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
楼主: Jeff_M

我是什么空间?

[复制链接]

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2008-7-18 18:53:38 | 显示全部楼层
对的
回复

使用道具 举报

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2008-7-18 19:26:34 | 显示全部楼层
我发现更容易将getblock函数设置为布尔函数
If not getblock(“UES”)然后转到InsertBlock设置b=thisdrawing。块(“UES”)
回复

使用道具 举报

10

主题

973

帖子

909

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
118
发表于 2008-7-21 15:21:47 | 显示全部楼层
好的,我想我知道我需要做什么,但想知道是否有更好的方法 下面的代码检查dwg中的字体,包括来自外部参照的字体 下面引用的文本在我的文本文件中;“审计”;你可以看到3D-TTL-B一直被发现是错误的 所以我试着使用一个通配符*|,但也失败了(我本以为会,但希望如此) 所以我;思考;我应该使用Instr()检查|&引用;字符,并使用字符串末尾的下一个字符进行检查 有更好的方法吗?或者我走对了吗
  1.       For Each objFont In ThisDrawing.TextStyles
  2.             Select Case UCase(objFont.Name)
  3.             Case "STANDARD"
  4.             Case "*|STANDARD"  ' eval if xrefed
  5.             Case "TEP"
  6.             Case "TEP-TITLE"
  7.             Case "TEP-TITLE 3-16"
  8.             Case "TEP-TITLE 1-8"
  9.             Case Else
  10.                         MyFile.writeline vbTab & objFont.Name & vbTab & objFont.fontFile
  11.                         KillDaFile = True
  12.             End Select
  13.       Next objFont
回复

使用道具 举报

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2008-7-21 15:22:25 | 显示全部楼层
顺便说一句,肖特,你说得很对,它完美地解决了我的问题
回复

使用道具 举报

10

主题

973

帖子

909

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
118
发表于 2008-7-21 15:30:20 | 显示全部楼层
嗯?我们'我从'我是什么空间;至'审计#039;场景……你一开始到底想做什么?
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-4 10:04 , Processed in 0.852655 second(s), 60 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表