请教各位:
rs数据为:
A    B   C
本科 20  21
中专 30  50
大专 80  60
如何使 Label1=本科，Label12=20，Label14=21
       Label3=中专，Label15=30，Label16=50
 Label1.Caption = Trim(rs.Fields(0)) & "人数"   rs.Fields(0)等于RS的第一列第一行数据;
如何使Label3.Caption等于RS的第一列第二行数据?
    Label3.Caption = Trim(rs.Fields(?)) & "人数"
昨天想了想，现又有新的问题

 If rs.EOF = True Then
    MsgBox "信息出错"
        Exit Sub
    Else
            For Index = 0 To 5
            Label1(Index) = rs(Number(Index + 1)) & "人数"
            rs.MoveNext
            Next Index
    End If
     End If
     '关闭记录集
    rs.Close
    '关闭cnn对象
    cnn.Close
    End If
结果是Label1等于A,Label1=本科，Label1=中专,如何使Label2=列

[ 本帖最后由 jxawgya 于 2011-4-26 08:17 编辑 ]

不能让它沉下去。

没有讲清楚，
SQL = "select distinct Culture_Level,count(*)  from dbo.Employees   group by Culture_Level order by Culture_Level"
Label1是数组，Label2是数组，使
Label1数组 = Trim(rs.Fields(0)) & "人数"
    Label2数组 = Trim(rs.Fields(1)) & "人"
不知是否清楚

[ 本帖最后由 jxawgya 于 2011-4-27 09:46 编辑 ]