Chào mọi người. cho mình hỏi là làm thế nào để khi di chuyển chuột vào 1 label trên form thì nó sẽ tự động chuyển sang chữ in đậm không ạ

(21-08-20, 04:54 PM)longkd_bvct@yahoo.com.vn Đã viết: Chào mọi người. cho mình hỏi là làm thế nào để khi di chuyển chuột vào 1 label trên form thì nó sẽ tự động chuyển sang chữ in đậm không ạ

Label không có thuộc tính hover đâu bạn có thể tạo 1 button sau ngụy trang thành label cũng được

Dùng sự kiện Mouse over.

Em dùng sự kiện on mouse move
Me. Label. Fontbold = true
Nhưng g chỉ in đậm khi di chuyển chuột đến. Khi di chuột đi thì nó không trở lại in thường

thì bạn dùng sự kiện khi di chuyển ra khỏi lablel thì
Me. Label. Fontbold = False

Đúng rồi cho nó đậm chứ đâu có lệnh cho nó trở lại bình thường. Giả sử label có tên A => thì khi chuột ra khỏi label -> Detail, FormHeader, FormFooter... thì phải có lẹnh FontBold = False để nó bình thường

Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
     A.FontBold = False
End Sub

Private Sub A_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    A.FontBold = True
End Sub

Lưu ý. Nên đặt các label có khoảng hở dể khi trỏ chuột rời khỏi label thì đi vào ngay các vùng Detail, FormHeader, FormFooter... viết lệnh sẽ nhẹ hơn

(21-08-20, 10:11 PM)tranthanhan1962 Đã viết: Đúng rồi cho nó đậm chứ đâu có lệnh cho nó trở lại bình thường. Giả sử label có tên A => thì khi chuột ra khỏi label -> Detail, FormHeader, FormFooter... thì phải có lẹnh FontBold = False để nó bình thường

Lưu ý. Nên đặt các label có khoảng hở dể khi trỏ chuột rời khỏi label thì đi vào ngay các vùng Detail, FormHeader, FormFooter... viết lệnh sẽ nhẹ hơn

Chính xác cách làm là như anh tranthanhan1962 đã hướng dẫn. 
Tôi thì thường thiết kế có 1 một cái khung (Rectangle) bao quanh các label vừa để trang trí vừa làm cái nhiệm vụ của vùng Detail, Header. Footer... như code anh Ân.

Vâng em cảm ơn mọi người