conn.Open()
' Create a data adapter
Dim da As New SqlDataAdapter("SELECT * FROM myView", conn) 
Dim ds As New DataSet
da.Fill(ds) 
DataGridView1.DataSource = ds.DefaultViewManager 
'++- DataGridView1.Update() ' не показывает содержимое DataGridView1
MsgBox("Доходит сюда")

 conn.Open()
 ' Create a data adapter
 Dim da2 As New SqlDataAdapter("myView", conn)
 ' Create DataSet, fill it and view in data grid
 Dim ds2 As New DataSet("myView")
 '+-1 da2.Fill(ds2, "myView") ' Выполнение запроса процедура "myView" окончилось 
 ' неудачно, так как "myView" является объектом представление.

 da2.Fill(ds2)