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

cqwj

指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
2 `8 l9 Z! X* R' R* q. i8 f: C:) sets:
xinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
endsets
8 c6 H) K6 M5 U% ?* t& x' Pdata:
& j" e# \2 T+ K9 ^xinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
@TEXT()=@status();
enddata
[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);
( W# _) F5 e" u" L@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
$ Y- N, e0 ]: r@sum(xinxi:x)=sr190;
# F& `6 s, X: I  l@sum(xinxi:y)=sr160;
5 j5 s8 _; v0 k( U2 \% D& p- Q@sum(xinxi:z)=sr270;
2 N) Z' y7 {' ]4 z. \, P$ p1 M* ~. ]@sum(xinxi:x)>=0;
' k. g& L  f4 Z@sum(xinxi:y)>=0;
@sum(xinxi:z)>=0;
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
  Y/ c0 [9 ?# k* z  \@for(xinxi(i):x(i)>=0);
@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
8 J6 _! w; t2 ^8 z/ W@for(xinxi(i):y(i)>=0);
' ?) [0 N; {5 T@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
@for(xinxi(i):z(i)>=0);
@for(xinxi(i):@gin(x(i)));
' ], G6 {! r/ \$ N, D% D" D8 C@for(xinxi(i):@gin(y(i)));
% N% L& s/ ~5 }5 u1 q1 B1 t@for(xinxi(i):@gin(z(i)));
" y* |  Z" i- _3 w1 Bmm=@sum(xinxi:k);
xx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;

9 I  s7 u. d) H& b@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
1 K: r/ u9 C7 F: R' k3 J, O9 \DATA:
1 `+ M2 b6 I( j( E0 |" R4 \8 ]- M8 |    @POINTER
. q, U, K0 z2 @
!此处结果想连接VB6.0，却不知道怎么写;
ENDDATA
0 w( w8 W9 D7 D
end
4 T5 w" V4 s7 U: ~+ E* j- }- J3 v结果为 主要是想取 X，Y，Z的结果
Global optimal solution found.
" A& v0 d; O5 t7 C/ {1 d   Objective value:                              0.000000
3 [5 v# X+ C# g" ]   Extended solver steps:                               0
   Total solver iterations:                             0


' v7 V, `9 K# N5 M                0

                       Variable           Value        Reduced Cost
$ U' n* A6 T& E- r                          SR190        0.000000            0.000000
                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
0 _3 v* x' T9 U) _, c                             MM        2.000000            0.000000
                             XX        0.000000            0.000000
# X2 v3 L; X, `( P9 n                  CL190( ZHANG)        35.00000            0.000000
                     CL190( LI)        35.00000            0.000000
+ b7 o  Q3 |$ g) w. H& U                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
( r5 I7 x: X$ b" X# f3 O+ ^                  CL270( ZHANG)        5.000000            0.000000
                     CL270( LI)        5.000000            0.000000
. ?8 z, V2 ]/ [5 i9 K                   GZSJ( ZHANG)        12.00000            0.000000
3 B9 {& Y7 ?3 A                      GZSJ( LI)        12.00000            0.000000
                  SL190( ZHANG)       0.9000000            0.000000
# b4 D: h( k  A* ~/ h; [                     SL190( LI)       0.8000000            0.000000
" ]4 H% k6 Y9 N! Q8 H- m                  SL160( ZHANG)       0.9000000            0.000000
                     SL160( LI)       0.9000000            0.000000
3 ~4 R5 u" Z- q3 d$ ]                  SL270( ZHANG)       0.8000000            0.000000
# B) A! y9 [7 \: {9 d                     SL270( LI)       0.6000000            0.000000
                  SJ190( ZHANG)       0.3770000            0.000000
                     SJ190( LI)       0.4120000            0.000000
                  SJ160( ZHANG)       0.4400000            0.000000
! {% U# i% |) I7 S! j* ~" X& _* n2 I                     SJ160( LI)       0.4400000            0.000000
                  SJ270( ZHANG)        2.880000            0.000000
& G( ~6 q& G* p1 B; G                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
1 ~  T6 `! x5 q! u. C; K( V                         K( LI)        1.000000            0.000000
7 R8 X( }4 a! m$ X* x* N$ `& Y                    ZYS( ZHANG)        0.000000            0.000000
$ C+ |8 d. t7 a- y& `1 T4 |                       ZYS( LI)        0.000000            0.000000
                      X( ZHANG)        0.000000           0.3770000
                         X( LI)        0.000000           0.4120000
                      Y( ZHANG)        0.000000           0.4400000
                         Y( LI)        0.000000           0.4400000
                      Z( ZHANG)        0.000000            2.880000
                         Z( LI)        0.000000            3.360000

7 f6 x+ X7 D/ m+ t" g! k* s                            Row    Slack or Surplus      Dual Price
+ z( \+ A* [- a9 V1 E' W; @* d0 ?                             BB        0.000000           -1.000000
                              2        12.00000            0.000000
                              3        12.00000            0.000000
                              4        0.000000            0.000000
' w$ H6 f: ~+ [# \0 @                              5        0.000000            0.000000
* t- Z5 r5 H% A. B; D- o5 w1 |                              6        0.000000            0.000000
                              7        0.000000            0.000000
                              8        0.000000            0.000000
                              9        0.000000            0.000000
2 L4 T6 A/ t8 {                             10        0.000000            0.000000
                             11        0.000000            0.000000
                             12        31.50000            0.000000
* `0 I4 r5 M; y2 U4 {                             13        28.00000            0.000000
                             14        0.000000            0.000000
( P" {+ x, ~# B                             15        0.000000            0.000000
                             16        27.00000            0.000000
8 n! |* ?" L) k* W( K4 ^5 q% e9 I* Z                             17        27.00000            0.000000
+ `% {4 U9 A# X& `# _0 R                             18        0.000000            0.000000
7 u. N" U* t8 p4 s                             19        0.000000            0.000000
                             20        4.000000            0.000000
                             21        3.000000            0.000000
                             22        0.000000            0.000000
                             23        0.000000            0.000000
                             24        0.000000            0.000000
  v. B, N3 Z  ^! ]  ]                             25        0.000000            0.000000
                             26        0.000000            0.000000
                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
. }8 V) z/ x9 C5 \2 R Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

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

cqwj

回复 3# olh2008

; \+ q: f1 M$ F& @: L
0 l! ]3 d; Z$ H  r    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

( ~; P+ w2 J5 k% m6 v这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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