pthamnb > 16-04-12, 09:09 AM
uronmapu > 10-06-12, 11:04 PM
ledangvan > 11-06-12, 10:35 AM
(10-06-12, 11:04 PM)uronmapu Đã viết: Tạo chữ chạy luôn mà không nhấn gì cả thì như thế nào ạ
uronmapu > 11-06-12, 11:20 AM
uronmapu > 11-06-12, 01:24 PM
(11-06-12, 10:35 AM)ledangvan Đã viết:(10-06-12, 11:04 PM)uronmapu Đã viết: Tạo chữ chạy luôn mà không nhấn gì cả thì như thế nào ạ
Gửi bạn File chạy chữ luôn mà không nhấn gì cả ... http://www.mediafire.com/?7byi1p0r84razpm
ledangvan > 11-06-12, 01:43 PM
(11-06-12, 01:24 PM)uronmapu Đã viết:(11-06-12, 10:35 AM)ledangvan Đã viết:(10-06-12, 11:04 PM)uronmapu Đã viết: Tạo chữ chạy luôn mà không nhấn gì cả thì như thế nào ạ
Gửi bạn File chạy chữ luôn mà không nhấn gì cả ... http://www.mediafire.com/?7byi1p0r84razpm
Mà mình không muốn tạo cái tblthongtin như bạn làm, tạo luôn trong form được ko bạn?
Ví dụ cho chạy text: CHAO MUNG DEN VOI THU THUAT ACCESS
uronmapu > 11-06-12, 02:09 PM
Private Sub Form_Load()
Me.TimerInterval = 150
End Sub
Private Sub Form_Timer()
Dim x As String, y As String
x = Left(Label0.Caption, 1)
y = Right(Label0.Caption, Len(Label0.Caption) - 1)
Label0.Caption = y + x
End Sub
'Chữ chạy ngon từ phải qua trái
'Muốn chữ chạy ngược lại thì đổi left cho right, right cho left và đổi câu lệnh cuối thành
'Label0.Caption = x+y (Ở trên là y+x)
thquanks > 26-07-13, 12:17 PM
thuydungtht > 03-04-14, 03:09 PM