用控件数组(例如用标签框)和一个计时器来控制标签框的显示
将标签框排成一个4X4的正方形
先显示第一排再显示第二排如此类推
到了显示到第四排就从新显示过~~
谁能教教我应该怎做呢??


请指教~~~

这还不简单

谁会做做~~

指点指点下我~~~

Dim i As Integer

Private Sub Timer1_Timer() If i < 16 Then Label1(i).Visible = True

i = i + 1 Else i = 0 For j = 0 To 15 Label1(j).Visible = False Next j End If End Sub