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

cqwj

/ w1 K( t! G9 j' p3 O: A
+ N( P$ }: _7 M3 X( {+ K指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
6 l& W3 E5 P7 J! e% E5 `:) sets:
xinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
- [3 `% X9 E5 ?; @endsets
, U, w3 M# L! O; b& z' _+ u" odata:
- Z. \  i5 A, H2 {& x# Ixinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
@TEXT()=@status();
enddata
, r2 d. M3 n% {% T7 {* z/ B/ x" E3 ?[bb] min=@sum(xinxi:sj190*x+sj160*y+sj270*z);
% A5 P# p2 z: i0 `' H) {@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);
4 b# [5 t" r/ f5 w4 u# ~@sum(xinxi:x)=sr190;
8 N1 }" W5 |4 q@sum(xinxi:y)=sr160;
& z" h& e1 v- L8 a& z! h( x@sum(xinxi:z)=sr270;
8 y! p) {0 J0 K1 {6 M@sum(xinxi:x)>=0;
@sum(xinxi:y)>=0;
+ @: _8 i4 q' l1 U; X9 R; P@sum(xinxi:z)>=0;
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
@for(xinxi(i):x(i)>=0);
1 J; M) u/ m5 e4 t+ G@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
+ z* L' v4 g3 c5 F@for(xinxi(i):y(i)>=0);
' r+ W- M( {& Q- O$ I6 L3 A@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
6 k* G1 k1 e$ s@for(xinxi(i):z(i)>=0);
0 S" g1 Q3 Z5 j  W@for(xinxi(i):@gin(x(i)));
& F  b9 B( Y; e) K! M@for(xinxi(i):@gin(y(i)));
@for(xinxi(i):@gin(z(i)));
mm=@sum(xinxi:k);
2 S3 R5 m: L: U7 k4 N& Qxx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;
* A$ e0 B2 d( R6 ?$ O( I9 v. R, G2 C
  Q5 P- J. k  n@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
DATA:
    @POINTER

8 j4 \. _  i" y7 y; ^5 `!此处结果想连接VB6.0，却不知道怎么写;
9 z  _1 A. J& y4 uENDDATA

6 I/ z! A7 a: s+ d9 oend
结果为 主要是想取 X，Y，Z的结果
Global optimal solution found.
& Y' M& ~0 F7 J4 ^6 P   Objective value:                              0.000000
   Extended solver steps:                               0
1 j  I: S  a3 S; Q   Total solver iterations:                             0
! E' a. L. x: I; w/ s# @1 a

) `7 p5 \# S" x                0

                       Variable           Value        Reduced Cost
                          SR190        0.000000            0.000000
                          SR160        0.000000            0.000000
1 d( |0 g! X$ s! f* p; J                          SR270        0.000000            0.000000
                             MM        2.000000            0.000000
" D2 {/ W8 |8 S- b/ D                             XX        0.000000            0.000000
                  CL190( ZHANG)        35.00000            0.000000
. Z  h2 ?2 @/ Y  L! |/ Y3 e3 d                     CL190( LI)        35.00000            0.000000
9 f4 b& Z+ D3 T                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
                  CL270( ZHANG)        5.000000            0.000000
0 W/ {1 F6 c  m. R4 t/ `* e6 [                     CL270( LI)        5.000000            0.000000
                   GZSJ( ZHANG)        12.00000            0.000000
                      GZSJ( LI)        12.00000            0.000000
                  SL190( ZHANG)       0.9000000            0.000000
) M7 v5 S; W3 p  s) s1 `% |                     SL190( LI)       0.8000000            0.000000
: ?; U; z- @# }7 k" p4 R6 X                  SL160( ZHANG)       0.9000000            0.000000
                     SL160( LI)       0.9000000            0.000000
                  SL270( ZHANG)       0.8000000            0.000000
" `* i; s( Y" P) z                     SL270( LI)       0.6000000            0.000000
5 n8 c+ h) ?& h                  SJ190( ZHANG)       0.3770000            0.000000
. f# u. P9 a) X8 I+ O                     SJ190( LI)       0.4120000            0.000000
& r& a# V( z  |# [                  SJ160( ZHANG)       0.4400000            0.000000
6 Z2 W# R, C  H1 t( S' f" t* e9 b4 ?                     SJ160( LI)       0.4400000            0.000000
                  SJ270( ZHANG)        2.880000            0.000000
                     SJ270( LI)        3.360000            0.000000
* G& U# k; t" I7 m' `, a: k! t" {                      K( ZHANG)        1.000000            0.000000
                         K( LI)        1.000000            0.000000
" |9 m. C7 m& S$ W                    ZYS( ZHANG)        0.000000            0.000000
/ ~6 |& b2 |% T: G& c* ^                       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
  T$ _( h* Z* n                      Z( ZHANG)        0.000000            2.880000
* v6 d7 q6 M6 u0 k! f, [% j                         Z( LI)        0.000000            3.360000
0 _$ F0 n: w8 F' ~0 B* n3 u
% e' H- ^' E: q- P. n1 s                            Row    Slack or Surplus      Dual Price
: _6 j3 ?- |) @( l                             BB        0.000000           -1.000000
; ?& F% y, }' {9 S  A+ F                              2        12.00000            0.000000
                              3        12.00000            0.000000
                              4        0.000000            0.000000
                              5        0.000000            0.000000
                              6        0.000000            0.000000
                              7        0.000000            0.000000
) c1 X1 u0 X  K                              8        0.000000            0.000000
                              9        0.000000            0.000000
7 t% {3 {# [3 G& `" @; B! x                             10        0.000000            0.000000
6 ?3 h- t6 X2 |: A                             11        0.000000            0.000000
                             12        31.50000            0.000000
                             13        28.00000            0.000000
                             14        0.000000            0.000000
; T- E7 n6 p# f& d/ Z                             15        0.000000            0.000000
8 A% n0 ?# U1 Q& ~2 w  x9 _                             16        27.00000            0.000000
                             17        27.00000            0.000000
                             18        0.000000            0.000000
7 k2 d$ e- e! K' Y, h% v0 U  t0 k                             19        0.000000            0.000000
; j1 z  p* I2 J: ^                             20        4.000000            0.000000
/ \- {2 W; {. g! G                             21        3.000000            0.000000
                             22        0.000000            0.000000
                             23        0.000000            0.000000
                             24        0.000000            0.000000
                             25        0.000000            0.000000
                             26        0.000000            0.000000
  f% P5 `/ H. r& F: K& d6 u$ _                             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


' G  i) w+ @: h% U% e    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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