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

cqwj

; ]) \7 g3 d: @3 P, w  Q指针处怎么写？？
7 h; m& e& [% b( D6 L& P& R我的意思就是说@pointer在模型里面怎么定义？如@pointer（1）=？？或 ？？=@pointer（1）
表示什么意思。我个人理解@pointer（1）=？？表示把数模变量的值？？装进@pointer（1）这个储存单元，外部程序程序可调用此储存单元数据。？？=@pointer（1）表示外部数据值？？通过DLL传来的数据放进数模变量，这样理解对吗？
) n3 q; G/ X+ x# v; O:) sets:
, T! ~/ s! A9 c$ `# Jxinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
endsets
data:
9 U) p8 ~% x, G1 xxinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
# `" K/ ^/ U' C) e@TEXT()=@status();
enddata
2 g+ q# n+ g; a- `: J9 D[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);
- f% l0 I" U& l3 x" i  Y+ |@sum(xinxi:x)=sr190;
@sum(xinxi:y)=sr160;
/ X) C& l% A# _9 T0 Z@sum(xinxi:z)=sr270;
' M, G& j- x7 @@sum(xinxi:x)>=0;
1 ?# t- t% g* a2 B, z* R) N@sum(xinxi:y)>=0;
@sum(xinxi:z)>=0;
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
@for(xinxi(i):x(i)>=0);
% p/ R' G1 T2 Q+ q@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
0 y) T: d+ P5 [  H8 E  v@for(xinxi(i):y(i)>=0);
" L( x* c) I* [( w) l@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
8 c1 `2 S0 G. s" {+ ^@for(xinxi(i):z(i)>=0);
( }0 f" l' n% }; R# ?- K@for(xinxi(i):@gin(x(i)));
1 Q" V6 a. D9 N/ ]@for(xinxi(i):@gin(y(i)));
@for(xinxi(i):@gin(z(i)));
5 i3 X  n$ _; M/ [mm=@sum(xinxi:k);
* k- v  H' V8 T* \* ~1 W- P3 nxx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;

@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
7 _9 a* w* m$ j9 q7 N" ^* T9 ?2 a0 @DATA:
/ R1 {0 R7 ^$ Z# Q( ?  x6 r: i! T    @POINTER
% C( Q, o+ Z) T6 R
# t+ _$ D2 T: x- u" M- g  k!此处结果想连接VB6.0，却不知道怎么写;
9 y+ I; F' @7 e; k- M0 ZENDDATA

7 P  g0 h2 i+ Q* F" cend
8 a1 f! ^) r' M  {1 Y" y: u0 P结果为 主要是想取 X，Y，Z的结果
Global optimal solution found.
# \1 Q$ _3 `7 l   Objective value:                              0.000000
0 w& o: j# C9 W. g& R& Q/ b. [; b& [. ]   Extended solver steps:                               0
9 Z- J" I, S: U: k8 J# K   Total solver iterations:                             0

; d* r/ D. W; c: r- i* {
                0
* j9 p, \- w( k) ?& b; `  s
7 N' _  P% ~; p, u8 Z  g                       Variable           Value        Reduced Cost
                          SR190        0.000000            0.000000
                          SR160        0.000000            0.000000
                          SR270        0.000000            0.000000
                             MM        2.000000            0.000000
# j. n$ n/ c) h1 u% m                             XX        0.000000            0.000000
- }& L0 L7 o' N" a                  CL190( ZHANG)        35.00000            0.000000
+ C2 F- m$ a% [7 A& S; m0 r/ M                     CL190( LI)        35.00000            0.000000
6 B% Z. v  g, L5 G- v                  CL160( ZHANG)        30.00000            0.000000
                     CL160( LI)        30.00000            0.000000
1 E4 g9 ?; a, e2 F                  CL270( ZHANG)        5.000000            0.000000
* q4 Z; Q7 h  i$ p                     CL270( LI)        5.000000            0.000000
8 w" X+ v7 C, W4 x: k5 p/ q8 G. d                   GZSJ( ZHANG)        12.00000            0.000000
                      GZSJ( LI)        12.00000            0.000000
0 Q' d% i( \  ]8 B4 i' G                  SL190( ZHANG)       0.9000000            0.000000
( G; H( i8 r1 R/ y                     SL190( LI)       0.8000000            0.000000
( U8 l5 g( A, E! y/ n( Z+ y( X                  SL160( ZHANG)       0.9000000            0.000000
                     SL160( LI)       0.9000000            0.000000
2 o- }. Y) g4 b8 X* z                  SL270( ZHANG)       0.8000000            0.000000
" C8 w) Q+ s0 ^4 C                     SL270( LI)       0.6000000            0.000000
7 w$ ?5 J6 f# @3 s8 t3 g                  SJ190( ZHANG)       0.3770000            0.000000
  y& d6 a9 _( I5 v/ I1 D9 D                     SJ190( LI)       0.4120000            0.000000
) e% C5 ?, i( g% T3 u                  SJ160( ZHANG)       0.4400000            0.000000
! v5 M/ f7 M1 S6 ^1 c5 H7 M                     SJ160( LI)       0.4400000            0.000000
                  SJ270( ZHANG)        2.880000            0.000000
                     SJ270( LI)        3.360000            0.000000
( J2 }6 r. {: B                      K( ZHANG)        1.000000            0.000000
; E1 D( ~1 q, c  M1 L                         K( LI)        1.000000            0.000000
                    ZYS( ZHANG)        0.000000            0.000000
                       ZYS( LI)        0.000000            0.000000
3 o& n6 \, R3 a% S$ O: Y- b0 c                      X( ZHANG)        0.000000           0.3770000
                         X( LI)        0.000000           0.4120000
2 E3 l- h! i+ P* q' e                      Y( ZHANG)        0.000000           0.4400000
) R) B' S# X7 e9 h" [% W) m4 Y                         Y( LI)        0.000000           0.4400000
% M6 o0 s/ u2 Z9 @9 L                      Z( ZHANG)        0.000000            2.880000
$ g& ^( h; h6 E$ l" W# _                         Z( LI)        0.000000            3.360000
% {/ A# J2 v/ l3 _2 S
                            Row    Slack or Surplus      Dual Price
                             BB        0.000000           -1.000000
                              2        12.00000            0.000000
; D. K% @8 N, A+ r& {+ [                              3        12.00000            0.000000
2 S* `( w' }" M: X; ?; s5 m                              4        0.000000            0.000000
                              5        0.000000            0.000000
5 I4 q5 L1 X- t: U                              6        0.000000            0.000000
: ]# ]6 G1 p. t# Y' q+ a2 L                              7        0.000000            0.000000
                              8        0.000000            0.000000
                              9        0.000000            0.000000
, \6 ~: H# D1 [' _                             10        0.000000            0.000000
  \. a: N4 G3 Q2 M  N4 J4 [: \                             11        0.000000            0.000000
% q  O% ?- \, F: r# }. x                             12        31.50000            0.000000
  p3 P( x0 f8 G4 q6 V' ~3 q                             13        28.00000            0.000000
                             14        0.000000            0.000000
- j5 i  h8 @5 i8 t% l  L1 Z0 A                             15        0.000000            0.000000
/ B8 v. N$ L' @2 ?, a% o                             16        27.00000            0.000000
                             17        27.00000            0.000000
                             18        0.000000            0.000000
( d' D+ ~, `8 |  Z+ D2 G+ H                             19        0.000000            0.000000
  I8 y% O6 J7 w" h                             20        4.000000            0.000000
                             21        3.000000            0.000000
                             22        0.000000            0.000000
- n  I7 P+ D  I# _$ F                             23        0.000000            0.000000
& y8 T; o8 e1 Q                             24        0.000000            0.000000
                             25        0.000000            0.000000
                             26        0.000000            0.000000
7 M$ [4 I5 G2 S! ]: O8 {5 I. a                             27        0.000000            0.000000

olh2008

VB中调用Lingo使用DLL就行了

olh2008

这是一个例子，可以参考一下。
& c, l1 w1 c* q' s( x Staff1.rar (8.2 KB, 下载次数: 6)

2010-4-16 07:50 上传

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

cqwj

回复 3# olh2008


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

olh2008

指针怎么写到数模里

, L- c* I7 _, T这是什么意思？

legan

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

funintears

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

haoshuang3394

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

风云雨哲

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

cqwj

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