vb.net – 在VB中的With语句中有多个对象？

发布时间：2020-12-17 07:24:03 所属栏目：百科来源：网络整理

导读：我在VB中有很多标签,我在With语句中设置它们的属性. 问题有什么方法可以做以下事情： With lblA,lblB,lblC .fontColor = color.RedEnd With 这是可能的,还是我必须手动为每个人做一个With语句？解决方法我会将这些类型的项目保留在列表中,然后对它们应用

我在VB中有很多标签,我在With语句中设置它们的属性.

问题
有什么方法可以做以下事情：

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

这是可能的,还是我必须手动为每个人做一个With语句？

解决方法

我会将这些类型的项目保留在列表中,然后对它们应用每个循环,假设它们都是相同类型(或至少是基本类型).假设您正在使用类型标签的控件,这将是一个解决方案.请注意,我已将.fontColor修改为.ForeColor,以便此示例适用于Label类：

Dim lblList as new List(of Label) ({lblA,lblC})
lblList.ForEach(sub(x) x.Fore Color = color.red)

既然您已经发布了解决方案,您仍然可以执行以下操作以避免对您所创建的数组进行迭代循环(这就是为什么我将其作为列表执行),而不必考虑数组大小或任何内容：

lblList.ForEach(Sub(x)
                    With x
                       .BackColor = Color.Black
                       .Dock = DockStyle.Top
                       .TextAlign = ContentAlignment.MiddleCenter
                    End With
                 End Sub)

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!