• Tạo Label nhấp nháy
  • 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!