VB 高手速度进，在线等！！！

vb 问题怎么不到vb那个专区去问

按钮单击事件中写:
for a= 1 to 11 setp 2
b=b+jc(a)
next a
msgbox b
----------------------------
function jc(c as integer)
for d= 1 to c
e=e*d
next d
jc=e
end tunction
----------------------------
应该是这样，没有测试，自己试一下