输出html代码的表?
function setTable(rows,cols)
dim ir,ic,str
str="<table>"
for ir=1 to rows
str=str+"<tr>"
for ic=1 to cols
str=str+"<td>{$r_"+ir+"c_"+ic+"}</td>"
next
str=str+"</tr>"
next
str=str+"<table>"
setTable=str
end function
输出n行n列的html表格代码,其中每个单元格内依次标注{$r_行数c_列数},如果需要在某行某列的单元格中填入数据,只需要用replace,如str=replace(str,"{$r_3c_2}","这是第三行第二列的单元格")
第二个问题,不明白你的意思,请详细描述下