<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	>
<channel>
	<title>Comments on: Calling VC-made DLL from VB</title>
	<atom:link href="http://www.jeffhung.net/blog/articles/jeffhung/291/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.jeffhung.net/blog/articles/jeffhung/291/</link>
	<description>(My smile insists of having nose. :-)</description>
	<pubDate>Wed, 20 Aug 2008 17:58:15 +0000</pubDate>
	<generator>http://wordpress.org/?v=2.6.1-alpha</generator>
		<item>
		<title>By: 布丁</title>
		<link>http://www.jeffhung.net/blog/articles/jeffhung/291/#comment-1548</link>
		<dc:creator>布丁</dc:creator>
		<pubDate>Sun, 12 Mar 2006 15:05:50 +0000</pubDate>
		<guid isPermaLink="false">http://www.jeffhung.idv.tw/blog/?p=291#comment-1548</guid>
		<description>我是VC++新手,對製作DLL FOR VB 有興趣
但是一直試不出來,不知道是否方便指導一下呢

列如VB呼叫端引用方式為
Public Declare Sub mytest Lib "test.dll" (ByVal InputStr as String,ByRef MyRtn as String)

Private Sub Command1_Click()
Dim a as String, b as String
a = "123456"
Call mytest(a,b)
MsgBox b
End Sub

InputStr 為輸入的字串 ,MyRtn 為回傳回來的字串

問題來了~~在C++ 這邊該如何寫呢?</description>
		<content:encoded><![CDATA[<p>我是VC++新手,對製作DLL FOR VB 有興趣<br />
但是一直試不出來,不知道是否方便指導一下呢</p>
<p>列如VB呼叫端引用方式為<br />
Public Declare Sub mytest Lib "test.dll" (ByVal InputStr as String,ByRef MyRtn as String)</p>
<p>Private Sub Command1_Click()<br />
Dim a as String, b as String<br />
a = "123456"<br />
Call mytest(a,b)<br />
MsgBox b<br />
End Sub</p>
<p>InputStr 為輸入的字串 ,MyRtn 為回傳回來的字串</p>
<p>問題來了~~在C++ 這邊該如何寫呢?</p>
]]></content:encoded>
	</item>
</channel>
</rss>
