Note that there are some explanatory texts on larger screens.

plurals
  1. PO
    primarykey
    data
    text
    <p>I'm not very good at VB, so I've written it in C# first:</p> <pre><code>DataGridView DataGridView6; DataGridView DataGridView7; DataGridViewRow CreateRow(object data) { DataGridViewRow row = null; int index = DataGridView6.Rows.Add(); row = DataGridView6.Rows[index]; // row.Cells[0] = something; // basically, add your date return row; } void DisplayManagerRow(DataGridViewRow row) { DataGridView7.DataSource = null; int columns = (DataGridView6.Columns != null) ? DataGridView6.Columns.Count : 0; if ((row != null) &amp;&amp; (0 &lt; columns)) { DataGridView7.Columns.Clear(); List&lt;DataGridViewColumn&gt; cols = new List&lt;DataGridViewColumn&gt;(columns); for (int i = 0; i &lt; columns; i++) { DataGridViewColumn dgvCol = (DataGridViewColumn)DataGridView6.Columns[i].Clone(); DataGridView7.Columns.Add(dgvCol); } DataGridView7.Rows.Add(row); } } </code></pre> <p>Now, to try this in VB:</p> <pre><code>private DataGridView6 As DataGridView private DataGridView7 As DataGridView Private Function CreateRow(ByVal data As Object) As DataGridViewRow Dim index As Int16 = DataGridView6.Rows.Add() Dim row As DataGridViewRow = DataGridView6.Rows(index) ' row.Cells(0) = something ' basically, add your date Return row End Function Private Sub DisplayManagerRow(ByVal row As DataGridViewRow) DataGridView7.DataSource = Nothing Dim columns As Int32 = 0 If Not (DataGridView6.Columns = Nothing) Then columns = DataGridView6.Columns.Count End If If ((row Is Not Nothing) And (0 &lt; columns)) Then DataGridView7.Columns.Clear() Dim cols As List&lt;DataGridViewColumn&gt; = new List&lt;DataGridViewColumn&gt;(columns) For (Dim i As Int32 = 0; i &lt; columns; i++) Dim dgvCol As DataGridViewColumn = CType(DataGridView6.Columns(i).Clone(), DataGridViewColumn) DataGridView7.Columns.Add(dgvCol) Next For DataGridView7.Rows.Add(row) End If End Sub </code></pre> <p>I can't even remember how to write a For loop in VB! Pathetic!</p> <p>Does that get the point across, though?</p> <p>Is this what you are trying to do?</p>
    singulars
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload