FTT 函數的應用;尚欠缺一些函數如何用VB補足?

請教　FTT
A0/2+SUM [ An COS(2 Pi *ft) +Bn Sin (2Pi *ft) ]

* 後續處理應用有關函數------複數除法;　複數的絕對值;　複數乘法;　　　　　　　　　　　複數的實數部份; 複數的虛數部份.
　　以上函數在Excel ------IMDIV( ) ; IMABS ( );　IMPRODUCT ( );
IMREAL ( ) ; IMAGINARY( ) 均很完備;可是奇狐似乎欠 缺.


＊＊＊如何用 VB語法 寫出這些函數??? ＊＊＊

這已是數學演算的問題了

小弟剛好手中有一本 QuickBasic 程式設計的書
裡面有介紹複數函數的程式撰寫
QuickBasic 的語法與 VBScript 的語法約百分之90是相同的
裡面有介紹複數的加減乘除等以程式語言如何撰寫
僅能提供您此資訊, 有興趣請自行研究

書名:Microsoft QuickBasic 程式設計師的工具箱
原著:JOHN CLARK CRAIG
編譯:葉敏宏
ISBN:957-22-0541-2
書號:2101384
出版社:松崗電腦圖書資料股份有限公司
出版時間:民國79年12月初版

由於是陳年老書, 請到圖書館找尋借閱
也可到公司找我借閱
相關解說於此書的第105 頁開始(有原碼喔)

FTT 函數的應用;尚欠缺一些函數如何用VB補足?

謝謝總版主,
努力以赴!!