[VB6 ] 有關要設計一卜卦程式一問
各位大大好,小弟有一程式要設計…
因個人的一個心願(想幫廟裡的師兄寫個卜卦程式供他們查閱)
但自已只懂得依書上的作法完成了VB表單製作…
程式流程是:
A表單..
從26個問題挑選一題出來(對應到ACCESS檔的第A~Z行(26字母)的其中一行)
B表單..
選擇 1.人工卜卦(C表單 = 輸入六次硬幣正反面資料再連結到ACCESS檔的序號第某一行)
2.電腦卜卦 = 由電腦捉取當下的時間作運算(註)
註:在當下的時間為國曆,全部需轉變成農民曆後作運算。
上卦求法為(年+月+日)除以8取餘數0~7作上卦用 暫時假設:7
下卦求法為(年+月+日+時)除以8取餘數0~7作下卦用 暫時假設:0
變數卦求法為(年+月+日+時)除以6取餘數0~5作變數用 暫時假設:2
年是取生肖排列取1~12數、時是取12時辰排列取1~12數。
上卦及下卦作二進制排列為 111000 (位數排列:6~1)
經變數改變第二位數排列後 111010
再將上下卦拆開成為10進制的 7 2
然後對應到ACCESS檔的序號第72列
D表單..
將ACCESS檔內的該欄位內所有中文字顯示出來。
ACCESS檔:
裡面為 如下所示意的矩陣
a b c d e f g h ..... z (共26行)
00 [坤為地]
01
.
.
12
13
.
.
17
.
.
77 [乾為天]
︵
共
64
列
︶
以上…
小弟已完成A~D表單的制作,ACCESS建檔完成也自行打入3萬多個中文字了。
只剩下 最關鍵的 時間運算跟連結到ACCESS檔的程式碼不會寫...
請高手大大幫幫小弟,給小弟一些建議,感謝萬分。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.114.44.230
→
08/31 00:23, , 1F
08/31 00:23, 1F
→
08/31 00:23, , 2F
08/31 00:23, 2F
→
10/08 10:32, , 3F
10/08 10:32, 3F