是否有缩短VB.net代码的方法？

这里是我的VB代码，我可以缩短成一行或两行吗

cmbnA.Text = 1
cmbnJ.Text = 1
cmbnC.Text = 1
cmbsA.Text = "Standard"
cmbsJ.Text = "Standard"
cmbsC.Text = "Standard"

---

嗯，我认为这是不可能的。您可以尝试使用with语句，但这将

---

只减少字符数，不减少行数。事实上，行将增加。

使用冒号结束一行

cmbnA.Text = 1 : cmbnJ.Text = 1 'etc...

---

问题是你为什么要这么做？当程序运行时，它并没有造成什么不同，它使功能更加模糊。

不，这是不可能的。您可以使用冒号将其缩减为1/2行，但这只是为了可读性。它没有其他任何影响

您可以尝试以下语法：

Array.ForEach(Of TextBox)({cmbnA, cmbnJ, cmbnC}, Sub(a) a.Text = "1")

尽管我会认真研究如何使这段代码更易于维护，而不是更短

从给你的文本框起更好的名字开始