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

cqwj

' g9 ]! W( ]( p& W
指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
9 X( {$ U  c- @# ]8 s$ V4 `* e:) sets:
) q* Y# K: |, P; ]6 Gxinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
$ L" \! j8 t/ W& b6 O1 H. jendsets
0 n; m5 R% r( V/ r# Odata:
7 S9 a% Z, Z, c; k3 dxinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
@TEXT()=@status();
: Z# q# O7 ]/ B7 m3 m3 K& nenddata
. Y+ K4 ?/ @% {5 e2 S' j[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);
@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
@sum(xinxi:x)=sr190;
@sum(xinxi:y)=sr160;
@sum(xinxi:z)=sr270;
@sum(xinxi:x)>=0;
@sum(xinxi:y)>=0;
@sum(xinxi:z)>=0;
4 F3 \- p% b0 `2 j  A@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
@for(xinxi(i):x(i)>=0);
7 ]% C- z% `+ P4 A/ \, Z@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
@for(xinxi(i):y(i)>=0);
@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
@for(xinxi(i):z(i)>=0);
" A# \8 `( T, D2 H' O/ T@for(xinxi(i):@gin(x(i)));
@for(xinxi(i):@gin(y(i)));
2 l! h* u3 ~9 ?/ X3 M@for(xinxi(i):@gin(z(i)));
8 p- H, g1 b2 K4 ^" |5 I( Dmm=@sum(xinxi:k);
xx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;
5 Y  g) H  j+ }
& j1 q0 O) s+ S@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
. j6 i" i# p1 p" ^& [" q4 X2 {DATA:
6 q& u  v4 |2 Z& t2 P    @POINTER

!此处结果想连接VB6.0，却不知道怎么写;
ENDDATA
" I6 Q% G) y) {0 s
end
! K5 p5 Q" x8 r! `& D结果为 主要是想取 X，Y，Z的结果
* k& z7 W- e1 b* N. V5 OGlobal optimal solution found.
   Objective value:                              0.000000
   Extended solver steps:                               0
" l, m: F& i; ^; O8 o: r7 D, O6 _   Total solver iterations:                             0


                0

5 [6 B5 M: {' p) ]% |8 O! T/ P                       Variable           Value        Reduced Cost
" B% f( b7 i5 H2 C- \; A4 t0 W                          SR190        0.000000            0.000000
8 `6 F! H  S$ I5 Z' I                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
" D0 _# c: O& l9 ~5 `                             MM        2.000000            0.000000
  [6 w4 X! R. J( r# j                             XX        0.000000            0.000000
3 [( L6 T6 w2 X( c                  CL190( ZHANG)        35.00000            0.000000
, Q. G4 e/ _) w8 `  f                     CL190( LI)        35.00000            0.000000
3 ?% N6 H7 F. X( x                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
5 v9 o7 c. Z- }& |: L5 a7 L) X, o                  CL270( ZHANG)        5.000000            0.000000
                     CL270( LI)        5.000000            0.000000
; s4 v. B/ p* R9 R( _7 M1 e                   GZSJ( ZHANG)        12.00000            0.000000
                      GZSJ( LI)        12.00000            0.000000
                  SL190( ZHANG)       0.9000000            0.000000
. U) y& Z* m- f0 C0 k2 L                     SL190( LI)       0.8000000            0.000000
/ m' |, @1 O: S" U+ f                  SL160( ZHANG)       0.9000000            0.000000
/ V- {' a( I; x" e' ^                     SL160( LI)       0.9000000            0.000000
                  SL270( ZHANG)       0.8000000            0.000000
                     SL270( LI)       0.6000000            0.000000
                  SJ190( ZHANG)       0.3770000            0.000000
                     SJ190( LI)       0.4120000            0.000000
                  SJ160( ZHANG)       0.4400000            0.000000
                     SJ160( LI)       0.4400000            0.000000
% v! S# ]1 ?0 D  l5 L                  SJ270( ZHANG)        2.880000            0.000000
                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
                         K( LI)        1.000000            0.000000
  t5 `, v9 r' t. J                    ZYS( ZHANG)        0.000000            0.000000
                       ZYS( LI)        0.000000            0.000000
                      X( ZHANG)        0.000000           0.3770000
                         X( LI)        0.000000           0.4120000
& S; K( [$ b7 P+ I                      Y( ZHANG)        0.000000           0.4400000
                         Y( LI)        0.000000           0.4400000
                      Z( ZHANG)        0.000000            2.880000
& H. b4 ]/ `: [- y2 S" l                         Z( LI)        0.000000            3.360000

                            Row    Slack or Surplus      Dual Price
" J$ ^: W3 Z' G8 E7 x; V  \                             BB        0.000000           -1.000000
9 P! [' d6 R, B/ v                              2        12.00000            0.000000
                              3        12.00000            0.000000
5 y1 c* n9 B% v* k4 `& N/ z( H                              4        0.000000            0.000000
                              5        0.000000            0.000000
, }) B! M! C5 o5 U1 L                              6        0.000000            0.000000
" X* A0 l* g' L; t  E                              7        0.000000            0.000000
                              8        0.000000            0.000000
" w& L/ k6 ?# H- K) v                              9        0.000000            0.000000
: |5 F1 h" U- t  L; N/ t9 O                             10        0.000000            0.000000
5 i' p3 V% X2 k# e4 i7 Q                             11        0.000000            0.000000
% l9 J' ?% ~) J1 G0 b% v                             12        31.50000            0.000000
: M$ E* O0 i9 I9 U- t                             13        28.00000            0.000000
; q4 }! W* B5 c& P9 h% _                             14        0.000000            0.000000
                             15        0.000000            0.000000
                             16        27.00000            0.000000
' j+ k8 h$ N/ K/ h! V                             17        27.00000            0.000000
  B& d! E: u- c$ n" r                             18        0.000000            0.000000
. E5 p0 N2 Z0 Y; Q1 i                             19        0.000000            0.000000
                             20        4.000000            0.000000
                             21        3.000000            0.000000
                             22        0.000000            0.000000
9 o& b1 z/ P7 Z1 f- T" q                             23        0.000000            0.000000
7 t/ e8 w. C  N8 _( b5 a5 Q- O( w8 v- d                             24        0.000000            0.000000
                             25        0.000000            0.000000
5 F# n, p$ W- j) ~- P; ?                             26        0.000000            0.000000
                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
' ?% D8 g3 E9 i! t9 n Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

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

cqwj

回复 3# olh2008
- P0 s: `  [+ G, x: p/ \

4 f/ l# V7 V) `9 B    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

6 k/ a& _; }9 z2 [( T; W这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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