-
Tạo Label nhấp nháy
Noname > 22-09-10, 09:32 AM
Share by : hungtano - KHPT
Hỏi:
Tôi có 1 Form. Tôi muốn khi người dùng mở Form này thì thanh tiêu đề của Form (Form caption) nhấp nháy dòng chữ : Dữ liệu đã bị khóa ! Tôi phải làm sao ?
Đáp:
Bạn dùng 2 sự kiện của Form: Open và Timer
Mã:Private Sub Form_Open(Cancel As Integer)
Me.Caption = "Dữ liệu đã bị khóa !"
Me.TimerInterval = 600
End Sub
Mã:Private Sub Form_Timer()
If Me.Caption = Space(1) Then
Me.Caption = "Dữ liệu đã bị khóa !"
Else
Me.Caption = Space(1)
End If
End Sub
-
RE: Tạo Label nhấp nháy
nthienthbk53 > 18-11-10, 01:24 AM
Em đang học về access nhưng mà chưa học vba ? vậy nhưng cái code này em phải cho vào đâu vậy anh chị? chỉ giùm em với -
RE: Tạo Label nhấp nháy
haquocquan > 18-11-10, 01:30 AM
Trong hai sự kiện của form: form Open và form timer -
RE: Tạo Label nhấp nháy
Noname > 18-11-10, 09:41 AM
(18-11-10, 01:24 AM)nthienthbk53 Đã viết: Em đang học về access nhưng mà chưa học vba ? vậy nhưng cái code này em phải cho vào đâu vậy anh chị? chỉ giùm em với
Ở chế độ design form, bạn vào properties, qua tab event,rồi mò từ event một. Có thể qua box Thư Viện Giáo Trình để tìm tài liệu đọc thêm bạn nhé! -
RE: Tạo Label nhấp nháy
Noname > 25-01-11, 02:51 PM
Demo Label nhấp nháy!