Mọi người giúp bai VB này với

4 views
Skip to first unread message

ma dinh tinh

unread,
Oct 7, 2012, 5:58:49 AM10/7/12
to spti...@googlegroups.com
Option Explicit
Dim s1 As String

Private Sub Form_Load()
    s1 = "    Welcom to Ma Dinh Tinh Computer!!!    "
End Sub

Private Sub Timer1_Timer()
    s1 = Right(s1, Len(s1) - 1) + Left(s1, 1)
    Text1.Text = s1
End Sub

Mình muốn cho cái Form1 nó không thể chỉnh size được. Mà chỉ nho nhỏ bằng cái text1 thôi.
Project1.vbp

ma dinh tinh

unread,
Oct 7, 2012, 6:14:50 AM10/7/12
to spti...@googlegroups.com
Hihi. tu tim ra rui. lam phien qua!!


Vào 16:58:49 UTC+7 Chủ nhật, ngày 07 tháng mười năm 2012, ma dinh tinh đã viết:
Reply all
Reply to author
Forward
0 new messages