[转载]C#中，让组合框(ComboBox)支持拼音首字母检索筛选

通过继承系统的ComboBox，写一个新控件ComboBoxEx，重写它的焦点以及文本更新事件，就可以轻松实现拼音首字母检索了。例如：输入 gd ，就可以出现“广东”。

 1using System;
 2using System.Collections.Generic;
 3using System.Text;
 4using System.Windows.Forms;
 5using System.Collections;
 6
 7namespace PrintDoc
 8{
 9    public class ComboBoxEx : ComboBox
    {
        private ArrayList m_list = new ArrayList();

        protected override void OnEnter(EventArgs e)
        {
            m_list.Clear();
            m_list.AddRange(this.Items);
            base.OnEnter(e);
        }

        protected override void OnLeave(EventArgs e)
        {
            this.Items.Clear();
            this.Items.AddRange(m_list.ToArray());
            base.OnLeave(e);
        }

        protected override void OnTextUpdate(EventArgs e)
        {
            while (this.Items.Count > 0)
            {
                this.Items.RemoveAt(0);
            }
            foreach (object o in this.m_list)
            {
                if ( GetChineseSpell(o.ToString()).ToLower().Contains(this.Text.ToLower()))
                {
                    this.Items.Add(o);
                }
            }
            this.DroppedDown = true;
            this.Cursor = Cursors.Default;
            base.OnTextUpdate(e);
        }

        static public string GetChineseSpell(string strText)
        {
            int len = strText.Length;
            string myStr = "";
            for (int i = 0; i < len; i++)
            {
                myStr += getSpell(strText.Substring(i, 1));
            }
            return myStr;
        }

        static public string getSpell(string cnChar)
        {
            byte[] arrCN = Encoding.Default.GetBytes(cnChar);
            if (arrCN.Length > 1)
            {
                int area = (short)arrCN[0];
                int pos = (short)arrCN[1];
                int code = (area << 8) + pos;
                int[] areacode = { 45217, 45253, 45761, 46318, 46826, 47010, 47297, 47614, 48119, 48119, 49062, 49324, 49896, 50371, 50614, 50622, 50906, 51387, 51446, 52218, 52698, 52698, 52698, 52980, 53689, 54481 };
                for (int i = 0; i < 26; i++)
                {
                    int max = 55290;
                    if (i != 25) max = areacode[i + 1];
                    if (areacode[i] <= code && code < max)
                    {
                        return Encoding.Default.GetString(new byte[] { (byte)(65 + i) });
                    }
                }
                return "*";
            }
            else 
                return cnChar;
        }
    }
}

 

用来进行语法转化的工具：http://codeconverter.sharpdevelop.net/SnippetConverter.aspx

转化之后的VB.NET版本如下。 

 1    Public Shared Function getHzPy()Function getHzPy(ByVal cnChar As String) As String
 2        Dim arrCN As Byte() = System.Text.Encoding.[Default].GetBytes(cnChar)
 3        If arrCN.Length > 1 Then
 4            Dim area As Integer = CShort(arrCN(0))
 5            Dim pos As Integer = CShort(arrCN(1))
 6            Dim code As Integer = (area << 8) + pos
 7            Dim areacode As Integer() = {45217, 45253, 45761, 46318, 46826, 47010, _
 8             47297, 47614, 48119, 48119, 49062, 49324, _
 9             49896, 50371, 50614, 50622, 50906, 51387, _
             51446, 52218, 52698, 52698, 52698, 52980, _
             53689, 54481}
            For i As Integer = 0 To 25
                Dim max As Integer = 55290
                If i <> 25 Then
                    max = areacode(i + 1)
                End If
                If areacode(i) <= code AndAlso code < max Then
                    Return System.Text.Encoding.[Default].GetString(New Byte() {CByte((65 + i))})
                End If
            Next
            Return "*"
        Else
            Return cnChar
        End If
    End Function

 

另外还有一篇相关的文章，除了计算拼音的算法不对之外，其他方面的事件考虑的比较周全。可以用上面的算法替换掉下面文章中的getHzPy方法。

http://blog.csdn.net/Flora_qxy/archive/2007/08/30/1764964.aspx

除此之外，再贴两篇和AucoCompleteComboBox相关的文章，看似很好很强大。

http://www.codeproject.com/KB/architecture/MultiColumnFlatCombo.aspx

http://www.codeproject.com/KB/combobox/akautocomplete.aspx