把bm整个显示在field中
for i=0 to 13
for j=0 to 11
field1.datavalue=field1.datavalue & bm(i,j) & " "
next j
field1.datavalue =field1.datavalue & vbcrlf
next i
for i=0 to 13
for j=0 to 11
field1.datavalue=field1.datavalue & bm(i,j) & " "
next j
field1.datavalue =field1.datavalue & vbcrlf
next i
static l as long
if l<=14 then
dim i as long
for i = 0 to 12
txtfield.text = bm(l,i)
next
l=l+1 detail.printsection
endif
static l as long不是:
private l as long其他的原因我暂时想不到.