• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Tạo thư viện liên kết động (DLL) bằng VB6

Các ví dụ nho nhỏ và những thứ linh tinh không thuộc nhóm nào
tindl88
Thành viên tâm huyết
Thành viên tâm huyết
Bài viết: 363
Ngày tham gia: T.Bảy 26/04/2008 6:10 pm
Has thanked: 16 time
Been thanked: 10 time

Tạo thư viện liên kết động (DLL) bằng VB6

Gửi bàigửi bởi tindl88 » T.Năm 13/08/2009 7:14 pm

Tên chương trình: VB Club Dll
Ngôn ngữ lập trình: VB6
Tác giả: Sưu tầm
Chức năng: Tạo thư viện liên kết động bằng VB


HD:
Vào thư mục C:\Program Files\Microsoft Visual Studio\VB98 đổi tên tập tin Link.exe thành LinkLnk.exe.
Mở thư mục Linker copy tập tin Link.exe dán vào C:\Program Files\Microsoft Visual Studio\VB98.

Tạo một file *.Def với nội dung sau:

NAME vbClubDll
LIBRARY vbClubFunction
DESCRIPTION "VB Club Functions 1.0"
EXPORTS DllMain @1
vbClub_OnTop @2
vbClub_MinimizeAllWindow @3
vbClub_RestoreAllWindow @4
vbClub_GetColor @5
vbClub_MouseClick @6
vbClub_KeyPress @7

Lưu vào thư mục Test

Mở thư mục DLL chạy project -> Make Dll. Nếu khi tạo file dll mà có báo lỗi thì bạn coi lại tập tin .def, coi lại có thừa hoặc thiếu function nào không.

Mở thư mục Test để test :D
Tập tin đính kèm
vbClub Dll.rar
Tạo thư viện liên kết động (DLL) bằng VB6
(27.37 KiB) Đã tải 1491 lần


cứng nhắc...vớ vẩn

Hình đại diện của người dùng
Tkkk_Vnn
Thành viên tích cực
Thành viên tích cực
Bài viết: 143
Ngày tham gia: T.Sáu 23/04/2010 4:18 pm
Đến từ: Yên Bái-Việt Nam
Been thanked: 1 time

Re: Tạo thư viện liên kết động (DLL) bằng VB6

Gửi bàigửi bởi Tkkk_Vnn » T.Tư 08/12/2010 7:04 pm

Tuyệt cú mèo !

conso0va0
Thành viên chính thức
Thành viên chính thức
Bài viết: 10
Ngày tham gia: T.Năm 26/08/2010 3:53 pm
Has thanked: 2 time

Re: Tạo thư viện liên kết động (DLL) bằng VB6

Gửi bàigửi bởi conso0va0 » T.Tư 13/04/2011 11:39 am

Xin hỏi thêm khi tạo DLL kiểu này khi khi sử dụng lại các hàm viết trong DLL trên VBA (của Excel) thì sẽ phải thực hiện như thế nào?
Khi mình dùng VBA (Excel) Call các hàm trong DLL (như cách đã hướng dẫn ở trên) thì khi chạy phát sinh lỗi Run-time error '53' File not found vbClub.dll

Hình đại diện của người dùng
Tkkk_Vnn
Thành viên tích cực
Thành viên tích cực
Bài viết: 143
Ngày tham gia: T.Sáu 23/04/2010 4:18 pm
Đến từ: Yên Bái-Việt Nam
Been thanked: 1 time

Re: Tạo thư viện liên kết động (DLL) bằng VB6

Gửi bàigửi bởi Tkkk_Vnn » T.Tư 13/04/2011 6:47 pm

Runtime error 53 là lỗi cơ bản , bạn phải đặt thư viện Dll trong cùng thư mục của chương trình chạy ,hay bạn có thể copy file vào system32 đó , sau đó gọi hàm Vb6 mới được !

conso0va0
Thành viên chính thức
Thành viên chính thức
Bài viết: 10
Ngày tham gia: T.Năm 26/08/2010 3:53 pm
Has thanked: 2 time

Re: Tạo thư viện liên kết động (DLL) bằng VB6

Gửi bàigửi bởi conso0va0 » T.Tư 13/04/2011 10:24 pm

Mình đã thử 2 cách bạn nói nhưng chưa được. Xin lưu ý, mình dùng VB 6.0 gọi các hàm trong file *.dll đó thì vẫn bình thường nhưng mình gặp lỗi đó khi mình gọi bằng VBA trong Excel thì gặp lỗi đó. Xin mọi người hỗ trợ thêm!
Automation error
The Object invodek has disconnected from clients


Quay về “[VB] Mã nguồn linh tinh”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.1 khách