查询检索 ，很急！！！

<P>如何显示数据 </P>
<P>我用Itable 进行查询 如下 怎么显示这些数据啊 </P>

<P>If TypeOf pTable Is IFeatureClass Then
      Dim pDSet As IDataset
      Dim pFeatureLayer As IFeatureLayer
      Set pFeatureLayer = New FeatureLayer
      Set pFeatureLayer.FeatureClass = pTable
      Set pDSet = pTable
      pFeatureLayer.Name = pDSet.Name
       Set m_f = pFeatureLayer.FeatureClass
      Dim pfeatlay As IFeatureLayer
      Set pfeatlay = New FeatureLayer
      Set pfeatlay.FeatureClass = m_f
      
      If MsgBox("需要显示属性数据吗？", vbYesNo, "显示属性数据") = vbYes Then
      DE.AttributeShow
      End If
      frmShowMap.MapControl1.AddLayer pFeatureLayer
      frmShowMap.Show vbModal
      m_pMxDoc.AddLayer pFeatureLayer
      
      
      Else ' Add the table to map
      Dim pStTabCol As IStandaloneTableCollection
      Dim pStTable As IStandaloneTable
      Set pStTabCol = m_pMxDoc.FocusMap
      Set pStTable = New StandaloneTable
      pStTable.Name = Me.strname.text
      Set pStTable.Table = pTable
      pStTabCol.AddStandaloneTable pStTable</P>
<P>如何把 pStTable 中的数据显示出来  谢谢！ 很急用</P>