Tạo chữ chạy trong access. Dùng 2 sự kiện của Form: Open và Timer Private Sub Form_Open(Cancel As Integer) = "Dữ liệu đã bị khóa !" = 600 End Sub Private Sub Form_Timer() If = Space(1) Then = "Dữ liệu đã bị khóa !" Else = Space(1) End If End Sub | 1. cách tạo dòng chữ chạy trên form hoặc trên thanh tiêu đề của form dùng 2 sự kiện của Form: Open và Timer Private Sub Form_Open(Cancel As Integer) = "Dữ liệu đã bị khóa !" = 600 End Sub Private Sub Form_Timer() If = Space(1) Then = "Dữ liệu đã bị khóa !" Else = Space(1) End If End Sub cach 2: Tạo Dòng Chữ chạy trên form Hỏi Tạo dòng chữ chạy trên Form của Access: Cũng như mong muốn ở trên, trên 1 Form bất ký mình muốn chạy một dòng chữ để cần thông tin về vấn đề nào đó ví dụ như là "Chương trình này được tạo bởi" Đáp: Trích: Nguyên văn bởi HungTano Hùng Tano + Bạn tạo 1 label , tên : LblWelcome - 1 nút lịnh, tên CmdRun Nhập các đoạn code sau : Private Sub CmdRun_Click() = "This program is designed by ." & Space(3) = 200 End Sub Private Sub Form_Timer() Dim x, y As String x = Left(, 1) y = Right(, Len() - 1) = y + x End Sub
