🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: cn.bbs.comp.program
Article #1736

VB3.0��BC3.1��DLL�������!!!

#1736
From: ����
Date: Tue, 24 Mar 1998 00:00
32 lines
1146 bytes
��BC3.1�ж�������dll,�������Ϊc:\temp\tdll.dll
#include <windows.h>
int FAR PASCAL LibMain(HANDLE hInstance,WORD wDataSeg,WORD wHeapSize,
			LPSTR lpszCmdLine)
{
	if(wHeapSize!=0)
		UnlockData(0);
	return(1);
}
int FAR PASCAL test(int a,int b)
{
	int c;
        c=a+b;
	return c; 
}


��VB3.0��ģ��������¶���
Declare Function test Lib "c:\temp\tdll.dll" (ByVal a%, ByVal b%) As Integer
Ȼ����һcommand�ؼ����¼�click�µ���
Sub Command1_Click()
a=5
b=6
c=test(a,b)
End Sub
���к�,����command1�����:Sub or Function not defined

����ָ��.

--
�� ��Դ: �й�ƴ�BBSվ [bbs.ustc.edu.cn]
Technical Details
Message-ID: <980324.yHNn5$PBBS@bbs.ustc.edu.cn>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII
X-Google-Thread: fc86e,aecb6251510d4972,start
X-Google-Attributes: gidfc86e,public
From: Zhou_Yuanwei@bbs.ustc.edu.cn (����)
Subject: VB3.0��BC3.1��DLL�������!!!
Date: 1998/03/24
Message-ID: <980324.yHNn5$PBBS@bbs.ustc.edu.cn>
X-Deja-AN: 337143632
Organization: �й�ƴ�BBSվ
Newsgroups: cn.bbs.comp.program