-3

这是我的VB代码,我可以缩短成一两行吗?

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

4 回答 4

2

你可以试试这个语法:

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

虽然我会认真考虑让这段代码更易于维护,而不是更短。

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

于 2013-09-21T17:26:45.213 回答
2

使用冒号结束一行。

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

问题是你为什么要这样做?程序运行时并没有什么不同,它使功能更加模糊。

于 2013-09-21T15:41:17.890 回答
0

嗯,我不认为这是可能的。您可以尝试使用with语句,但这只会减少字符数,而不是行数。事实上,线条会增加。

于 2013-09-21T15:39:58.913 回答
0

不,它不可能。您可以使用冒号将其减少到一/两行,但这只是为了便于阅读。它没有任何其他影响。

于 2013-09-21T15:46:24.670 回答