for i = 0 to 9
for j = 0 to 9
for k = 0 to 9
for l = 0 to 9
t = i * 1000 + j * 100 + k * 10 + l
if len(string(t)) = 4 then
dw_1.addrow()
dw_1.setitem(dw_1.rowcount(),1,string(t))
end if
next
next
next
next
int li_num//假定输出的是整型,若要求字符型的 自己改一下
for i=1 to 9
for j=0 to 9
for k=0 to 9
for t=0 to 9
li_num=integer(trim(string(i))+trim(string(j))+trim(string(k))+trim(string(l)))
dw_1.setitem('colname',li_num)
next
next
next
next