Dim s as String = "1,1,1,1,1,0,0,0,0,0"
s= s.Rplace(",","").Replace(",","")
Tables("xxx").Current("ddd") = s