🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: cn.bbs.comp.program
1 messages
1 total messages Started by ���� Tue, 24 Mar 1998 00:00
VB3.0��BC3.1��DLL�������!!!
#1736
Author: ����
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]
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads