请教关于 ppt VBA的一个问题。

Question

dim a as string
a = cstr(cdbl(slide2.textbox1.text)+cdbl(slide2.textbox2.text)+cdbl(slide2.textbox3.text)+cdbl
(slide2.textbox4.text)+cdbl(slide2.textbox5.text)+cdbl(slide2.textbox6.text)+cdbl(slide2.textbox7.text)+cdbl(slide2.textbox8.text))/8
if a < 1 then
a = "0" + a
else
a = a
end if
slide2.label2,caption = a
这段代码中第二行“a = ”后面的cstr函数有什么用？？？是不是有点多余呀？？？

Answer 1

cstr是把数字转文本，这样做会导致后面的a<1这种判断出问题，不是多余，而是不应该有