你的意思是总共有三列,任意填了两列,就可以自动填充第三列吧。 下面是解决这个问题的: for i = 0 to text1.count-1 if text1(i).text<> "" then if text2(i).text<>"" then text3(i).text=val(text1(i).text)/val(text2(i).text) elseif text3(i)<>"" then text2(i).text=val(text1(i).text)/val(text3(i).text) end if else if text2(i).text<>"" and text3(i).text<>"" then text1(i).text=val(text2(i).text)*val(text3(i).text) end if end if next i 以上的程序是我随便写写,忘了考虑除数为零的情况,你自己改吧
下面是解决这个问题的:
for i = 0 to text1.count-1
if text1(i).text<> "" then
if text2(i).text<>"" then
text3(i).text=val(text1(i).text)/val(text2(i).text)
elseif text3(i)<>"" then
text2(i).text=val(text1(i).text)/val(text3(i).text)
end if
else
if text2(i).text<>"" and text3(i).text<>"" then
text1(i).text=val(text2(i).text)*val(text3(i).text)
end if
end if
next i
以上的程序是我随便写写,忘了考虑除数为零的情况,你自己改吧