找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 813|回复: 8

[VBA程序]:出现一些乱码

[复制链接]
发表于 2003-4-2 22:18:12 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
acadobj.ActiveDocument.Utility.GetEntity returnObj, basePnt, "请选择等高线,退出按esc键"
toph = acadobj.ActiveDocument.Utility.GetString(0, "请输入新高程:")
当执行的时候,cad命令行会出现下面的乱码(而不是"请选择等高线,退出按esc键")
,应该是出现的字体不是中文的把
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2003-4-2 22:37:05 | 显示全部楼层
试一下这如何?
thisdrawing.utility.getentity returnObj, basePnt, "请选择等高线,退出按esc键"
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-4-2 23:33:12 | 显示全部楼层
和我的有区别吗?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-4-3 08:00:00 | 显示全部楼层

Re: [VBA程序]:出现一些乱码

最初由 xsquan 发布
[B]acadobj.ActiveDocument.Utility.GetEntity returnObj, basePnt, "请选择等高线,退出按esc键"
toph = acadobj.ActiveDocument.Utility.GetString(0, "请输入新高程:")
当执行的时候,cad命令行会出现下面的乱码(... [/B]

改成这样试一下:
acadobj.ActiveDocument.Utility.GetEntity returnObj, basePnt, vbcrlf & "请选择等高线,退出按esc键"
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-4-3 09:19:53 | 显示全部楼层
还是那样,不行,情况是:当前的命令行是乱码,当执行别的命令,刚才那个命令行在记录里显示的又是正常的,我记得以前acadobj.ActiveDocument.Utility.GetString(0, "请输入新高程:")这样的命令也有,后来我把字的个数减少了,就好了,但现在这个怎么样减少也不是很好,不知道你们有没有这样的问题!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-4-3 11:12:37 | 显示全部楼层
最初由 xsquan 发布
[B]还是那样,不行,情况是:当前的命令行是乱码,当执行别的命令,刚才那个命令行在记录里显示的又是正常的,我记得以前acadobj.ActiveDocument.Utility.GetString(0, "请输入新高程:")这样的命令也有,后来我把字的个... [/B]


改成这样试一下:
acadobj.ActiveDocument.Utility.GetEntity returnObj, basePnt, vbcrlf & "请选择等高线,退出按esc键" & vbcrlf
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-4-3 14:17:05 | 显示全部楼层
我知道你的意思了,谢谢,可以了,
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 181个

财富等级: 日进斗金

发表于 2003-4-3 18:47:23 | 显示全部楼层
在提示语句中同时使用了中文的标点符号和英文的字母,字母的个数为奇数时就会出现字符串长度不匹配的现象。最好在使用标点符号时采用英文的,以免出现乱码。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-4-6 16:12:13 | 显示全部楼层
多谢斑竹帮忙!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

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

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-12-23 11:08 , Processed in 0.412463 second(s), 47 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表