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

cqwj

& s/ m4 |) e$ i, [3 d7 v7 b指针处怎么写？？
1 u( ]) ^$ ?8 |. ^  |我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
:) sets:
# T9 m; U  ^8 _6 M: n; wxinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
, S" T; p8 M6 N0 J3 ~$ Kendsets
8 L) b; ?: r2 I: M7 zdata:
5 L5 [' \$ i  u2 Xxinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
@TEXT()=@status();
  y0 |9 G* t6 I( l! wenddata
[bb] min=@sum(xinxi:sj190*x+sj160*y+sj270*z);
& Y; Z7 n$ _* s; g; `4 `/ a% I& X$ L@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)<=12);
- S, y; E' ^5 @6 |; [@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
@sum(xinxi:x)=sr190;
@sum(xinxi:y)=sr160;
9 G7 ?$ r; g" y  p@sum(xinxi:z)=sr270;
- M) D7 a" j7 J, C  a9 n@sum(xinxi:x)>=0;
4 f1 N4 \2 g" V8 t' P0 u@sum(xinxi:y)>=0;
@sum(xinxi:z)>=0;
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
6 t. W5 g! u1 w( g@for(xinxi(i):x(i)>=0);
& ?  V1 a" z. r@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
@for(xinxi(i):y(i)>=0);
' _; u# W, i8 {' W@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
@for(xinxi(i):z(i)>=0);
@for(xinxi(i):@gin(x(i)));
@for(xinxi(i):@gin(y(i)));
@for(xinxi(i):@gin(z(i)));
* k! p0 f+ y9 ]. ^0 F4 zmm=@sum(xinxi:k);
; v/ J- _" W! I" d0 M1 P3 ^# jxx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;

9 q3 P; q0 g/ J, z$ w@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
DATA:
    @POINTER
4 I  C: R9 s% ], f/ X: E
  i. R% n% e2 t9 M( O+ }!此处结果想连接VB6.0，却不知道怎么写;
" z/ B& B  ~4 d2 M& s( lENDDATA

; [: i' O; x$ [4 c5 ?( f- Rend
结果为 主要是想取 X，Y，Z的结果
% }0 j# w4 k' {0 o+ d% A+ k4 Y( I5 _Global optimal solution found.
   Objective value:                              0.000000
   Extended solver steps:                               0
   Total solver iterations:                             0
* _  u7 }0 J* ~' i

, q" K) _6 }3 p9 L, Q                0
$ {* I& Z2 L/ }# Q
                       Variable           Value        Reduced Cost
                          SR190        0.000000            0.000000
                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
9 d* G! Q4 ~7 R0 M" ^) x                             MM        2.000000            0.000000
4 i0 T2 H2 W* j. A                             XX        0.000000            0.000000
( {* U* w  u, @/ ]* s                  CL190( ZHANG)        35.00000            0.000000
8 Q) }0 ?' B0 t' h- j                     CL190( LI)        35.00000            0.000000
' |8 ], e3 E; ]! W0 S                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
' C8 }# S( [5 y. k- v                  CL270( ZHANG)        5.000000            0.000000
                     CL270( LI)        5.000000            0.000000
                   GZSJ( ZHANG)        12.00000            0.000000
4 f" s& J: y* B5 Y; H0 U                      GZSJ( LI)        12.00000            0.000000
$ H6 }/ X. k: U# `                  SL190( ZHANG)       0.9000000            0.000000
                     SL190( LI)       0.8000000            0.000000
                  SL160( ZHANG)       0.9000000            0.000000
/ e7 y& n4 A' a6 ]& K* s6 V                     SL160( LI)       0.9000000            0.000000
0 h9 }- D; D. ?/ k5 ?6 g. S                  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
% V: Z; x. u+ b9 A& g7 ?                     SJ160( LI)       0.4400000            0.000000
6 n; L; x3 u1 u- T. G9 j                  SJ270( ZHANG)        2.880000            0.000000
2 G" v& I) l+ T; z; f$ t# s2 q                     SJ270( LI)        3.360000            0.000000
                      K( ZHANG)        1.000000            0.000000
$ q8 L+ ?0 a& \; g& N/ _& p; Q  Q                         K( LI)        1.000000            0.000000
! T7 K( A) X- B                    ZYS( ZHANG)        0.000000            0.000000
& D  {) m# k/ n/ P) P" W                       ZYS( LI)        0.000000            0.000000
                      X( ZHANG)        0.000000           0.3770000
                         X( LI)        0.000000           0.4120000
                      Y( ZHANG)        0.000000           0.4400000
( O7 m* V- ]1 ]9 h) j6 ]2 I                         Y( LI)        0.000000           0.4400000
                      Z( ZHANG)        0.000000            2.880000
                         Z( LI)        0.000000            3.360000

) r" Y8 I# T; Q) o, b3 H. [0 j                            Row    Slack or Surplus      Dual Price
                             BB        0.000000           -1.000000
                              2        12.00000            0.000000
                              3        12.00000            0.000000
2 C( j  p- c: l2 z, `5 @                              4        0.000000            0.000000
& p4 A/ |2 H* Z                              5        0.000000            0.000000
                              6        0.000000            0.000000
1 v+ z' o+ y* l4 E/ Q6 S2 x                              7        0.000000            0.000000
% ^2 J$ ~/ W8 L                              8        0.000000            0.000000
                              9        0.000000            0.000000
                             10        0.000000            0.000000
                             11        0.000000            0.000000
, x$ Q2 T" @4 [! q' e) P( ^                             12        31.50000            0.000000
                             13        28.00000            0.000000
                             14        0.000000            0.000000
                             15        0.000000            0.000000
                             16        27.00000            0.000000
# r# i4 m/ N+ ?8 l- s% [2 h' l                             17        27.00000            0.000000
                             18        0.000000            0.000000
) [& B/ O' r  W8 z# [                             19        0.000000            0.000000
" y4 _) m: f. Q                             20        4.000000            0.000000
                             21        3.000000            0.000000
                             22        0.000000            0.000000
% y, u6 K% @( R( J* a                             23        0.000000            0.000000
                             24        0.000000            0.000000
                             25        0.000000            0.000000
( w4 P+ n, \! O. n                             26        0.000000            0.000000
                             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* R4 P- Q/ V, Z! ]& \! u

    你发的附件不对，再说我也有这个例程，只是不清楚指针这么写到数模里才好调用。

olh2008

指针怎么写到数模里

# A( ~6 X1 ~9 g这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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