vb中list表格中默认按拼音字母排序的是什么属性

vb 默认没有字母排序。可以使用下面方法实现：'List1的属性 sorted设为True Dim i%, j%, h$, x& Private Sub Command1_Click() List1.Clear For i = 16 To 87 For j = 1 To 94 DoEvents x = Val("&H" + Hex(i + 160) + Hex(j + 160)) If Chr(x) <> " " T...

只要把列表框的sorted属性设置为True，无论是form load添加，还是设计时添加，都会按字母顺序排列。

如果是一级字库就好办，那些非常用字不好办。在区位字符表里，常用字本来就是按拼音来排的，但是非常用字是按比划来排的。对于常用字，直接读出汉子的2字节区位码，从小到大排序就可以了；大于常用字库值的就是非常用字，要建立一个表，类似于字典的吧，然后查表。如果简单来做就不要管非常用字了，...

默认情况下,汉字的编码就是按照拼音排序的,但不是你所说的"首字母"而是"完整的拼音".但汉字存在很多的多音字,这种情况不是很好处理的.如果不考虑多音字的情况,只需要直接比对两个字符串即可.如:"我们" > "你们""我的" > "我们"

首先将汉字转为Ascii码数组，然后对Ascii码数组排序。再将Ascii码数组转换为字符，大功告成了。以下代码经测试完全正确。Dim lASC(j) As Long Private Sub Command1_Click()Dim i As Long, j As Long, k As Long Dim r As Long Dim fs As String fs = Text1.Text j = Len(fs) - 1 R...

1先用VB拼音宏提取每内容拼音 需要单发 2、利用LEFT取姓第首字母单独放列 3、利用筛选功能结

下拉框似乎没有这样的功能，但你可以在赋值前排好序，常用的方法是放在表中建立索引再使用。

End If End Function '=== Private Sub Command1_Click()ar = Split(Text1.Text, vbCrLf)For i = 0 To UBound(ar)Print ar(i)Next End Sub '这个是我写的,吧按行来组成数组,根据2段代码加上排序就行了,时间关系我就不做完整了,相信你会看懂 ...

这个程序的原理是汉字的ASC值，大部份是按汉字拼音排序的，所以要列出其中的拼音顺序，就可以转化为拼音。但还是有不少的汉字，在这个序列里不是正常排序的，这就会出错。

用VB也比较简单的：对指定单元格的内容按字符ascii码大小进行排序(对汉字来说就是按声母的顺序排序)。在工作表页面按ALT+F11 进入VBA编辑窗口，点菜单“插入”->“模块”，粘贴以下代码到光标位置，保存并关闭代码窗口。该代码是一个自定义函数, 用法跟excel函数基本相同，比如要排序A1单元格的内容就...