标题：自定义函数的问题

Function SpkStr(Formula,str)
    '系统会在逐K线模式解释公式时的每个周期都会调用此函数一遍，因此设计时应该注重程序的执行效率，不要重复的执行一些没必要的代码
    '防止公式逐周期模式时调用
    If Formula.WorkMode = 0 Then
        Exit Function
    End If
    set spk=CreateObject("SAPI.SpVoice")
    spk.Speak str
End Function

http://www.weistock.com/bbs/dispbbs.asp?boardid=5&Id=156670

已回复