Работа с массивами

-коллекция, содержащая все столбцы в элементе управления
CurrentCell-  возвращает активную ячейку
CurrentRow

-возвращает строку, содержащую текущую ячейку.
DataSource  -источник данных, данные которого отображает
DataMember -имя списка или таблицы в источнике данных.

отображаемых в элементе
Rows- коллекция, содержащая все строки в элементе управления 
SortedColumn- столбец,

по которому выполняется сортировка 
SortOrder. - как сортируются элементы (Ascending, Descending, None)
Это свойство используется для указания, типа сортировки, появляется когда столбец, определенный свойством SortedColumn имеет значение свойства SortMode=Automatic. 

MyBase.Load
Dim i As Integer

Dg1.RowCount = 5
Dg1.ColumnCount = 4
For i = 0 To 4
Dg1.Columns(i).HeaderText = Str(i + 1)
Next
End Sub

Button1.Click
For i = 0 To 4
For j

= 0 To 3
Dg1.Rows(i).Cells(j).Value = Str(Int(Rnd() * 10))
Next j, i
End Sub

R As New Random
Dim Matrix(10, 10)

As Integer
Dim Dt As New DataTable
For X As Integer = 0 To 9
Dt.Columns.Add("X" & X + 1)
For Y As Integer = 0 To 9
If Dt.Rows.Count <> 10 Then Dt.Rows.Add()
Matrix(Y, X) = R.Next(-100, 101)
Dt(Y)(X) = Matrix(Y, X)
Next
Next
DataGridView1.DataSource = Dt
End Sub

Button3.Click
Dim s As String

s = T1.Text
Dim a As Array
a = Split(s)
For i = 0 To UBound(a)
T1.Text += vbCrLf + a(i)
Next
End Sub

= Keys.Enter Then
If Not ComboBox1.Items.Contains(ComboBox1.Text) Then

ComboBox1.Items.Add(ComboBox1.Text)
MessageBox.Show("Новый элемент добавлен в список")
ComboBox1.DroppedDown = True
Else
MessageBox.Show("Такой элемент уже существует")
End If
End If
TextBox3.Text = ComboBox1.Text + vbCrLf + ComboBox2.Text + vbCrLf + ComboBox3.Text
End Sub

DateTimePicker1.Value.ToLongTimeString, DateTimePicker1.Value.ToShortTimeString)

MonthCalendar1.MinDate = Today

For x = fmin To fmax Step stepper

y = Math.Tanh(x)
graph.DrawEllipse(pen1, x * 70, y * 70, 1, 1)
Next x
End If
If btn_pol.Checked Then
For t = fmin To fmax Step stepper
r = 3 * Math.Cos(t) - Math.Cos(3 * t)
x = r * Math.Cos(t)
y = r * Math.Sin(t)
graph.DrawEllipse(pen1, x * 108, y * 108, 1, 1)
Next t
End If