2017-03-21 13 views
0

我正在使用vb6,SQL Server2008和ComponentOne對象。我使用下面的代碼到網格結果複製到剪貼板:如何獲取網格中的標題以複製到剪貼板

Set rs = AdoMain.Recordset.Clone 
    For Each row In GridMain.SelBookmarks 
    rs.Bookmark = row 
    'For col = gridMain.SelStartCol To gridMain.SelEndCol 
    For Col = 0 To 15 
     strTemp = strTemp & rs(Col).Value & vbTab 
    Next Col 
    strTemp = strTemp & vbCrLf 
    Next row 

    Clipboard.Clear 
    Clipboard.SetText strTemp, vbCFText 

這部分的偉大工程的電力網的「身體」,但我不能讓電網頭複製。任何幫助?

+0

這個問題與您的數據源是否是sql server有關?這顯然是你在VB6代碼中做的事情。數據的來源是無關緊要的。您應該在網格列上使用for循環,並從網格中獲取列標題。 –

+0

我不確定與下一個閱讀問題的人有什麼關係。所以也包括了資源。而不是太多信息。在回覆您時,我正在處理我們所說的內容,但要經過INFORMATION_SCHEMA.COLUMNS用法。 – Obfuscated

+0

您應該知道網格標題可能與列名稱不同。也許與你的情況無關,但我建議仍然牢記這一點。 –

回答

0

如果你想的記錄列使用的名稱:

rs(col).Field.Name 

但如果你想GridMain列的標題,你應該使用

GridMain.Columns(col).Caption 
0

如果您正在使用VSFlexGrid,我認爲這將工作:

With GridMain 
    'select entire grid 
    .Select .FixedRows, .FixedCols, .Rows - 1, .Cols - 1 
    'copy selection to clipboard 
    .Copy 
End With