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

cqwj

% }9 A2 Z* r* L: R1 `5 f5 z指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
- c( d! c0 i" K3 \- h/ O9 y表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
:) sets:
* Y( h- Q% a: f9 q1 _% Fxinxi: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")
@TEXT()=@status();
enddata
[bb] min=@sum(xinxi:sj190*x+sj160*y+sj270*z);
. Y  A  b  z# j! u' U' [@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;
) r  T$ W  y0 [8 z@sum(xinxi:y)=sr160;
- u- w1 W7 g, l; w& O: W9 j@sum(xinxi:z)=sr270;
@sum(xinxi:x)>=0;
@sum(xinxi:y)>=0;
@sum(xinxi:z)>=0;
+ @* z* X# I/ Z@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
: V1 G4 w$ S" S+ A# q6 E; V@for(xinxi(i):x(i)>=0);
@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
* L6 q* R# n- C. E+ O7 A) Q4 k6 A" ]@for(xinxi(i):y(i)>=0);
@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
@for(xinxi(i):z(i)>=0);
@for(xinxi(i):@gin(x(i)));
* H. X1 S- `% G. U$ Z' v@for(xinxi(i):@gin(y(i)));
@for(xinxi(i):@gin(z(i)));
# Y5 j; G4 p) q# u% q' Dmm=@sum(xinxi:k);
xx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;
# }7 p! R. `5 J7 w- N, p9 [4 f
, D" d$ n9 `' w' u8 z@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
DATA:
5 f+ j: C# G6 S    @POINTER
& E0 \* r: `5 c( h2 z
1 r+ z, z9 v0 q, N) L% o!此处结果想连接VB6.0，却不知道怎么写;
; \0 `+ e9 z$ ~. y5 Z8 |: `2 ZENDDATA

( _" W- {7 p& h7 [7 y( Nend
: B2 h9 ?: x' Y* d. Y结果为 主要是想取 X，Y，Z的结果
Global optimal solution found.
6 [1 b2 m3 L3 K   Objective value:                              0.000000
   Extended solver steps:                               0
   Total solver iterations:                             0

2 p' Y+ A- }& }0 l8 Y
  r& i& Z7 p) W# L' u                0
( E0 I; `& m; X3 d2 t) c9 x1 Z
                       Variable           Value        Reduced Cost
; o. j( h1 ^9 T& o                          SR190        0.000000            0.000000
                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
+ F+ q) t1 e, z& J                             MM        2.000000            0.000000
/ u4 K2 j7 t( \& r/ p. `                             XX        0.000000            0.000000
6 \' S  X7 C. F, b                  CL190( ZHANG)        35.00000            0.000000
2 Q& r5 C  y. |# N0 [                     CL190( LI)        35.00000            0.000000
/ {$ `- ~5 m0 ~- o                  CL160( ZHANG)        30.00000            0.000000
# e: }9 p4 X' ~& ~$ `( o9 }                     CL160( LI)        30.00000            0.000000
; Z+ [0 g& s  r7 ?) I) }5 c5 m                  CL270( ZHANG)        5.000000            0.000000
/ d5 x& V3 h. O6 X. m4 @0 z! S                     CL270( LI)        5.000000            0.000000
) q5 H2 s- C' U- H* `1 c3 |; ]                   GZSJ( ZHANG)        12.00000            0.000000
: d  l* p- I' ?* y% Z5 q                      GZSJ( LI)        12.00000            0.000000
0 t& j4 N( u4 X+ ^+ M8 }$ k                  SL190( ZHANG)       0.9000000            0.000000
                     SL190( LI)       0.8000000            0.000000
- W7 E/ K$ b# b% ]/ [                  SL160( ZHANG)       0.9000000            0.000000
                     SL160( LI)       0.9000000            0.000000
1 p5 U: s' M* |3 m3 \                  SL270( ZHANG)       0.8000000            0.000000
9 I: o; n2 [0 h4 n4 Y$ I3 s                     SL270( LI)       0.6000000            0.000000
) o  z+ u# e1 p' f# a- Q                  SJ190( ZHANG)       0.3770000            0.000000
: p. Z( S- _# @! F. R! A) S                     SJ190( LI)       0.4120000            0.000000
                  SJ160( ZHANG)       0.4400000            0.000000
* x: }: m' g1 d1 H- t4 I) t                     SJ160( LI)       0.4400000            0.000000
6 F/ ~. G! ~: n: T: ~8 Z7 R2 M* O                  SJ270( ZHANG)        2.880000            0.000000
  o, E; |* M2 C( x! A$ d; h                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
# u/ h% I, T; P1 J7 T2 r2 L/ \6 g& O: o                         K( LI)        1.000000            0.000000
                    ZYS( ZHANG)        0.000000            0.000000
; _, Q! c+ d) {+ q) @; D                       ZYS( LI)        0.000000            0.000000
+ V% J/ x4 l+ c, g  Q1 ]                      X( ZHANG)        0.000000           0.3770000
+ F, O* s" a: @8 r1 w* e                         X( LI)        0.000000           0.4120000
8 f, u1 s, T" h; K                      Y( ZHANG)        0.000000           0.4400000
                         Y( LI)        0.000000           0.4400000
; a& J$ R% _4 u1 \) i: h                      Z( ZHANG)        0.000000            2.880000
                         Z( LI)        0.000000            3.360000

                            Row    Slack or Surplus      Dual Price
                             BB        0.000000           -1.000000
                              2        12.00000            0.000000
                              3        12.00000            0.000000
3 _! b" ]) K8 _2 Y                              4        0.000000            0.000000
                              5        0.000000            0.000000
" G4 }0 b/ @5 q! `                              6        0.000000            0.000000
                              7        0.000000            0.000000
                              8        0.000000            0.000000
" Z$ {& e6 d9 T( D9 b                              9        0.000000            0.000000
                             10        0.000000            0.000000
                             11        0.000000            0.000000
# T# S8 |( P1 s$ {* \, u; T, q* y                             12        31.50000            0.000000
0 @( C) {! j+ v6 l7 G* R( n5 I                             13        28.00000            0.000000
                             14        0.000000            0.000000
/ L. C5 E) L( r) A, F# {' `                             15        0.000000            0.000000
4 {2 I( d  u0 E3 I- z                             16        27.00000            0.000000
# O+ [$ ?+ |7 N, \& u* r; Y                             17        27.00000            0.000000
' ^  |7 `' F/ [  l9 b                             18        0.000000            0.000000
                             19        0.000000            0.000000
                             20        4.000000            0.000000
2 ^0 e8 E; ^2 l6 h: V                             21        3.000000            0.000000
                             22        0.000000            0.000000
8 V7 r& c, T; x+ H2 H+ _                             23        0.000000            0.000000
                             24        0.000000            0.000000
! d2 X2 H; Y! Y; N% z6 v5 l5 ~                             25        0.000000            0.000000
                             26        0.000000            0.000000
                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
  b) U9 i1 n) v Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

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

cqwj

回复 3# olh2008

$ w$ s/ Q! R; n. h2 V9 H
: C. ~0 r( `8 Y6 b& v    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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