如何单步调试vbs代码
作者:金字塔 来源:cxh99.com 发布时间:2015年08月31日
- 咨询内容:
请问如何用f8键单步调试<% %>中的代码?,谢谢 m1:c; m2:c; m3:c; n1:=5; n2:=10; n3:=13; <% vc=ffl.vardata("m1") vm1=ffl.vardata("m1") vm2=ffl.vardata("m2") vm3=ffl.vardata("m3") vn1=ffl.vardata("n1") vn2=ffl.vardata("n2") vn3=ffl.vardata("n3")
vn1=vn1-1 vn2=vn2-1 vn3=vn3-1
for i=0 to Ubound(vm1) if i>=vn1 then vm1(i)=f(i,vn1) end if if i>=vn2 then vm2(i)=f(i,vn2) '调用自定义过程(函数)f(i,vn2) end if if i>=vn3 then vm3(i)=f(i,vn3) '调用自定义过程(函数)f(i,vn3) end if next
ffl.vardata("m1")=vm1 ffl.vardata("m2")=vm2 ffl.vardata("m3")=vm3
ffl.varStartIndex("m1")=vn1 ffl.varStartIndex("m2")=vn2 ffl.varStartIndex("m3")=vn3
'以下定义求Y日平均值的函数(过程) function f(x,y) sumc=0
'求Y日收盘价之和 for j=0 to y sumc=sumc+vc(x-j) next
'函数f返回Y日均价 f=sumc/(y+1) end function %>
- 金字塔客服:
PEL中的VBS代码是无法单步跟踪的.
VBA中的宏代码可以的
- 用户回复:
请问老师,上面的代码如何转为宏代码,谢谢。