Есть ли способ сократить код VB.net?

Question

Здесь мои коды VB, могу ли я укоротить одну или две строки?

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

Answer 1

Умм, я не думаю, что это возможно. Вы можете попробовать использовать оператор with, но это будет , только уменьшите количество символов, а не строк. На самом деле линии будут увеличиваться.

Answer 2

Используйте двоеточие, чтобы закончить линию.

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

Вопрос в том, почему вы хотите? Не похоже, что это имеет значение, когда программа работает, и это делает функциональность более запутанной.

Answer 3

Нет, это невозможно. Вы можете уменьшить его до одной/двух строк с помощью двоеточия, но это просто для удобства чтения. Это не имеет никакого другого влияния.

Answer 4

Вы можете попробовать этот синтаксис:

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

Хотя я бы серьезно попытаться сделать этот код более ремонтопригодны, не короче.

Начните с того, чтобы дать вашим TextBoxes лучшие имена.