А>

Dim dt As New DataTable("MyTable")

Me.dataGrid1.DataSource = dt

Me.dataGrid1.Refresh()

А> , где dataGrid1 твой dataGrid, добавленный на форму

Пробовал.
Похоже, что у меня с пабликами/приватами проблема.
Две строки рядом.

1. frmKMS_Gen.ActiveForm.Text = "wefwewefw"

2. frmKMS_Gen.DataGrid1.DataSource = InitDataTableTicker

Первая работает, вторая — нет.

Ругается на frmKMS_Gen.DataGrid1, как
"Reference to a non-shared member requires an object reference."

>2. frmKMS_Gen.DataGrid1.DataSource = InitDataTableTicker
>Первая работает, вторая — нет.
у меня DataGrid1 настройки по умолчанию, а InitDataTableTicker это DataTable?

---

данное сообщение получено с www.gotdotnet.ru
ссылка на оригинальное сообщение

>>2. frmKMS_Gen.DataGrid1.DataSource = InitDataTableTicker
>>Первая работает, вторая — нет.
А>у меня DataGrid1 настройки по умолчанию, а InitDataTableTicker это DataTable?

Да. DataTable.

Dim InitDataTableTicker As DataTable = New DataTable("InitDataTableTicker")
или так
Dim InitDataTableTicker As New DataTable("InitDataTableTicker")
или так
Dim InitDataTableTicker As DataTable

Я уже DataGrid1 как только не сношал, — не идет.

В чем может быть дело?
Хотя бы направление, куда ковырять?!

Спасибо.

С уважением, Коняев Павел.

KMS wrote:
...
> В чем может быть дело?
> Хотя бы направление, куда ковырять?!

Павел,
для демонстрации открой новый проект (Windows Forms).
В коде Form1 следующий код:

  Private Sub Form1_Load(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles MyBase.Load
    '
    Dim DataTable1 As New DataTable("Tab1")
    With DataTable1
      .Columns.Add(New DataColumn("col1", GetType(System.Int32)))
      .Columns.Add(New DataColumn("col2", GetType(System.String)))
      .Columns.Add(New DataColumn("col3", GetType(System.String)))
    End With
    '
    For i As Integer = 1 To 10
      Dim DataRow1 As DataRow = DataTable1.NewRow
      With DataRow1
        .Item("Col1") = i
        .Item("Col2") = "Line " & i.ToString
        .Item("Col3") = "Text " & i.ToString
      End With
      DataTable1.Rows.Add(DataRow1)
    Next
    '
    Dim DataGrid1 As New DataGrid
    With DataGrid1
      .Dock = DockStyle.Fill
      .DataSource = DataTable1
    End With
    Me.Controls.Add(DataGrid1)
    '
  End Sub

Peter

Peter Fleischer, спасибо.

Дальше я сам.
Не было примера работающего, теперь пойдет.

Спасибо еще раз.

С уважением, Коняев Павел.

Peter Fleischer, спасибо.

Теперь, когда есть работающий пример, я сам справлюсь.

Спасибо еще раз.

С уважением, Коняев Павел.

А>Похоже, что у меня с пабликами/приватами проблема.

Ну конечно! Обьявите frmKMS_Gen.DataGrid1 как public и все пойдет, как по маслу... до следующей ошибки .

А если серьезно, то все-же стоит почитать литературу (или МСДН) с целью освоения хотя бы самых элементарных вопросов. Иначе программирование для Вас превратится в диалоги (или монологи) на RSDN и GotDotNet.
Ведь Вы же догадались про "с пабликами/приватами", тогда почему сами не проверили?

Желаю удачи!

---

данное сообщение получено с www.gotdotnet.ru
ссылка на оригинальное сообщение