Hỏi: Hiển thị thông tin khi chỉ chuột vào CommandButton (2 người xem)

pro8x · 31/3/14

Xin chào mọi người trên 4r. Em có làm 1 form và khi di chuột vào botton trên form sẽ hiện thông tin ( Kiểu như comment trên cell vậy), Hiện tại em dang dùng Controltiptext nhưng có vấn đề là kiểu hiển thị này chỉ hiển thị trên 1 dòng, nếu thông tin dai thì sẽ rất khó xem, Mọi người chỉ em cách để hiển thị dưới dạng hình vuuông như comment trên cell được không ah

nghiaphuc · 1/4/14

siwtom đã viết:
......................................
Tôi đã gửi lại tập tin ở bài #11. Bạn và bạn nghiaphuc kiểm tra và thông báo cho tôi nhé.

Lúc chiều em mở tập tin trước ở trên trường, xài Win XP và Excel 2010 thì chạy file lúc trước bình thường. Còn máy của em xài Win 7, Excel 2010 (cả 2 máy ở trường và ở nhà đều xài bản 32 bit) thì cả file trước và file này đều không thấy động tĩnh gì cả. Như vậy thì có lẽ là vấn đề ở chỗ "class của cửa sổ con" trong trường hợp này không phải là 2 giá trị "F3 Server 60000000" hay "F3 Server 6a070000".

Vậy làm cách nào để biết được giá trị này trong từng trường hợp cụ thể vậy bác?

siwtom · 1/4/14

nghiaphuc đã viết:
Lúc chiều em mở tập tin trước ở trên trường, xài Win XP và Excel 2010 thì chạy file lúc trước bình thường. Còn máy của em xài Win 7, Excel 2010 (cả 2 máy ở trường và ở nhà đều xài bản 32 bit) thì cả file trước và file này đều không thấy động tĩnh gì cả. Như vậy thì có lẽ là vấn đề ở chỗ "class của cửa sổ con" trong trường hợp này không phải là 2 giá trị "F3 Server 60000000" hay "F3 Server 6a070000".

Vậy làm cách nào để biết được giá trị này trong từng trường hợp cụ thể vậy bác?

Bạn xem hộ tôi bài #20 nhé.

nghiaphuc · 1/4/14

siwtom đã viết:
Bạn xem hộ tôi bài #20 nhé.

Dạ, cảm ơn bác, em gửi bài rồi mới đọc được bài #20. Em kiểm tra thì nó ra giá trị là "F3 Server 50140000". Em đã sửa lại và chạy được rồi, rất đẹp.
Xin cảm ơn bác nhiều!

KUMI · 1/4/14

siwtom đã viết:
Bạn có thể giúp tôi được không?

1. Tải ReadClass.rar về và bung ra.
2. Nếu bạn có Visual Basic thì tự compile project. Nếu không thì đã có ReadClass.exe rồi.
3. Chạy ReadClass.exe
4. Mở tập tin ở bài #11
5. Đặt UserForm và ReadClass.exe ở bên cạnh nhau rồi đưa trỏ chuột vào vd. Image
5. Bạn chụp màn hình và gửi để tôi xem. Hoặc bạn ghi lại ở dòng thứ 2 nó viết là ClassName gì.

Mà bạn dùng Excel, Windows nào đấy?

À, bạn test thế nào đấy? Video chạy nhanh nên tôi không biết bạn có dừng không. Bạn đưa trỏ chuột vào Image, hoặc CommandButton hoặc ComboBox rồi dừng một tí xem có gì hiển thị không. Không phải click gì cả.

Dạ cảm ơn Bác con dùng Win7 Ofice 2010 Bác ạ!
Vâng bác xem đoạn video chậm hơn nhé!
[video=youtube;IBXiLsy1aDs]https://www.youtube.com/watch?v=IBXiLsy1aDs&feature=youtu.be[/video]
Còn mấy bước trên để thực hiện con chưa hiểu lắm, con sẽ từ từ thực hiện như Bác hướng dẫn rồi thông tin lại cho Bác biết.
--------------
Nếu có bạn nào rành thì test giúp mình mà cách Bác Siwtom đã chỉ nhé!
Xin Cảm ơn!

siwtom · 1/4/14

Tô thử không đọc cửa sổ con theo class nữa mà đọc "con đầu lòng" của "ThunderDFrame"

Nhờ các bạn test hộ.

KUMI · 1/4/14

OK! đọc được rồi Bác ạ!hihi , con cảm Bác!
Con con gửi Bác cái hình lúc chưa được:

Và lúc được:

siwtom · 1/4/14

nghiaphuc đã viết:
Dạ, cảm ơn bác, em gửi bài rồi mới đọc được bài #20. Em kiểm tra thì nó ra giá trị là "F3 Server 50140000". Em đã sửa lại và chạy được rồi, rất đẹp.
Xin cảm ơn bác nhiều!

Cảm ơn bạn.
Như thế thì không tìm theo danh sách nữa. Tức không dò 60000000, 6a070000 rồi 50140000. Như thế có mà chết.
Tôi thử đọc "con đầu lòng" của "ThunderDFrame"

Bạn test hộ tập tin ở bài #25

nghiaphuc · 1/4/14

KUMI đã viết:
--------------
Nếu có bạn nào rành thì test giúp mình mà cách Bác Siwtom đã chỉ nhé!
Xin Cảm ơn!

Bạn phải chạy file ReadClass.exe rồi mới rê chuột vào Form này, trong cửa sổ của ReadClass.exe sẽ hiện ra chuỗi này ở dòng thứ 2. Bạn gõ lại chuỗi này vào câu lệnh hChild = FindWindowEx(hForm, 0, "F3 Server 60000000", vbNullString), sẽ chạy được.

Bác siwtom ơi, vấn đề có vẻ như rắc rối rồi. Mỗi lần mở file ra, nó phát sinh một chuỗi khác nhau, vậy thì phải làm sao?

Lại gửi chậm nữa rồi! File mới #25 đã tốt rồi. Cảm ơn bác.

siwtom · 1/4/14

KUMI đã viết:
OK! đọc được rồi Bác ạ!hihi , con cảm Bác!

Cảm ơn bạn.
Đọc được nhưng bạn dùng tập tin ở bài nào?

siwtom · 1/4/14

nghiaphuc đã viết:
Bạn phải chạy file ReadClass.exe rồi mới rê chuột vào Form này, trong cửa sổ của ReadClass.exe sẽ hiện ra chuỗi này ở dòng thứ 2. Bạn gõ lại chuỗi này vào câu lệnh hChild = FindWindowEx(hForm, 0, "F3 Server 60000000", vbNullString), sẽ chạy được.

Bác siwtom ơi, vấn đề có vẻ như rắc rối rồi. Mỗi lần mở file ra, nó phát sinh một chuỗi khác nhau, vậy thì phải làm sao?

Bạn test hộ tập tin bài #25 nhé

KUMI · 1/4/14

siwtom đã viết:
Cảm ơn bạn.
Đọc được nhưng bạn dùng tập tin ở bài nào?

Con test Bài #25 Bác ạ!

siwtom · 1/4/14

KUMI đã viết:
Con test Bài #25 Bác ạ!

Như thế thì không Thắng, Anh, Dũng gì hết. Cứ tóm "con đầu lòng" thôi.
Hi vọng là bác Bill không đặt mìn ở chỗ nào nữa. Chơi nhau thế thì khăm quá. Mỗi lần ra 1 class khác. Bó tay.

pro8x · 1/4/14

ủa bài #25 cũng hiển thị giống bài 11 mà. À các bác cho em hỏi vụ thay chữ bằng ảnh với, liệu có được không nhỉ.

nghiaphuc · 1/4/14

pro8x đã viết:
ủa bài #25 cũng hiển thị giống bài 11 mà. À các bác cho em hỏi vụ thay chữ bằng ảnh với, liệu có được không nhỉ.

Có lẽ máy bạn xài Win XP nên file ở bài #11 (file ban đầu) đã có thể chạy bình thường rồi. Bạn thử chạy trên Win 7 xem nào, tôi tin là file ở bài #11 sẽ có thể chẳng có động tĩnh gì cả. Còn file ở bài #25 thì đã khắc phục được vấn đề này (thuật toán có hơi khác một chút so với file ở bài #11).

Còn vấn đề bạn hỏi, có lẽ phải chờ đến các cao thủ ra tay thôi, tôi thì chịu chết.

ndu96081631 · 2/4/14

pro8x đã viết:
À các bác cho em hỏi vụ thay chữ bằng ảnh với, liệu có được không nhỉ.

Load ảnh lên Form đâu phải là vấn đề gì lớn chứ nhỉ? Trên diễn đàn có cả "rừng"

Hoàng Trọng Nghĩa · 2/4/14

pro8x đã viết:
ủa bài #25 cũng hiển thị giống bài 11 mà. À các bác cho em hỏi vụ thay chữ bằng ảnh với, liệu có được không nhỉ.

Tạo một Label, dùng sự kiện MouseMove trên form và các controls để LoadPicture lên Label đó, tôi nghĩ không khó đâu.

pro8x · 2/4/14

À,các anh ơi có chút vấn đề nữa là nếu button lồng trong Frame thì k có tác dụng,hic, e mò mãi mà chưa sửa đc.mọi người chỉ thêm e với

phucbugis · 2/4/14

pro8x đã viết:
À,các anh ơi có chút vấn đề nữa là nếu button lồng trong Frame thì k có tác dụng,hic, e mò mãi mà chưa sửa đc.mọi người chỉ thêm e với

bạn Up cái file đó lên được ko, để xem code bạn đã cài như thế nào ? %#^#$

pro8x · 2/4/14

File ở bài #25 của simtw đó bạn,xem giúp m với
Ps. Truong bạn vào tạo chủ đề mới để đăng bài nhé

siwtom · 2/4/14

pro8x đã viết:
À,các anh ơi có chút vấn đề nữa là nếu button lồng trong Frame thì k có tác dụng,hic, e mò mãi mà chưa sửa đc.mọi người chỉ thêm e với

1. Tôi tách CreateTipsWindow cũ thành 2 sub: sub CreateTipsWindow và sub AddTool
2. Trong UserForm_Initialize bạn phải gọi CreateTipsWindow để tạo cửa sổ quản lý các tool. Tiếp theo cần hiển thị tooltip cho Control nào thì gọi AddTool và truyền Control đó
Trước khi gọi AddTool thì phải nhập các text cần hiển thị vào Tag của control. Nói cho cùng có thể gọi AddTool cho tất cả các control trên UserForm nhưng chỉ có những control có Tag <> "" mới được thêm tool.
3. Code bổ sung để hiển thị cho cả ListBox, Frame. Tôi không thêm được cho TextBox.

Hỏi: Hiển thị thông tin khi chỉ chuột vào CommandButton (2 người xem)

Người dùng đang xem chủ đề này

Thành viên hoạt động

File đính kèm

Thành viên gạo cội

Thành viên gắn bó

Thành viên gạo cội

Bụi phấn

Thành viên gắn bó

File đính kèm

Bụi phấn

Thành viên gắn bó

Thành viên gạo cội

Thành viên gắn bó

Thành viên gắn bó

Bụi phấn

Thành viên gắn bó

Thành viên hoạt động

Thành viên gạo cội

Huyền thoại GPE

Chuyên gia GPE

Thành viên hoạt động

Thành viên tích cực

Thành viên hoạt động

Thành viên gắn bó

File đính kèm

Đếm ngược thời gian