一、要求：利用網絡上面關于手機號碼測兇吉的算法，用C#來實現！

二、程序界面

?

三、程序源代碼

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
//因為使用了非SQL數據庫,需要添加如下命名空間
using System.Data.OleDb;
//要使用顏色標示,所有需要添加如下命名空間
using System.IO;

namespace 手機號碼測兇吉
{
??? public partial class Form1 : Form
??? {
??????? public Form1()
??????? {
??????????? InitializeComponent();
??????? }

#region 定義字符串三維數組，用來存放測算結果
#endregion

??????? private string[] NumberLuckyInformation = {
??????????? "大展鴻圖，信用得固，/r/n名利雙收，可獲成功。", "吉", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。" ,
??????????? "根基不固，搖搖欲墜，/r/n一盛一衰，勞而無獲。", "兇", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "根深蒂固，蒸蒸日上，/r/n如意吉祥，百事順遂。", "吉", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "前途坎坷，苦難折磨，/r/n非有毅力，難望成功。", "兇", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "陰陽和合，生意興隆，/r/n名利雙收，后福重重。", "吉", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "萬寶集門，天降幸運，/r/n立志奮發，得成大功。", "吉", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "獨營生意，和氣吉祥，/r/n排除萬難，必獲成功。", "吉", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "努力發達，貫徹志望，/r/n不忘進退，可望成功。", "吉", "[高度戒備難交心型]/r/n其具體表現為：/r/n經常處于戒備狀態，對任何事都沒法放松處理，孤僻性情難以交朋結友。對于愛情，就更加會慎重處理。任何人必須經過你長期觀察及通過連番考驗，方會減除戒備與你交往。",
??????????? "雖抱奇才，有才無命，/r/n獨營無力，財力難望。", "兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "烏云遮月，暗淡無光，/r/n空費心力，徒勞無功。", "兇", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "草木逢春，枝葉沾露，/r/n穩健著實，必得人望。", "吉", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "薄弱無力，孤立無援，/r/n外祥內苦，謀事難成。", "兇", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "天賦吉運，能得人望，/r/n善用智慧，必獲成功。", "吉", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "忍得若難，必有后福，/r/n是成是敗，惟靠緊毅。", "兇", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "謙恭做事，外得人和，/r/n大事成就，一門興隆。", "吉", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "能獲眾望，成就大業，/r/n名利雙收，盟主四方。", "吉", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "排除萬難，有貴人助，/r/n把握時機，可得成功。", "吉", "[高度戒備難交心型]/r/n其具體表現為：/r/n經常處于戒備狀態，對任何事都沒法放松處理，孤僻性情難以交朋結友。對于愛情，就更加會慎重處理。任何人必須經過你長期觀察及通過連番考驗，方會減除戒備與你交往。",
??????????? "經商做事，順利昌隆，/r/n如能慎始，百事亨通。", "吉", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "成功雖早，慎防虧空，/r/n內外不合，障礙重重。", "兇", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "智商志大，歷盡艱難，/r/n焦心憂勞，進得兩難。", "兇", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "先歷困苦，后得幸福，/r/n霜雪梅花，春來怒放。", "吉", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "秋草逢霜，懷才不遇，/r/n憂愁怨苦，事不如意。", "兇", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "旭日升天，名顯四方，/r/n漸次進展，終成大業。", "吉", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "綿繡前程，須靠自力，/r/n多用智謀，能奏大功。", "吉", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "天時地利，只欠人和，/r/n講信修睦，即可成功。", "吉", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "波瀾起伏，千變萬化，/r/n凌架萬難，必可成功。", "兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "一成一敗，一盛一衰，/r/n惟靠謹慎，可守成功。", "兇帶吉", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "魚臨旱地，難逃惡運，/r/n此數大兇，不如更名。", "兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "如龍得云，青云直上，/r/n智謀奮進，才略奏功。", "吉", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "吉兇參半，得失相伴，/r/n投機取巧，吉兇無常。", "兇", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "此數大吉，名利雙收，/r/n漸進向上，大業成就。", "吉", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "池中之龍，風云際會，/r/n一躍上天，成功可望。", "吉", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "意氣用事，人和必失，/r/n如能慎始，必可昌隆。", "吉", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "災難不絕，難望成功，/r/n此數大兇，不如更名。", "兇", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "中吉之數，進退保守，/r/n生意安穩，成就普通。", "吉", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "波瀾得疊，常陷窮困，/r/n動不如靜，有才無命。", "兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "逢兇化吉，吉人天相，/r/n風調雨順，生意興隆。", "吉", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "名雖可得，利則難獲，/r/n藝界發展，可望成功。", "兇帶吉", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "云開見月，雖有勞碌，/r/n光明坦途，指日可望。", "吉", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "一成一衰，沉浮不定，/r/n知難而退，自獲天佑。", "吉帶兇", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "天賦吉運，德望兼備，/r/n繼續努力，前途無限。", "吉", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "事業不專，十九不成，/r/n專心進取，可望成功。", "吉帶兇", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "雨夜之花，外祥內苦，/r/n忍耐自重，轉兇為吉。", "吉帶兇", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "雖用心計，事難遂愿，/r/n貪功冒進，必招失敗。", "兇", "[高度戒備難交心型]/r/n其具體表現為：/r/n經常處于戒備狀態，對任何事都沒法放松處理，孤僻性情難以交朋結友。對于愛情，就更加會慎重處理。任何人必須經過你長期觀察及通過連番考驗，方會減除戒備與你交往。",
??????????? "楊柳遇春，綠葉發枝，/r/n沖破難關，一舉成名。", "吉", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "坎坷不平，艱難重重，/r/n若無耐心，難望有成。", "兇", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "有貴人助，可成大業，/r/n雖遇不幸，浮沉不定。", "吉", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "美化豐實，鶴立雞群，/r/n名利俱全，繁榮富貴。", "吉", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "遇吉則吉，遇兇則兇，/r/n惟靠謹慎，逢兇化吉。", "兇", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "吉兇互見，一成一敗，/r/n兇中有吉，吉中有兇。", "吉帶兇", "[高度戒備難交心型]/r/n其具體表現為：/r/n經常處于戒備狀態，對任何事都沒法放松處理，孤僻性情難以交朋結友。對于愛情，就更加會慎重處理。任何人必須經過你長期觀察及通過連番考驗，方會減除戒備與你交往。",
??????????? "一盛一衰，浮沉不常，/r/n自重自處，可保平安。", "吉帶兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "草木逢春，雨過天晴，/r/n渡過難關，即獲成功。", "吉", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "盛衰參半，外祥內苦，/r/n先吉后兇，先兇后吉。", "吉帶兇", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "雖傾全力，難望成功，/r/n此數大兇，最好改名。", "兇", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "外觀昌隆，內隱禍患，/r/n克服難關，開出泰運。", "吉帶兇", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "事與愿違，終難成功，/r/n欲速不達，有始無終。", "兇", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "雖有困難，時來運轉，/r/n曠野枯草，春來花開。", "吉", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "半兇半吉，浮沉多端，/r/n始兇終吉，能保成功。", "兇帶吉", "[高度戒備難交心型]/r/n其具體表現為：/r/n經常處于戒備狀態，對任何事都沒法放松處理，孤僻性情難以交朋結友。對于愛情，就更加會慎重處理。任何人必須經過你長期觀察及通過連番考驗，方會減除戒備與你交往。",
??????????? "遇事猜疑，難望成事，/r/n大刀闊斧，始可有成。", "兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "黑暗無光，心迷意亂，/r/n出爾反爾，難定方針。", "兇", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "運遮半月，內隱風波，/r/n應有謹慎，始保平安。", "吉帶兇", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "煩悶懊惱，事業難展，/r/n自防災禍，始免困境。", "兇", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "萬物化育，繁榮之象，/r/n專心一意，必能成功。", "吉", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "見異思遷，十九不成，/r/n徒勞無功，不如更名。", "兇", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "吉運自來，能享盛名，/r/n把握時機，必獲成功。", "吉", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "黑夜溫長，進退維谷，/r/n內外不和，信用缺乏。", "兇", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "獨營事業，事事如意，/r/n功成名就，富貴自來。", "吉", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "思慮周祥，計書力行，/r/n不失先機，可望成功。", "吉", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "動搖不安，常陷逆境，/r/n不得時運，難得利潤。", "兇", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "慘淡經營，難免貧困，/r/n此數不吉，最好改名。", "兇", "[高度戒備難交心型]/r/n其具體表現為：/r/n經常處于戒備狀態，對任何事都沒法放松處理，孤僻性情難以交朋結友。對于愛情，就更加會慎重處理。任何人必須經過你長期觀察及通過連番考驗，方會減除戒備與你交往。",
??????????? "吉兇參半，惟賴勇氣，/r/n貫徹力行，始可成功。", "吉帶兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "利害混集，兇多吉少，/r/n得而復失，難以安順。", "兇", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。",
??????????? "安樂自來，自然吉祥，/r/n力行不懈，終必成功。", "吉", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "利不及費，坐食山空，/r/n如無章法，難望成功。", "兇", "[獨斷獨行/吸引人型]/r/n其具體表現為：/r/n為人獨斷獨行，事事自行作主解決，鮮有求助他人。而這份獨立個性，正正就是吸引異性的特質。但其實心底里，卻是渴望有人可讓他/她依賴。",
??????????? "吉中帶兇，欲速不達，/r/n進不如守，可保安祥。", "吉帶兇", "[熱情/善變夢想家型]/r/n其具體表現為：/r/n對人熱情無遮掩，時常夢想可以談一場戲劇性戀愛，親身體會個中悲歡離合的動人經歷，是個大夢想家。但對于感情卻易變卦。",
??????????? "此數大兇，破產之象，/r/n宜速改名，以避厄運。", "兇", "[自我犧牲/性格被動型]/r/n其具體表現為：/r/n慣于無條件付出，從不祈求有回報，有為了成全他人不惜犧牲自己的情操。但講到本身的愛情觀，卻流于被動，往往因為內斂而錯過大好姻緣。",
??????????? "先苦后甘，先甜后苦，/r/n如能守成，不致失敗。", "吉帶兇", "[要面包不要愛情型]/r/n其具體表現為：/r/n責任心重，尤其對工作充滿熱誠，是個徹頭徹尾工作狂。但往往因為過分專注職務，而忽略身邊的家人及朋友，是個寧要面包不需要愛情的理性主義者。",
??????????? "有得有失，華而不實，/r/n須防劫財，始保安順。", "吉帶兇", "[不善表達/疑心大型]/r/n其具體表現為：/r/n在乎身邊各人對自己的評價及觀感，不善表達個人情感，是個先考慮別人感受，再作出相應配合的內斂一族。對于愛侶，經常存有懷疑之心。",
??????????? "如走夜路，前途無光，/r/n希望不大，勞而無功。", "兇", "[大膽行事沖動派型]/r/n其具體表現為：/r/n愛好追尋刺激，有不理后果大膽行事的傾向。崇尚自由奔放的戀愛，會拼盡全力愛一場，是就算明知無結果都在所不惜的沖動派。",
??????????? "得而復失，枉費心機，/r/n守成無貪，可保安穩。", "吉帶兇", "[好奇心旺求知欲強型]/r/n其具體表現為：/r/n好奇心極度旺盛，求知欲又強，有打爛沙盤問到篤的鍥而不舍精神。此外，你天生有語言天分，學習外文比一般人更易掌握。",
??????????? "最極之數，還本歸元，/r/n能得繁榮，發達成功。", "吉", "[做事喜好憑直覺型]/r/n其具體表現為：/r/n有特強的第六靈感，性格率直無機心，深得朋輩愛戴。感情路上多采多姿。做事喜好憑個人直覺及預感做決定。"
??????? };

#region“測試”算法構成MoblieNumTest方法，后面傳遞的參數便于進行算法的調整
#endregion

??????? private void MoblieNumTest(int Num)
??????? {
??????????? //判斷手機號碼是否為11位
??????????? if (textBoxMobile.Text.Length != 11)
??????????? {
??????????????? MessageBox.Show("您的手機位數不對，請正確輸入11位號碼！", "老鬼提醒-位數錯誤！", MessageBoxButtons.OK);
??????????????? textBoxMobile.Focus();
??????????? }
??????????? else
??????????? {
??????????????? //轉換文本為Long類型數據，用來判斷輸入的手機號碼是否為13X手機
??????????????? long MoblieNum = long.Parse(textBoxMobile.Text);
??????????????? if (MoblieNum < 13000000000)
??????????????? {
??????????????????? MessageBox.Show("您的手機號碼錯誤，請正確輸入！", "老鬼提醒-號碼錯誤！", MessageBoxButtons.OK);
??????????????????? return;
??????????????? }
??????????????? else
??????????????? {
??????????????????? //如果不是，則進行求模運算
??????????????????? long TestNum = MoblieNum % Num;
??????????????????? //如果運算結果為0，則把方法傳遞的參數作為運算依據
??????????????????? if(TestNum==0)
??????????????????? {
??????????????????????? TestNum=Num;
??????????????????? }

??????????????????? //求描述的結果，取數組的第一列???????????????????
??????????????????? labDescription.Text = NumberLuckyInformation[3 * (TestNum - 1)];
??????????????????? labDescription.ForeColor = Color.Blue;
???????????????????
??????????????????? //判斷兇吉
??????????????????? if (NumberLuckyInformation[3 * (TestNum - 1) + 1] == "兇")
??????????????????? {
??????????????????????? //求兇吉結果，取數組第2列
??????????????????????? labLuck.Text = NumberLuckyInformation[3 * (TestNum - 1) + 1];
??????????????????????? //如兇則文字顯示紅色
??????????????????????? labLuck.ForeColor = Color.Red;
??????????????????? }

??????????????????? //判斷兇吉
??????????????????? if (NumberLuckyInformation[3 * (TestNum - 1) + 1] == "吉")
??????????????????? {
??????????????????????? //求兇吉結果，取數組第2列
??????????????????????? labLuck.Text = NumberLuckyInformation[3 * (TestNum - 1) + 1];
??????????????????????? //如吉則文字顯示藍色；
??????????????????????? labLuck.ForeColor = Color.Blue;
??????????????????? }

??????????????????? //求主人描述數組結果，取數組第3列
??????????????????? groupBox1.Text = NumberLuckyInformation[3 * (TestNum - 1) + 2];
???????????????????
??????????????? }
??????????? }

??????? }

#region 編寫查詢手機所在地的方法MoblieSearch()
#endregion

??????? private void MobileSearch()
??????? {
??????????? //第一步：獲取應用程序開始路徑并傳遞給一個字符串變量，此時字符串變量的值為"/應用程序路徑/MoblieDB.dat"
??????????? string TempPath = Application.StartupPath + "//MobileDB.dat";
??????????? //第二步：判斷該文件是否存在
??????????? if (File.Exists(TempPath))
??????????? {

??????????????? if (textBoxMobile.Text.Length != 11)
??????????????? {
??????????????????? MessageBox.Show("您的手機位數不對，請正確輸入11位號碼！", "老鬼提醒-位數錯誤！", MessageBoxButtons.OK);
??????????????????? textBoxMobile.Focus();
??????????????? }
??????????????? else
??????????????? {
??????????????????? //轉換文本為Long類型數據，用來判斷輸入的手機號碼是否為13X手機
??????????????????? long MoblieNum = long.Parse(textBoxMobile.Text);
??????????????????? if (MoblieNum < 13000000000)
??????????????????? {
??????????????????????? MessageBox.Show("您的手機號碼錯誤，請正確輸入！", "老鬼提醒-號碼錯誤！", MessageBoxButtons.OK);
??????????????????????? return;
??????????????????? }
??????????????????? else
??????????????????? {
??????????????????????? //把查詢語句放入字符串變量;
??????????????????????? string cmd_str = "SELECT * FROM list WHERE num ='" + textBoxMobile.Text.Substring(0, 7) + "'";
??????????????????????? //創建數據庫連接,調用DB類放入數據庫路徑參數
??????????????????????? OleDbConnection conn = DB.Create_Conn(TempPath);
??????????????????????? //創建數據源,傳入查詢參數和連接參數;
??????????????????????? OleDbDataAdapter da = new OleDbDataAdapter(cmd_str, conn);
??????????????????????? //創建內存中的數據庫緩沖區;
??????????????????????? DataSet ds = new DataSet();
??????????????????????? //打開連接;
??????????????????????? conn.Open();
??????????????????????? //把數據源中的數據填充到內存緩沖區DS中的表TEMP中
??????????????????????? da.Fill(ds, "temp");
??????????????????????? //關閉連接
??????????????????????? conn.Close();
??????????????????????? //設置變量,用來判斷緩沖區是否有查詢到的數據;
??????????????????????? int connt = ds.Tables["temp"].Rows.Count;
??????????????????????? //判斷是否查找到數據
??????????????????????? if (connt < 1)
??????????????????????? {
??????????????????????????? //如果沒有查找到的數據則彈出警告提示框,同時在lable上提示用戶無相關信息
??????????????????????????? MessageBox.Show("沒找到相應信息");
??????????????????????????? labNum.Text = textBoxMobile.Text;
??????????????????????????? labPlace.Text = "無相關信息!";
??????????????????????????? labType.Text = "無相關信息!";
??????????????????????? }
??????????????????????? else
??????????????????????? {
??????????????????????????? //如果有查詢結果則,把查詢結果作為文本輸出到Lable的Text屬性中
??????????????????????????? labNum.Text = textBoxMobile.Text;
??????????????????????????? //顯示緩沖區的方法為ds.Tables[緩沖區表名].Raw[起始索引值].[字段].ToString()
??????????????????????????? labPlace.Text = ds.Tables["temp"].Rows[0]["area"].ToString();
??????????????????????????? labType.Text = ds.Tables["temp"].Rows[0]["t"].ToString();
??????????????????????? }
??????????????????? }
??????????????? }
??????????? }
??????????? else
??????????? {
??????????????? MessageBox.Show("數據庫文件不存在！請確認根目錄下MobileDB.dat文件存在！", "老鬼提醒-數據庫不存在！", MessageBoxButtons.OK);
??????????? }

??????? }

??????? #region 獲取系統當前日期
??????? #endregion

??????? public string GetDate()
??????? {
??????????? string strYear = DateTime.Now.Year.ToString();
??????????? string strMonth = DateTime.Now.Month.ToString();
??????????? string strDay = DateTime.Now.Day.ToString();
??????????? if (Convert.ToInt32(strMonth) < 10)
??????????? {
??????????????? strMonth = "0" + strMonth;
??????????? }
??????????? if (Convert.ToInt32(strDay) < 10)
??????????? {
??????????????? strDay = "0" + strDay;
??????????? }
??????????? return strYear + "-" + strMonth + "-" + strDay;
??????? }

#region 利用Time控件顯示系統動態時間
#endregion

??????? private void timer1_Tick(object sender, EventArgs e)
??????? {
??????????? string dateHousr = DateTime.Now.TimeOfDay.Hours.ToString();
??????????? string dateMuidte = DateTime.Now.TimeOfDay.Minutes.ToString();
??????????? string strsecone = DateTime.Now.TimeOfDay.Seconds.ToString();
??????????? if (Convert.ToInt32(dateHousr) < 10)
??????????? {
??????????????? dateHousr = "0" + dateHousr;
??????????? }
??????????? if (Convert.ToInt32(dateMuidte) < 10)
??????????? {
??????????????? dateMuidte = "0" + dateMuidte;
??????????? }
??????????? if (Convert.ToInt32(strsecone) < 10)
??????????? {
??????????????? strsecone = "0" + strsecone;
??????????? }
??????????? this.toolStripStatusLabel3.Text = "?? 當前時間：" + dateHousr + ":" + dateMuidte + ":" + strsecone;
??????? }
???????
#region 程序允許用戶按回車按鈕進行運算，所有此處用到了KeyPress事件
#endregion

??????? private void textBoxMobile_KeyPress(object sender, KeyPressEventArgs e)
??????? {
??????????? //判斷輸入的按鍵是否為回車（回車的ASCII代碼為13）
??????????? if (e.KeyChar == 13)
??????????? {
??????????????? MoblieNumTest(80);
??????????????? //在運算好后把文本框內的文字全選，便于用戶下次操作
??????????????? textBoxMobile.SelectAll();
??????????? }

??????? }

#region“測試”按鈕雙擊事件
#endregion

??????? private void buttonTest_Click(object sender, EventArgs e)
??????? {
??????????? MoblieNumTest(80);
??????????? textBoxMobile.SelectAll();
??????? }

#region 菜單中的“關于”選項事件
#endregion

??????? private void 關于手機號碼測兇吉AToolStripMenuItem_Click(object sender, EventArgs e)
??????? {
??????????? MessageBox.Show("手機號碼測吉兇/r/nV1.1/r/n僅供消遣，請勿當真！/r/n版本介紹:/r/n/n1.0版:手機號碼兇吉查詢.(2007.11.17)/r/n/r1.1版:添加了手機歸屬地查詢(2007.11.17)/r/n/r后續版本敬請期待.:)/r/n/r老鬼作品/r/nE-Mail:wxhhg@163.com", "關于...", MessageBoxButtons.OK);
??????? }

#region 菜單中的“測試”選項事件
#endregion

??????? private void 測試TToolStripMenuItem_Click(object sender, EventArgs e)
??????? {
??????????? MoblieNumTest(80);
??????????? textBoxMobile.SelectAll();
??????? }

#region 菜單中的“退出”選項事件
#endregion

????????? private void 退出QToolStripMenuItem1_Click(object sender, EventArgs e)
??????? {
??????????? this.Close();
??????? }
???
?
#region 窗口開啟時候自動加載獲取系統日期的GetDate()和動態系統時間
#endregion

??????? private void Form1_Load(object sender, EventArgs e)
??????? {
??????????? this.toolStripStatusLabel2.Text = this.toolStripStatusLabel2.Text + this.GetDate();
??????????? this.timer1.Enabled = true;
??????? }

?#region“查詢”按鈕雙擊事件
?#endregion
??????? private void buttonSearch_Click(object sender, EventArgs e)
??????? {
??????????? MobileSearch();
??????? }

#region 菜單中的“查詢”選項事件
#endregion

??????? private void 查詢QToolStripMenuItem_Click(object sender, EventArgs e)
??????? {
??????????? MobileSearch();
??????????? textBoxMobile.SelectAll();
??????? }

?
?????
??? }
}

總結

以上是生活随笔為你收集整理的手机号码测凶吉附带手机号码归属地C#版的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。