'declaraciones
Private dsant As New amistatsDataSet1
Private cussants As New amistatsDataSet1TableAdapters.santoralTableAdapter
Dim View As System.Data.DataView
Public Sub New()
' This call is required by the designer.
InitializeComponent()
'aqui cargo el dataset
cussants.Fill(dsant.santoral)
View = dsant.santoral.DefaultView
'ahora ordenamos el datagrid
View.Sort = "nom"
grdDatos.ItemsSource = DirectCast(View.ToTable(), System.ComponentModel.IListSource).GetList
End Sub