打印本文
關(guān)閉窗口
1.軟件的示例 DefaultProject--模塊--Function下第一個(gè)例子 Function TriangleShape(Formula,Cyc,SCyc,ECyc)每次打開管理面板--高級(jí) 都報(bào) 編譯錯(cuò)誤--1002.我仔細(xì)檢查過似乎沒有語法錯(cuò)誤，即使把函數(shù)體移除，只保留一個(gè)空殼還是同樣報(bào)錯(cuò)。如圖
此主題相關(guān)圖片如下：1001.png
2.示例函數(shù) CU_MA1和CU_MA2，我編入指標(biāo)公式，測(cè)試正常，但在技術(shù)分析界面始終顯示為0. 在VB中用MsgBox 顯示從金字塔中讀取數(shù)據(jù)正常，如圖
此主題相關(guān)圖片如下：1002.png
此主題相關(guān)圖片如下：1003.png
請(qǐng)問是哪里出問題呢？謝謝
TriangleShape這個(gè)函數(shù)你自己胡亂修改他源代碼了，原始代碼是這樣的。
Function TriangleShape(Formula,Cyc,SCyc,ECyc)
' 'msgbox cyc & "-" & scyc & "-" & ecyc
' '該函數(shù)計(jì)算當(dāng)前位置圖形是否是三角形突破，如果是則返回1，否則返回0。該函數(shù)只有在選股時(shí)才能使用。
' TriangleShape=0
'
' '如果是分時(shí)數(shù)據(jù)或者分筆成交那么直接返回
' If Formula.ParentGrid.DataType = 0 or Formula.ParentGrid.CycType = 10 Then
' Exit Function
' End If
vba啟動(dòng)了沒，切換品種試試呢，另外直接在函數(shù)里把返回值強(qiáng)制返回一個(gè)比如10再看看。
1.第一個(gè)問題，我那個(gè)改動(dòng)是故意的，就是看看沒有函數(shù)主題的時(shí)候是否報(bào)錯(cuò)，結(jié)果當(dāng)然是報(bào)錯(cuò)。我把程序重裝一遍，保證沒有改動(dòng)，還是這樣。不過我估計(jì)問題是這樣：我的系統(tǒng)是64位，不小心裝了32位的金字塔，現(xiàn)在改為64位，出現(xiàn)新問題：進(jìn)入調(diào)試，提示“你必須安裝windows腳本調(diào)試補(bǔ)丁....”“已成功安裝....”，重啟機(jī)器，再來，還是同樣的問題。請(qǐng)指教該如何做？
2.安裝64位后，自定義函數(shù)可以用了，顯示的效果和預(yù)期的一樣！
64位VB啟動(dòng)后不能停止，停下再啟動(dòng)就報(bào)出現(xiàn)異常（如圖）。32位的則沒有這個(gè)問題
此主題相關(guān)圖片如下：1004.png