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

cqwj

指针处怎么写？？
我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
0 n! T' ?$ B+ ]/ e/ ]4 l表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
$ I, e. ^" u. R+ _! v2 w& \:) sets:
xinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
endsets
data:
# j# m  _6 Y0 Jxinxi,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);
0 f& e7 C  Z% W. w& h1 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);
@sum(xinxi:x)=sr190;
5 n" A4 V, |9 }" I( H5 m  ^@sum(xinxi:y)=sr160;
@sum(xinxi:z)=sr270;
@sum(xinxi:x)>=0;
6 C3 `: O9 i6 H4 Q8 u4 K@sum(xinxi:y)>=0;
' u( f# w/ @% {9 D. r@sum(xinxi:z)>=0;
; E8 A+ D2 z3 A7 V9 c( E@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
' X0 w% E' E2 M4 a/ b5 ^@for(xinxi(i):x(i)>=0);
' U( k8 |  D+ |# _5 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);
% G) |( U! Y* }* a) Z@for(xinxi(i):@gin(x(i)));
* M, J9 R* r# G3 U# O& c@for(xinxi(i):@gin(y(i)));
@for(xinxi(i):@gin(z(i)));
mm=@sum(xinxi:k);
1 P2 _( W2 @8 e1 Q2 B# Hxx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;
$ q/ s2 p# y6 N5 e& b; f2 i/ R. a
@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
4 s* y) h" A3 H+ d$ X! hDATA:
; \/ ^, J0 ?  G* {6 r0 F  ]+ b    @POINTER
% P% r% T8 i# i8 l; k& H( n, I3 G
9 t* O. H* p1 R3 m!此处结果想连接VB6.0，却不知道怎么写;
% [# o5 S( Z) L* }! m' {ENDDATA

end
' F+ r7 y1 D* V- L8 O结果为 主要是想取 X，Y，Z的结果
5 J! ~7 i" x' K4 b' FGlobal optimal solution found.
. H/ @/ V/ v3 \% {   Objective value:                              0.000000
/ ^& |) A3 {4 a. [; ~   Extended solver steps:                               0
+ l' n% o" Q8 G, w   Total solver iterations:                             0
; B' A7 }# l; H5 ~& S
9 p( m3 c" G& Q. v# x
7 |0 p' B% H# B& w                0

                       Variable           Value        Reduced Cost
! R, f# q0 s- [0 X, _; y+ b& g/ b                          SR190        0.000000            0.000000
* S! ?$ C9 k; P! ^+ ]  h                          SR160        0.000000            0.000000
: f& ]9 O/ I* O- [/ u& r0 z+ c                          SR270        0.000000            0.000000
- i8 ]2 }2 {, |8 r                             MM        2.000000            0.000000
% U: q) K  n! X2 B$ u# O                             XX        0.000000            0.000000
$ P0 ~$ b" f/ B# c1 {' b0 Q3 n                  CL190( ZHANG)        35.00000            0.000000
                     CL190( LI)        35.00000            0.000000
) g6 ]' d7 n( H; S. [* n) S                  CL160( ZHANG)        30.00000            0.000000
: E) p2 B# I( ~6 k                     CL160( LI)        30.00000            0.000000
                  CL270( ZHANG)        5.000000            0.000000
# K0 p6 K1 d8 S9 @$ g& i0 Y                     CL270( LI)        5.000000            0.000000
                   GZSJ( ZHANG)        12.00000            0.000000
                      GZSJ( LI)        12.00000            0.000000
# j# I$ @, D9 K( R; y4 H5 X" {# }# a                  SL190( ZHANG)       0.9000000            0.000000
3 ]! g0 j9 n$ X6 r/ k1 A9 ?. f                     SL190( LI)       0.8000000            0.000000
6 x  b  ~, r$ \3 c' N+ F% }. h/ v" U) {                  SL160( ZHANG)       0.9000000            0.000000
! m, i$ f; c  a2 N                     SL160( LI)       0.9000000            0.000000
/ o, d) ^! D4 C                  SL270( ZHANG)       0.8000000            0.000000
                     SL270( LI)       0.6000000            0.000000
                  SJ190( ZHANG)       0.3770000            0.000000
' u' w% g" f6 d2 J! W; e' o                     SJ190( LI)       0.4120000            0.000000
                  SJ160( ZHANG)       0.4400000            0.000000
' ]& }/ H9 c+ g+ e; h$ f, N- a                     SJ160( LI)       0.4400000            0.000000
1 o, H2 M2 C# s3 B! j                  SJ270( ZHANG)        2.880000            0.000000
" G7 @2 _9 ?) p, @$ H! W                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
* u. n0 K3 e& E7 d4 N, i& h                         K( LI)        1.000000            0.000000
                    ZYS( ZHANG)        0.000000            0.000000
                       ZYS( LI)        0.000000            0.000000
. S% u1 K9 o9 E" T                      X( ZHANG)        0.000000           0.3770000
' R& j, c) M0 Z5 q7 Q$ L, D" j4 y                         X( LI)        0.000000           0.4120000
5 l  h( u! E( g1 C                      Y( ZHANG)        0.000000           0.4400000
                         Y( LI)        0.000000           0.4400000
                      Z( ZHANG)        0.000000            2.880000
                         Z( LI)        0.000000            3.360000

                            Row    Slack or Surplus      Dual Price
% N, @; v% e9 I' Y+ n                             BB        0.000000           -1.000000
% C+ z5 y0 |7 ~9 _                              2        12.00000            0.000000
/ H  V, W" v" K! ]& w                              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
                              8        0.000000            0.000000
                              9        0.000000            0.000000
5 S; i, E! y- c) E                             10        0.000000            0.000000
7 y) I2 t0 Q0 T                             11        0.000000            0.000000
                             12        31.50000            0.000000
+ g0 B% W, F9 t0 A- c                             13        28.00000            0.000000
                             14        0.000000            0.000000
                             15        0.000000            0.000000
4 o$ L. F9 N# a* K8 ?6 [                             16        27.00000            0.000000
5 I! v/ a* O( K( R( V' m+ B                             17        27.00000            0.000000
                             18        0.000000            0.000000
                             19        0.000000            0.000000
/ O, ^3 B2 H8 E# d! n( }% |) H: g                             20        4.000000            0.000000
                             21        3.000000            0.000000
1 F) p7 x" F( W  u4 s3 D9 q: z% Q                             22        0.000000            0.000000
                             23        0.000000            0.000000
                             24        0.000000            0.000000
                             25        0.000000            0.000000
. o- l0 J8 T, a$ m4 B" @' ?# P. G  \                             26        0.000000            0.000000
                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
4 h% i" a* P( F+ ?8 C2 S Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

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

cqwj

回复 3# olh2008

6 H+ W# X0 ~) T* e# C; R, c/ g
    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

9 ^5 ?+ |+ s* ]6 t5 p& ]4 e这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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