Fråga : Hur jag tillfogar ror till en datagridview som baseras på a för varje meddelande i VS2008?

Pröva förmiddag I att skapa en datagridview, som befolkar en kolonn med en lista av växter, och beräknar därefter numrera av blom som varje växt hade för varje år att växten spårades.  Detta är vad är funktionsdugligt så avlägset:

Dim antecknar = (från ID i d.tblSurveys-_
grupp vid TagNo = id.FinalTag in i grupp_
beställer vid TagNo Ascending _
valda TagNo), recCount = rekord för .ToList

dunkel. Count

om recCount<= 0 Then
MsgBox (”inga tillgängliga data. ” MsgBoxStyle.Information, ”dtable för
Else

för dataförfrågan”) dunkelt som nya DataTable
dtable. Columns.Add (”FinalTag”, (decimal-) GetType)
'tillfogar åren till table för varje y i Me.lbYear.DataSource
dtable. Columns.Add (y, GetType (stränga)),
Next

för varje kolonn i dtable. Columns

dunkel dc som ny DataGridViewColumn
DGridAllYears.Columns.Add (dc)
den pröva dc.HeaderText- = för col.ToString
Next

Now I förmiddagen att tillfoga ror using rekorden till denna datagridview. förmiddagen för

I är kompetent att tillfoga växten, listar till ett datatable och visar det till och med en olik datagridview.

For varje rec i dunkel datarow för records
som DataRow = för dtable.NewRow
datarow. Objekt (0) = rec. Value
dtable. Rows.Add (datarow)
Next
But som jag inte kan verka för att konvertera denna metod till en hjälp för datagridview…

Any, eller skulle förslag uppskattas!
Thanks.

" klar "

Svar : Hur jag tillfogar ror till en datagridview som baseras på a för varje meddelande i VS2008?

Du styrkan har två olika typer av att fodra avbrott.

Försök detta

Suben zap ()
ActiveSheet. [A: A]. Byt ut Chr (13) & Chr (10), ””,
ActiveSheet. [A: A]. Byt ut Chr (10), ””,
ActiveSheet. [A: A]. Byt ut Chr (13), ””,
Avsluta suben