学了LINGO才2天别笑我写的东西，求助接口指针写法。

cqwj

0 X2 x7 x6 M7 }+ n指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
, Y9 e! v$ H4 g- k表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
# P0 O6 t7 d" E" T$ u  a:) sets:
! i+ \' g" y( x$ X% R: k; O7 ~xinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
endsets
/ g8 A! ]1 Q0 k( Sdata:
& s  `. ~' ]/ P6 ]xinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
@TEXT()=@status();
7 Q( B, M9 L) z$ x& ienddata
[bb] min=@sum(xinxi:sj190*x+sj160*y+sj270*z);
@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)<=12);
+ E6 `; P3 |7 m# s4 ?+ v@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
@sum(xinxi:x)=sr190;
  F( z  ~) O' Y8 n: }$ j, O@sum(xinxi:y)=sr160;
@sum(xinxi:z)=sr270;
8 ]- Y( L* \1 Y@sum(xinxi:x)>=0;
@sum(xinxi:y)>=0;
& E2 o8 f3 x  j3 ^+ M  \8 P& w@sum(xinxi:z)>=0;
+ i5 s7 R+ W6 k3 N& ~0 m@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
@for(xinxi(i):x(i)>=0);
@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
@for(xinxi(i):y(i)>=0);
@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
! I* u4 u, R; `! z@for(xinxi(i):z(i)>=0);
9 g6 B0 |: R- N1 t9 `. p; M@for(xinxi(i):@gin(x(i)));
@for(xinxi(i):@gin(y(i)));
* x1 W3 [" r! l# ^+ p8 h% p9 d) Z@for(xinxi(i):@gin(z(i)));
8 ]0 ]6 Z, k1 X! h! p: g0 @7 Nmm=@sum(xinxi:k);
% d3 J8 s' @$ s0 p5 `) \* Nxx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;

@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
DATA:
    @POINTER
1 O! a. `! Z! d; o+ S. {9 E; f
5 G, g1 c, T2 s/ `7 Q* z: n!此处结果想连接VB6.0，却不知道怎么写;
5 t5 L% P5 G, x2 o% _ENDDATA
* r# n+ y; a! O- P" D; K7 l
: N% ~/ V9 O7 Z1 J/ Oend
$ J( y4 a! \/ ?- D9 T3 r' P结果为 主要是想取 X，Y，Z的结果
& @( p/ k7 Y- V+ |" Z: ^Global optimal solution found.
' J% t& D1 ?3 d   Objective value:                              0.000000
   Extended solver steps:                               0
$ Y2 g, Y7 i6 A  @  S: j/ G   Total solver iterations:                             0


- T$ Y' P. e6 E! n$ t2 O8 z                0
2 N' N; B6 i5 P: }# h/ j
- e, a& d1 O) j2 v1 z9 p+ v                       Variable           Value        Reduced Cost
8 }0 c/ q  Q4 q+ W1 l$ v0 d4 R                          SR190        0.000000            0.000000
5 T( u4 t3 x3 s                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
                             MM        2.000000            0.000000
- M- ?- v  H- @! |: m9 a- F                             XX        0.000000            0.000000
; f- G7 ^' s2 W                  CL190( ZHANG)        35.00000            0.000000
) {. D+ M6 G" N" v- Q6 K                     CL190( LI)        35.00000            0.000000
                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
; B2 C/ O  w4 ~& h                  CL270( ZHANG)        5.000000            0.000000
, ?  S3 Z2 p  b7 z& O$ `; }4 D                     CL270( LI)        5.000000            0.000000
7 l3 g/ z5 t  K: s+ r                   GZSJ( ZHANG)        12.00000            0.000000
2 D. P' k' f3 u# O  Y                      GZSJ( LI)        12.00000            0.000000
  @1 @' M& H, M( u- Y8 F+ K+ q                  SL190( ZHANG)       0.9000000            0.000000
                     SL190( LI)       0.8000000            0.000000
                  SL160( ZHANG)       0.9000000            0.000000
) _0 ?- [) P) p  v% \% Q                     SL160( LI)       0.9000000            0.000000
, x- k9 O  i* \/ B( H2 p                  SL270( ZHANG)       0.8000000            0.000000
                     SL270( LI)       0.6000000            0.000000
) b) X) w# T; I, w" i                  SJ190( ZHANG)       0.3770000            0.000000
                     SJ190( LI)       0.4120000            0.000000
# Y) f  e( F: H: [, z  f9 R                  SJ160( ZHANG)       0.4400000            0.000000
                     SJ160( LI)       0.4400000            0.000000
                  SJ270( ZHANG)        2.880000            0.000000
                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
3 n* y( f0 S- c/ O                         K( LI)        1.000000            0.000000
9 }' m6 u7 |# y  O5 @                    ZYS( ZHANG)        0.000000            0.000000
                       ZYS( LI)        0.000000            0.000000
- I# S0 c. k9 N3 C2 E                      X( ZHANG)        0.000000           0.3770000
                         X( LI)        0.000000           0.4120000
                      Y( ZHANG)        0.000000           0.4400000
                         Y( LI)        0.000000           0.4400000
$ I! i2 K0 H9 y+ W* e5 K& e                      Z( ZHANG)        0.000000            2.880000
                         Z( LI)        0.000000            3.360000

                            Row    Slack or Surplus      Dual Price
                             BB        0.000000           -1.000000
                              2        12.00000            0.000000
                              3        12.00000            0.000000
& Z7 q6 A9 A& o1 }$ l                              4        0.000000            0.000000
& P0 V& t. m: d                              5        0.000000            0.000000
) a2 z* i& U) ~& p                              6        0.000000            0.000000
                              7        0.000000            0.000000
  h# L3 u! A  ?' E                              8        0.000000            0.000000
                              9        0.000000            0.000000
                             10        0.000000            0.000000
: s( _. q' X5 t$ @, N+ J# G                             11        0.000000            0.000000
                             12        31.50000            0.000000
                             13        28.00000            0.000000
; T  s" X( p" ]7 e8 T0 c                             14        0.000000            0.000000
                             15        0.000000            0.000000
0 B2 N; e$ v3 r) c                             16        27.00000            0.000000
                             17        27.00000            0.000000
                             18        0.000000            0.000000
& _% T2 G$ {0 ?3 q                             19        0.000000            0.000000
                             20        4.000000            0.000000
. B* t1 Y! \" e                             21        3.000000            0.000000
6 \8 r/ x4 h- K& Q0 M                             22        0.000000            0.000000
                             23        0.000000            0.000000
                             24        0.000000            0.000000
, H" v' l) H7 E4 r) m                             25        0.000000            0.000000
; U+ R" k' R3 A9 k+ N4 a- n/ c                             26        0.000000            0.000000
                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

点击文件名下载附件
下载积分: 体力 -2 点

cqwj

回复 3# olh2008
4 Q5 ?2 k, m* Y9 @- U

    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

这是什么意思？

legan

谁会LINGO与C++的混合编程啊，我想用C++的循环调用LINGO编的程序进行复杂的优化类问题计算

funintears

lingo可以和c++混合编程呀？！厉害，牛人指导下呀！！！

haoshuang3394

lingo怎么用啊，看着代码挺怪的？

风云雨哲

请教高手Ｌｉｎｇｏ的使用。请教高手Ｌｉｎｇｏ的使用。

cqwj

LINGO的代码很简单，相当于命令格式，但是要灵活运用的话也不简单。