Using nonexistant tablename doen't raise error

Using Different code than before

Public Sub MySub()

        Dim DS As New DataSet
        Dim Table As New DataTable("MyTable")
        DS.Tables.Add(Table)
        DS.AcceptChanges()
        Dim myTable As DataTable
        myTable = DS.Tables("asdsafsdag"

End Sub

This doesn't raise an error even though the table asdsafsdag doesn't exist in the dataset.

Help

_____________________________
BeforeEdit:

Dataset has 3 tables Table1, Table2, Table3

ReturnTable("hjgghfhdhjh")
________________________________________________

Public Function ReturnTable (DataTableName as String) as DataTable

Try
Return DataSet.Tables(DataTableName)
Catch
msgbox(err.description)
End Try

End Function
___________________________________________________

Help