PB 一个窗口有很多文本框singlelineedit 怎样批量清空文本框?该如何处理

PB 一个窗口有很多文本框singlelineedit 怎样批量清空文本框??
powerbuilder种一个窗体有很多singlelineedit
分别为
sle_1 sle_2 sle_3 sle_4...... sle_40

怎样用简介的语言将他们都清空不要一个一个去置空

注:
能不能定义一个变量
int i=1 加for循环然后去引用这个变量

例如 sle_(i).text = ""

------解决方案--------------------

C/C++ code


问：我现在有60个相同的控件，控件名为cbx_1~cbx_61现在我要对这60个控件做同样的处理，是否有办法用循环来处理呢？
就象
for i=1 to 61 
　　messagebox('',cbx_i.text)
next 
相似的处理，我上面用法当然是错误的，只是不知道有没有什么办法来解决呢？ 

Integer li_control
String ls_name
//This 是窗口，换成window的名字
FOR li_control = 1 TO UpperBound(This.Control[])
　　ls_name = This.Control[li_control].classname()
　　IF Left(ls_name,4) = 'cbx_' AND &
　　　　Integer(Right(ls_name(),Len(ls_name) - 4)) >= 1 AND &
　　　　Integer(Right(ls_name(),Len(ls_name) - 4)) <= 61 THEN 
　　　　//此处处理
　　　　CheckBox cbx_which
　　　　cbx_which = This.Control[li_control]
　　　　messageBox('',cbx_which.Text)
　　END IF
NEXT

------解决方案--------------------

刚才给你写了一个，你看看。复制过去就能用。

integer li_1,li_2
singlelineedit l_sle
string ls_name		//存储控件的名字
li_1 = upperbound(parent.control[])	//得到当前窗口中控件的数量

for li_2 = 1 to li_1
	 if parent.control[li_2].typeof() = singlelineedit! then		
		l_sle = parent.control[li_2]
		l_sle.text = ""
	end if
next

PB 一个窗口有很多文本框singlelineedit 怎样批量清空文本框?该如何处理

相关推荐