;
帖子
3919 
精华
积分
11710 
鱼币
0 ¥ 
来自
大连 
在线时间
1858 小时 
注册时间
2007-6-11 
最后登录
2009-10-20 

贴图大师勋章新人进步勋章宣传大使勋章论坛元老勋章

3
发表于 2009-1-5 19:48 | 只看该作者
鍏巻杞啘鍘嗙殑鍑芥暟 - 缂栫▼搴 - Powered by SupeSite

浣犵殑浣嶇疆锛缂栫▼搴 >> 璧勮 >> VB >> 绯荤粺 >> 璇︾粏鍐呭 鍦ㄧ嚎鎶曠ǹ

鍏巻杞啘鍘嗙殑鍑芥暟

鍙戝竷: 2008-7-15 14:17 |  浣滆: 缃戠粶杞浇 |   鏉ユ簮: 鏈珯鍘熷垱 |  鏌ョ湅: 49娆

鍓嶆鏃堕棿鍋氳蒋浠跺啓浜嗕釜鍏巻杞啘鍘嗙殑鍑芥暟,鐩墠鍏紑缁欏ぇ瀹跺弬鑰,鏈夊叴瓒g殑鏈嬪弸鍙互鍦ㄦ鍩虹涓婅繘涓姝ュ畬鍠勫叾鍔熻兘

 

鍓嶆鏃堕棿鍋氳蒋浠跺啓浜嗕釜鍏巻杞啘鍘嗙殑鍑芥暟,鐩墠鍏紑缁欏ぇ瀹跺弬鑰,鏈夊叴瓒g殑鏈嬪弸鍙互鍦ㄦ鍩虹涓婅繘涓姝ュ畬鍠勫叾鍔熻兘

/*------------鍐滃巻杞崲鍑芥暟-----------*/

char *GetDayOf(PSYSTEMTIME pSt)

{

/*澶╁共鍚嶇О*/

const char *cTianGan[] = {"鐢","涔","涓","涓","鎴","宸","搴","杈","澹","鐧"};

/*鍦版敮鍚嶇О*/

const char *cDiZhi[] = {"瀛","涓","瀵","鍗","杈","宸","鍗",

"鏈","鐢","閰","鎴","浜"};

/*灞炵浉鍚嶇О*/

const char *cShuXiang[] = {"榧","鐗","铏","鍏","榫","铔",

"椹","缇","鐚","楦","鐙","鐚"};

/*鍐滃巻鏃ユ湡鍚*/

const char *cDayName[] = {"*","鍒濅竴","鍒濅簩","鍒濅笁","鍒濆洓","鍒濅簲",

"鍒濆叚","鍒濅竷","鍒濆叓","鍒濅節","鍒濆崄",

"鍗佷竴","鍗佷簩","鍗佷笁","鍗佸洓","鍗佷簲",

"鍗佸叚","鍗佷竷","鍗佸叓","鍗佷節","浜屽崄",

"寤夸竴","寤夸簩","寤夸笁","寤垮洓","寤夸簲",

"寤垮叚","寤夸竷","寤垮叓","寤夸節","涓夊崄"};

/*鍐滃巻鏈堜唤鍚*/

const char *cMonName[] = {"*","姝","浜","涓","鍥","浜","鍏",

"涓","鍏","涔","鍗","鍗佷竴","鑵"};

/*鍏巻姣忔湀鍓嶉潰鐨勫ぉ鏁*/

const int wMonthAdd[12] = {0,31,59,90,120,151,181,212,243,273,304,334};

/*鍐滃巻鏁版嵁*/

const int wNongliData[100] = {2635,333387,1701,1748,267701,694,2391,133423,1175,396438

,3402,3749,331177,1453,694,201326,2350,465197,3221,3402

,400202,2901,1386,267611,605,2349,137515,2709,464533,1738

,2901,330421,1242,2651,199255,1323,529706,3733,1706,398762

,2741,1206,267438,2647,1318,204070,3477,461653,1386,2413

,330077,1197,2637,268877,3365,531109,2900,2922,398042,2395

,1179,267415,2635,661067,1701,1748,398772,2742,2391,330031

,1175,1611,200010,3749,527717,1452,2742,332397,2350,3222

,268949,3402,3493,133973,1386,464219,605,2349,334123,2709

,2890,267946,2773,592565,1210,2651,395863,1323,2707,265877};

static int wCurYear,wCurMonth,wCurDay;

static int nTheDate,nIsEnd,m,k,n,i,nBit;

TCHAR szNongli[30], szNongliDay[10],szShuXiang[10];

/*---鍙栧綋鍓嶅叕鍘嗗勾銆佹湀銆佹棩---*/

wCurYear = pSt->wYear;

wCurMonth = pSt->wMonth;

wCurDay = pSt->wDay;

/*---璁$畻鍒板垵濮嬫椂闂1921骞2鏈8鏃ョ殑澶╂暟锛1921-2-8(姝f湀鍒濅竴)---*/

nTheDate = (wCurYear - 1921) * 365 + (wCurYear - 1921) / 4 + wCurDay + wMonthAdd[wCurMonth - 1] - 38;

if((!(wCurYear % 4)) && (wCurMonth > 2))

nTheDate = nTheDate + 1;

/*--璁$畻鍐滃巻澶╁共銆佸湴鏀佹湀銆佹棩---*/

nIsEnd = 0;

m = 0;

while(nIsEnd != 1)

{

if(wNongliData[m] < 4095)

k = 11;

else

k = 12;

n = k;

while(n>=0)

{

//鑾峰彇wNongliData(m)鐨勭n涓簩杩涘埗浣嶇殑鍊

nBit = wNongliData[m];

for(i=1;i<n+1;i++)

nBit = nBit/2;

nBit = nBit % 2;

if (nTheDate <= (29 + nBit))

{

nIsEnd = 1;

break;

}

nTheDate = nTheDate - 29 - nBit;

n = n - 1;

}

if(nIsEnd)

break;

m = m + 1;

}

wCurYear = 1921 + m;

wCurMonth = k - n + 1;

wCurDay = nTheDate;

if (k == 12)

{

if (wCurMonth == wNongliData[m] / 65536 + 1)

wCurMonth = 1 - wCurMonth;

else if (wCurMonth > wNongliData[m] / 65536 + 1)

wCurMonth = wCurMonth - 1;

}

/*--鐢熸垚鍐滃巻澶╁共銆佸湴鏀佸睘鐩 ==> wNongli--*/

wsprintf(szShuXiang,"%s",cShuXiang[((wCurYear - 4) % 60) % 12]);

wsprintf(szNongli,"%s(%s%s)骞",szShuXiang,cTianGan[((wCurYear - 4) % 60) % 10],cDiZhi[((wCurYear - 4) % 60) % 12]);

/*--鐢熸垚鍐滃巻鏈堛佹棩 ==> wNongliDay--*/

if (wCurMonth < 1)

wsprintf(szNongliDay,"闂%s",cMonName[-1 * wCurMonth]);

else

strcpy(szNongliDay,cMonName[wCurMonth]);

strcat(szNongliDay,"鏈");

strcat(szNongliDay,cDayName[wCurDay]);

return strcat(szNongli,szNongliDay);

}

TAG: 鍐滃巻 鍑芥暟 鍏巻
鎵撳嵃 | 鏀惰棌姝ら〉 |  鎺ㄨ崘缁欏ソ鍙 | 涓炬姤
涓婁竴绡 涓嬩竴绡
 

璇勫垎锛0

鍙戣〃璇勮
鏌ョ湅鍏ㄩ儴鍥炲銆愬凡鏈0浣嶇綉鍙嬪彂琛ㄤ簡鐪嬫硶銆