im src As IntegerDim dest As Integersrc = getindexOfTabName(sForm)dest = getindexOfTabName(sto)If (scr = -1) Or (dest = -1) ThenMsgBox "操作错误!!!"Exit SubEnd If
侃侃无极
浏览 90回答 1
1回答
呼唤远方
Dim src As IntegerDim dest As Integersrc = getindexOfTabName(sForm) <--- 第三行提示子程序或函数未定义dest = getindexOfTabName(sto)If (scr = -1) Or (dest = -1) ThenMsgBox "操作错误!!!"Exit SubEnd If