Have multiple objects in a With statement in VB?

Question

I have a lot of labels in VB that I use in With statement to set their properties.

Problem Is there any way I can do something like the following:

With lblA, lblB, lblC
    .fontColor = color.Red
End With

Is this possible, or do I have to manually do a With statement for each of them?

Answer 1

There is a shorter and more readable version of your solution:

For Each lbl As Label In {lblA, lblB, lblC}
  With lbl
    '...
  End With
Next