VBA如何读取昨天的数据并与今天新报上来的数据连接起来呢

lijun337

我想在AUTOCAD利用VBA快速画图，指标图，每天的数据指标直观图。

0 O. i9 N8 n& {$ j) ~9 e) l构思是这样的：今天输入一个数据值A点：（0，12。45，0）（12。45米就是报上来的原始记录数据）与前天的点连接起来，第二天报上B点：（0，13。27，0））（13。27米就是第二天报上来的原始记录数据），再与A点连接起来！


& ~. @3 R2 }& G' y% D" t0 W
# \% s  p4 {- P# i三个TEXT文本框（月、日、今天报上来的数据）输入月日和报上来的数据后，直接在图上显示出来，第二天再如此继续下去。

( e/ X; U* @6 U0 t' \+ X" X' y

但是，VBA如何读取昨天的数据并与今天新报上来的数据连接起来呢？

wenwengg

将LASTPOINT坐标值保存到USERR1-3
1 _, r! |+ A! p( {: ]7 S+ gType: 3D-point
Saved in: Not-saved
1 Q3 a2 q& q$ K7 n. W. @8 fInitial value: 0.0000,0.0000,0.0000

( n% `1 u9 z9 e/ z2 P( R9 TStores the last point specified, expressed as UCS coordinates for the current space.
% y, |8 t6 N7 e
; m! b$ a" b7 MYou can reference the last point by entering the at symbol (@) at a point prompt.
1 c  ~, B* h3 O6 Y/ z; k3 @9 o
' Q1 ^! d- s8 k
'Type: Integer
/ O( Y" k1 Y0 y7 h'Saved in: Drawing
'Initial value: 0
) i' u0 X) p+ s" C4 Z7 h
8 b7 {- G; t) `9 u  Y, I9 V. L'Provides storage and retrieval of integer values.

'There are five system variables: USERI1, USERI2, USERI3, USERI4, and USERI5.

'Type: Real
'Saved in: Drawing
'Initial value: 0.0000
+ _" \# x" t6 S# s, K3 U
'Provides storage and retrieval of real numbers.
  _* l+ U% V- y( p
'There are five system variables: USERR1, USERR2, USERR3, USERR4, and USERR5.

[ 本帖最后由 wenwengg 于 2010-4-21 15:50 编辑 ]

SCPHBSZ

这个是不是二次开发啊？ARX？