主题：如何对SQL数据统计的结果显示在Label控件中

循环每一行，读取值，显示？如

Dim str As String = "第一列" & chr(9) & "第二列" & vbcrlf
For Each r As Row In Tables("表A").Rows
    str &= r("第一列") & chr(9) & r("第二列") & vbcrlf
Next
msgbox(str)