数学建模社区-数学中国

标题: 求助 vb 调用matlab 编好的com 组件 有关解线性方程组的 [打印本页]
作者: hahaysw    时间: 2011-12-22 17:43
标题: 求助 vb 调用matlab 编好的com 组件 有关解线性方程组的
本帖最后由 hahaysw 于 2011-12-24 10:50 编辑
) B$ I+ R! z' b' |# s5 O9 w
: u7 S4 G5 c* C. |我用matlab 生成一个com 组件想在vb中调用，但自己没弄成，所以希望大家帮我看看问题出在哪里，我这有两个com 组件分别是dell 和untitled1分别有不同的功能 dell 是个解线性方程组的，难度较大。另外一个是求y=sqty(x)的简单com 组建 。我自己做了一个y=sqrt(x) 关键问题是不能显示出返回值来我的di二个com vb程序的类名是 gh1   这个com我也做了个程序 但是编辑框不能输入文字 请大家看看怎么了
: Z' z) ^1 e: I6 d& W: c第一个com 的类名是dell 我也做了个简单的调用vb程序 但没有定义其他变量
, k8 l9 ~, v: b& Z附件为保险我再重发一下
: ?8 f3 m4 q3 F5 j9 m1 {% d 第一个.zip (67.68 KB, 下载次数: 0)
" N& z7 M3 @4 l: {" k/ h+ F
. N  f4 ], D: \% {: ~6 G 第二个.zip (67.52 KB, 下载次数: 2) 2 U  ?9 @5 ~. Q! C7 I/ x, G
下面是我的第二个程序的代码! u- A- N7 w+ E% j# E/ M  J$ M9 k

( D4 |1 {, k: q$ d# ^Private Sub Form_Load()5 L# v* V: b/ r' `' u9 ~

1 I: H6 r' K) a% w: b" X
# ?) f2 y$ g3 _; d+ I! L1 c  q/ v- LDim x As Double
: u1 B/ O" Y- F: s9 V* GDim y As Variant9 V1 M* P" K1 L2 u. X
Dim mat As gh1
2 ^8 a, R- |  x3 [2 B+ {8 jOn Error GoTo handle_error
+ Y2 C; z! E8 K6 E. U8 e( D8 W( k! B. J% N( z9 }

" A+ ^: v+ g: A4 V7 L' SSet mat = New gh14 L* T) g; h- d% x, f& @7 \
x = 4: [$ C0 \( J1 z' ^6 g+ k9 o$ e
y = 28 R( D6 K$ q1 ~, N1 U, e
Call mat.gh(1, y, x)- j/ L/ o- B( M" [! K0 D- n+ z
Set mat = Nothing
1 z: q! v+ \+ OText2.Text = y
( m6 }# o- n# {5 n. j% x4 q+ Z, D' R( H& U; S( X2 N
handle_error: MsgBox (Err.Description)
+ L; _" W& |1 i' g2 `+ ?
5 b: Q9 x  @8 s4 i" M& BEnd Sub  m7 U+ |4 {- H+ d9 Z# }

1 h: q- l! V2 O6 D/ |1 B5 M# u4 ^Private Sub Text1_Change()0 p) z3 P5 s; ~8 B- G1 Y" d
x = CDbl(Text1.Text)
6 p* h7 m  u3 _End Sub
0 q/ I  ^4 x* ]0 v4 d# w
/ J% a- U$ g$ w1 vPrivate Sub Text2_Change()
6 W- L1 W+ `1 H% }" XText2.Text = yEnd Sub
$ U+ ?* n% r5 \% N! f6 t我估计是红字这，肯定错了但我也不知该改成什么 ，请高手帮忙。- c4 F" a1 o7 N/ {. Z8 k( K: E
本人 qq 1531145753  

截图.bmp (327.69 KB, 下载次数: 376)

截图.bmp

作者: hahaysw    时间: 2011-12-27 22:37
大家好我的那个问题是终于解决了，我就不悬赏了。
作者: sxjm567    时间: 2012-7-16 10:08
顶下再看哈
作者: hahaysw    时间: 2012-7-18 11:58
这个我解决了，在matalb 中文论坛里有我解决的相关文件
作者: hucchongzi    时间: 2014-1-27 16:17




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5