Ver originalDim cadena as String For i=0 to 20 If text1(i).text<>"" Then cadena=cadena & text1(i).text End IfNext