Dim i As Integer
For i = 1 To 5
CType(Me.FindControl("Button" & i.ToString), Button).Text = "Button" & i.ToString
CType(Me.FindControl("Button" & i.ToString), Button).ToolTip = String.Format("第{0}個按鈕", i.ToString)
Next
For i = 1 To 5
CType(Me.FindControl("Button" & i.ToString), Button).Text = "Button" & i.ToString
CType(Me.FindControl("Button" & i.ToString), Button).ToolTip = String.Format("第{0}個按鈕", i.ToString)
Next