代码过长怎么办？

[wyg]

我在一个按钮的单击事件中写了过长的代码为：分别为
dw_1.object.x1_t.text=""
...
dw_1.object.x25_t.text=""
...
dw25.object.x1_t.text=""
...
dw25.object.x25_t.text=""
也就是分别为25个数据窗口下的25个标题符一个值请问如何精简这段代码

[929]

string ls_colcount
integer col
string setting
ls_colcount = dw_1.Object.DataWindow.Column.Count
for col=1 to integer(ls_colcount)
setting = dw_1.Describe("#"+string(col)+".Name")
dw_1.Modify(setting+"_t.text=''")
next

[redbird]

用describe和modify函数,轻松解决

[edpzjh]

string ls_modify
integer li_counter
for li_counter = 1 to 25
ls_modify = ls_modify + "x" + string(li_counter) + "_t.text='' "
next

dw_1.Modify(ls_modify)
...
dw25.Modify(ls_modify)