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

cqwj

9 C7 h. q0 C8 r; {
  O9 Y5 S3 P( Q指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
. b+ c9 Z3 j- z- V0 T: `' S2 \6 b! @表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
:) sets:
- C9 h" e& h; Nxinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
endsets
data:
xinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
, i% l4 L( h( e* ]! t@TEXT()=@status();
enddata
4 U% A( B2 `3 R2 x[bb] min=@sum(xinxi:sj190*x+sj160*y+sj270*z);
! m9 Z, ~  b& U+ L- L' O1 {3 l) O* ]@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)<=12);
@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
+ X- w: w; V& {& {0 F@sum(xinxi:x)=sr190;
@sum(xinxi:y)=sr160;
& h# Y; M' i2 A* u3 G: e% U: M9 K@sum(xinxi:z)=sr270;
" x  _* D& k' T8 g9 Q( }@sum(xinxi:x)>=0;
@sum(xinxi:y)>=0;
' f, N' i# y! Q  ]; V@sum(xinxi:z)>=0;
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
# X1 h, W: S6 ?2 B@for(xinxi(i):x(i)>=0);
0 [) s+ Y5 S- D/ Y$ n8 J@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
@for(xinxi(i):y(i)>=0);
1 N$ W' k8 Z# ]@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
2 H2 A  N- ?% F9 z- i# o@for(xinxi(i):z(i)>=0);
) m9 q- J$ }  x@for(xinxi(i):@gin(x(i)));
" ^5 Q! R) p0 @6 d! ?6 V3 J* x5 I@for(xinxi(i):@gin(y(i)));
@for(xinxi(i):@gin(z(i)));
9 U3 }$ P6 Q4 f: {. `# V: h8 A) hmm=@sum(xinxi:k);
+ c, P: V5 l# g5 j* Xxx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;

+ s4 {8 s# x# S0 c/ u@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
DATA:
8 c  _4 R- y; _% s    @POINTER
! d/ @, O; R4 c7 |" }- @
!此处结果想连接VB6.0，却不知道怎么写;
ENDDATA
& x! c7 Y4 B7 j& ~, n
1 t& X7 A, R3 }6 \7 y% fend
. r" n1 X7 G( ~6 S4 Y5 `结果为 主要是想取 X，Y，Z的结果
Global optimal solution found.
   Objective value:                              0.000000
   Extended solver steps:                               0
/ B6 J( {9 T! v' ^   Total solver iterations:                             0

$ N6 [5 v: j* ?6 I  J6 [7 E; o0 [" R
* H: K/ X7 r9 b8 J( O0 h                0

0 K" i3 A7 c( O% `                       Variable           Value        Reduced Cost
/ p, D& N" U$ l" M' d7 w  Z/ B                          SR190        0.000000            0.000000
! p$ T$ R; u. O3 @9 P8 Y* d                          SR160        0.000000            0.000000
8 _! j7 J! z- }                          SR270        0.000000            0.000000
                             MM        2.000000            0.000000
1 |' M8 U  r; ?' I7 h                             XX        0.000000            0.000000
                  CL190( ZHANG)        35.00000            0.000000
# o! b( }- h) r$ n' g$ [, E! Z8 i2 p7 `                     CL190( LI)        35.00000            0.000000
                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
. U; _/ ~- ?9 @  {% B                  CL270( ZHANG)        5.000000            0.000000
                     CL270( LI)        5.000000            0.000000
6 f% c4 G  i- y" q                   GZSJ( ZHANG)        12.00000            0.000000
                      GZSJ( LI)        12.00000            0.000000
. w( ~. m* ~1 F! ~9 H                  SL190( ZHANG)       0.9000000            0.000000
- Z  m+ ?1 h- Q( K2 [$ b                     SL190( LI)       0.8000000            0.000000
                  SL160( ZHANG)       0.9000000            0.000000
. z) j) b6 Q& n. a' T8 V" j' v                     SL160( LI)       0.9000000            0.000000
                  SL270( ZHANG)       0.8000000            0.000000
                     SL270( LI)       0.6000000            0.000000
' B9 ~) K2 C2 u  k                  SJ190( ZHANG)       0.3770000            0.000000
                     SJ190( LI)       0.4120000            0.000000
                  SJ160( ZHANG)       0.4400000            0.000000
                     SJ160( LI)       0.4400000            0.000000
% R+ k/ w$ R( u0 M                  SJ270( ZHANG)        2.880000            0.000000
                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
, h! t, e  C% s# [1 m/ Q                         K( LI)        1.000000            0.000000
                    ZYS( ZHANG)        0.000000            0.000000
) q' ^; g6 ^1 P- U& i9 ^- L3 U; h% [                       ZYS( LI)        0.000000            0.000000
: c) S5 u! m* ~/ [9 N+ z* H2 h                      X( ZHANG)        0.000000           0.3770000
: O' s5 l7 m5 F% f  [# p                         X( LI)        0.000000           0.4120000
$ L- N) ~8 s9 m# k1 m0 a                      Y( ZHANG)        0.000000           0.4400000
' b& l6 I1 N% G                         Y( LI)        0.000000           0.4400000
( r# s- ^) I9 v+ r8 {+ s                      Z( ZHANG)        0.000000            2.880000
- e+ y5 H( G1 Z                         Z( LI)        0.000000            3.360000

$ d* e6 p& L# \. L* z3 i) q0 D+ r; H                            Row    Slack or Surplus      Dual Price
                             BB        0.000000           -1.000000
1 H* ^  T6 W0 n/ t9 u4 Q- i# J                              2        12.00000            0.000000
9 b! u! M* X4 U) }: f! e                              3        12.00000            0.000000
                              4        0.000000            0.000000
& t- T; d: n4 Y* T, U% y+ I4 Q+ S) U                              5        0.000000            0.000000
                              6        0.000000            0.000000
0 H  D/ c: q5 x2 O, a; F                              7        0.000000            0.000000
* ]1 u" C; i7 g' ]/ w                              8        0.000000            0.000000
                              9        0.000000            0.000000
# C4 h$ C6 V! a/ M) n; \8 m7 b                             10        0.000000            0.000000
                             11        0.000000            0.000000
9 t* H% [1 N, \3 ^. t                             12        31.50000            0.000000
                             13        28.00000            0.000000
: |. g3 E2 t( L9 E" J                             14        0.000000            0.000000
& ]0 u! a" |1 p, |* C2 Y                             15        0.000000            0.000000
( P5 v0 Y9 i$ L3 L! O+ ?                             16        27.00000            0.000000
                             17        27.00000            0.000000
                             18        0.000000            0.000000
                             19        0.000000            0.000000
                             20        4.000000            0.000000
  T  |# a8 x, {! f1 x4 ~                             21        3.000000            0.000000
                             22        0.000000            0.000000
                             23        0.000000            0.000000
                             24        0.000000            0.000000
7 [+ Z; d) q& {" w                             25        0.000000            0.000000
8 P0 W! x/ [$ [$ _/ P+ M                             26        0.000000            0.000000
$ @. H6 g' U/ Q- ?& C3 I0 }" c                             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
  ~3 J" U' \; Y( Y% R; e

7 G9 ~3 ?' Q% G$ i! V' z: l0 ^; [    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

& c7 H  ?# A) ~! N# n这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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