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

cqwj

2 F: L5 X1 k- \' U, m0 D4 r/ q指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
7 c+ L/ _8 o7 A! e:) sets:
xinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
endsets
2 U  o$ R. c# C/ V+ ]data:
xinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
@TEXT()=@status();
, }5 v  w) p2 y. O9 A, j9 n8 Wenddata
- k1 C$ ]: S' m7 P8 L0 v[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);
! m) T  b; I: Z0 h6 m@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
( C3 \$ U' b' F( e; N@sum(xinxi:x)=sr190;
@sum(xinxi:y)=sr160;
1 [% t/ T5 W3 v5 ?@sum(xinxi:z)=sr270;
( K: W5 C2 `: r5 h@sum(xinxi:x)>=0;
@sum(xinxi:y)>=0;
# m0 z# V! C! @; i' d5 I, B@sum(xinxi:z)>=0;
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
@for(xinxi(i):x(i)>=0);
@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
, W# ?0 j  X5 T  I% ^; N9 P! N@for(xinxi(i):y(i)>=0);
: Z, w2 D- y' K# O2 x- K@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
& _' A8 E+ j1 }# q' E$ p$ U@for(xinxi(i):z(i)>=0);
@for(xinxi(i):@gin(x(i)));
2 U4 \/ R5 r* T4 s@for(xinxi(i):@gin(y(i)));
' L4 V+ i# U: e5 @/ D6 Y@for(xinxi(i):@gin(z(i)));
mm=@sum(xinxi:k);
! t! x# b0 t& [/ ], K6 |xx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;
# S& g3 z4 f0 J% ~% {- I# k# o' k
@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
DATA:
    @POINTER

! x' u7 T2 o' A0 h  O. O!此处结果想连接VB6.0，却不知道怎么写;
ENDDATA

7 |' x: r1 P* G0 o0 Y0 o: Kend
8 Y# D8 Z5 i$ q: ^" R- e结果为 主要是想取 X，Y，Z的结果
Global optimal solution found.
  B# G4 @% T  C2 D' W; F$ J6 T8 _' r9 m   Objective value:                              0.000000
. s, r" O0 j7 l2 i1 w5 D  j   Extended solver steps:                               0
   Total solver iterations:                             0
- X8 G  e  b2 u* ?
. \. z5 ]& o% L; A3 K
5 b3 D# H8 l1 m3 c7 y                0

7 C$ h) F1 ~. Q% h  k                       Variable           Value        Reduced Cost
* v" [" D  c+ s7 _, g                          SR190        0.000000            0.000000
                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
7 p6 p( M4 P& S( W" m; E                             MM        2.000000            0.000000
, }6 q2 P4 U; c; z                             XX        0.000000            0.000000
                  CL190( ZHANG)        35.00000            0.000000
  g, l9 ]% v! j0 [/ q% o                     CL190( LI)        35.00000            0.000000
                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
) f+ E) x6 t" i6 ^$ f  b- }                  CL270( ZHANG)        5.000000            0.000000
                     CL270( LI)        5.000000            0.000000
) j+ i" C3 r1 W% _+ m+ B                   GZSJ( ZHANG)        12.00000            0.000000
                      GZSJ( LI)        12.00000            0.000000
                  SL190( ZHANG)       0.9000000            0.000000
- h, p4 c) L; b                     SL190( LI)       0.8000000            0.000000
" f$ X* G# l# D3 h6 b                  SL160( ZHANG)       0.9000000            0.000000
' d! u6 ?& @9 j9 ]; E# ]4 a* j                     SL160( LI)       0.9000000            0.000000
/ Y6 M. J; T6 I# ?  c  s3 U                  SL270( ZHANG)       0.8000000            0.000000
7 a4 |- O+ T% ]4 p; Z6 a                     SL270( LI)       0.6000000            0.000000
                  SJ190( ZHANG)       0.3770000            0.000000
                     SJ190( LI)       0.4120000            0.000000
, i3 q$ t) p( U                  SJ160( ZHANG)       0.4400000            0.000000
% k* J. c9 t, X                     SJ160( LI)       0.4400000            0.000000
                  SJ270( ZHANG)        2.880000            0.000000
$ |! X9 E# J& N8 a( P+ A: Q                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
' P. y# c/ J0 Q* |" ]; L                         K( LI)        1.000000            0.000000
  n9 r/ B+ K  L' [0 L* ~+ J# M                    ZYS( ZHANG)        0.000000            0.000000
8 Z. J. T9 m3 t2 O" f. m6 N                       ZYS( LI)        0.000000            0.000000
                      X( ZHANG)        0.000000           0.3770000
0 X+ g: i% V" B                         X( LI)        0.000000           0.4120000
! R/ @" V* d7 ^& c/ e# U9 K7 G% H0 p5 l                      Y( ZHANG)        0.000000           0.4400000
                         Y( LI)        0.000000           0.4400000
                      Z( ZHANG)        0.000000            2.880000
4 ]8 i) H! o0 @6 s6 K! |. d/ q) S                         Z( LI)        0.000000            3.360000

                            Row    Slack or Surplus      Dual Price
  k9 W% X" W5 y                             BB        0.000000           -1.000000
                              2        12.00000            0.000000
                              3        12.00000            0.000000
: y# `+ X& S- y- J7 U  z                              4        0.000000            0.000000
0 Y" @: w: B, b3 P! f% D/ q                              5        0.000000            0.000000
                              6        0.000000            0.000000
  r* ^2 m' W0 D                              7        0.000000            0.000000
                              8        0.000000            0.000000
                              9        0.000000            0.000000
                             10        0.000000            0.000000
                             11        0.000000            0.000000
                             12        31.50000            0.000000
0 P- C! T" y$ O+ ]) X                             13        28.00000            0.000000
) O) [5 p; {0 o% f+ j0 S# B. E                             14        0.000000            0.000000
                             15        0.000000            0.000000
                             16        27.00000            0.000000
) G8 M/ J0 A* C, k                             17        27.00000            0.000000
                             18        0.000000            0.000000
8 N) E7 H% q5 v( f3 S! Z. i5 n                             19        0.000000            0.000000
) J7 `& w+ U8 p4 Z( {0 |! a2 e                             20        4.000000            0.000000
* r1 ?. t% p9 Y/ }                             21        3.000000            0.000000
                             22        0.000000            0.000000
4 {" ^8 h! u3 u& {  K0 l                             23        0.000000            0.000000
                             24        0.000000            0.000000
                             25        0.000000            0.000000
+ e4 V9 I" A0 o* T: Q* U* W0 L5 l, f. W                             26        0.000000            0.000000
                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
* s' i' d: n" | Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

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

cqwj

回复 3# olh2008

! l4 W8 E% G" F+ Y
    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

" M6 Z2 Q1 A- }7 d- Y这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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