Si, creando il datatable (o i datatable) programmaticamente ed aggiungendolo/i alla collection dei datatables del dataset:

codice:
            Dim dtMese As New DataTable
            Dim dsMese as New Dataset

            dtMese.Columns.Add(New DataColumn("nome", GetType(System.String)))
            dtMese.Columns.Add(New DataColumn("cognome", GetType(System.String)))
            dtMese.Columns.Add(New DataColumn("indirizzo", GetType(System.String)))
          
            ' Aggiungo 5 righe (uguali per l'esempio)
            For indice_right As Integer = 1 To 5
                Dim riga As DataRow
                riga = dtMese.NewRow()

                riga("nome") = "super"
                riga("cognome") = "man"
                riga("indirizzo") = "via Krypton, 000"
                dtMese.Rows.Add(riga)
            Next
            
            dsMese.Tables.Add(dtMese)