Question

怎样将VB计算出来的多个数据在窗体中用表格的形式显示出来，并且实现用户单击，就按排序重新显示。跪求，

此多个数据为不同条件下查询的记录个数，用DataGrid、MSHFlexGrid控件好像只能固定地显示所查询的记录集rs,我要的不是记录，而是符合条件的记录个数，如下面：
0 5 7 7 8 5 5 7 8 9 1 4 8 9 4 3 2 1 0 8
0出现2次 概率为10%
1出现2次 概率为10%
2出现1次 概率为5%
3出现1次 概率为5%
4出现2次 概率为10%
5出现3次 概率为15%
6出现0次 概率为0%
7出现3次 概率为15%
8出现4次 概率为20%
9出现2次 概率为10%
通过查询符合条件的记录，得到每个数字的出现次数，然后计算概率 = 次数/20，最后关键是把这些数据在VB窗体中用表格的方式显示出来：

数字 出现次数 概率
数字0 2 10%
数字1 2 10%
数字2 1 5%
数字3 1 5%
数字4 2 10%
数字5 3 15%
数字6 0 0%
数字7 3 15%
数字8 4 20%
数字9 2 10%
如果单击“概率”，则实行降序排列：
数字 出现次数 概率
数字8 4 20%
数字5 3 15%
数字7 3 15%
数字0 2 10%
数字1 2 10%
数字4 2 10%
数字9 2 10%
数字2 1 5%
数字3 1 5%
数字6 0 0%

急用！！谢谢！！感恩不尽
谢谢大哥的热情相助，虽然没能彻底解决，但还是万分感激！
我这个是有数据库的，而且数据量还很多，简单地说就是对3D若干开奖号的一些特征进行统计，我要的不是从数据库查到的第一记录，而是符合条件的记录个数，然后通过VB计算，把结果显示出来。而且还有像上面一样实现排序功能，因为有很多统计，如全奇全偶等的统计项目，（我的数据库就一个表），我不想用DataGrid、MSHFlexGrid控件，如果非要用的话，怎么将统计出来的数组中的数据写入，怎样实现用户单击排序？如何对“数字”“出现次数”“概率”这些标题加粗显示，要具体代码。

Answer 1

自己做太麻烦了，可以用第三方控件vsflexgrid：
With Me.VSFlexGrid1
.ExplorerBar = flexExSortShow '可排序
.Cell(flexcpFontBold, 0, 0, 0, .Cols - 1) = True '第一行从第0列到.Cols - 1列全部加粗
End With

Answer 2

对“问题补充”的见解：我认为你的数据库应有两个表，一个是归纳要统计内容的表，用来填写要统计的项目，例如：双色球 红球号码范围为01～33，蓝球号码范围为01～16，等一共49条记录。又如：3D 投注区分为百位、十位和个位，各位号码范围为0～9，等一共30条记录。
另一个表是用来记录各期具体的数据，之后用下面讲的方法来实现。如果你不需要太华丽的用户介面，直接在ACCESS数据库中编程可以得到你想要的全部功能，包括表格显示，排序，标题黑体，打印，导出Excel文件等等。
当然直接在ACCESS数据库中编程也有缺点，就是用户介面简单，不能生产可执行命令，只能在装有ACCESS系统的机上运行等。

这行数字： 0 5 7 7 8 5 5 7 8 9 1 4 8 9 4 3 2 1 0 8 是记录的内容是吗？如果你没有用到数据库的话，最简的方法是：用数组记录统计的内容，然后将数组的记录一行一行加入到DataGrid、MSHFlexGrid控件中就行了。
如果是数据库，可以在数据库中建立一个查询，然后用数据绑定控件绑定这个查询，而不是直接绑定数据表，这样就可以得到你想要的结果了。例如：
在ACCESS数据库中有两个表，表名分别为统计项目表，数据记录表，统计项目表有两个字段：ID ，统计项目；数据记录表有两个字段：ID ，数据内容；

统计项目表的内容如下：

ID 统计项目

1 0
2 1
3 2
4 3
5 4
6 5
7 6
8 7
9 8
10 9

数据记录表的内容如下：

ID 数据内容

1 0
2 5
3 7
4 7
5 8
6 5
7 5
8 7
9 8
10 9
11 1
12 4
13 8
14 9
15 4
16 3
17 2
18 1
19 0
20 8

建立查询1 ，帖入以入内容：

SELECT '数字' & 统计项目表.统计项目 AS 数字, Count(数据记录表.数据内容) AS 出现次数, 出现次数/(SELECT count(数据记录表.数据内容) FROM 数据记录表)*100 & '%' AS 概率
FROM 数据记录表 RIGHT JOIN 统计项目表 ON 数据记录表.数据内容 = 统计项目表.统计项目
GROUP BY 统计项目表.统计项目, 数据记录表.数据内容;

运行结果：

数字 出现次数 概率
数字0 2 10%
数字1 2 10%
数字2 1 5%
数字3 1 5%
数字4 2 10%
数字5 3 15%
数字6 0 0%
数字7 3 15%
数字8 4 20%
数字9 2 10%

( 以上内容在ACCESS 2007中运行通过。 )

Answer 3

数据存入数据库，包括你算出来的结果；然后用datagrid控件显示就可以了