Controls 控制並赋值

For Each con As Control In Me.Controls
If TypeOf (con) Is Label Then
CType(con, Label).Text = "值"
End If
Next