Public Property Lists As String

Dim instance As SPSiteDataQuery
Dim value As String

value = instance.Lists

instance.Lists = value

public string Lists { get; set; }

Imports System
Imports System.Data
Imports Microsoft.SharePoint

Module ConsoleApp
   Sub Main()
      Using site As SPSite = New SPSite("http://localhost")
         Using web As SPWeb = site.OpenWeb()

            Dim query As SPSiteDataQuery = New SPSiteDataQuery()

            ' Query all Web sites in this site collection.
            query.Webs = "<Webs Scope='SiteCollection'>"

            ' Ask for document libraries.
            query.Lists = "<Lists ServerTemplate='101' />"

            ' Select the records.
            query.Query = "<Where>" + _
                             "<Gt>" + _
                               "<FieldRef Name='File_x0020_Size' />" + _
                               "<Value Type='Number'>0</Value>" + _
                             "</Gt>" + _
                          "</Where>"

            ' Specify the fields.
            query.ViewFields = "<FieldRef Name='FileSizeDisplay' />" + _
                               "<ProjectProperty Name='Title' />" + _
                               "<ListProperty Name='Title' />"

            ' Submit the query.
            Dim results As DataTable = web.GetSiteData(query)

            ' Process the results.
            Dim webTitle As String = String.Empty
            Dim listTitle As String = String.Empty
            Dim listTotal As Long = 0
            Dim webTotal As Long = 0
            Dim grandTotal As Long = 0

            Dim i As Integer
            For i = 0 To results.Rows.Count - 1 Step i + 1

               Dim curRow As DataRow = results.Rows(i)
               Dim curWeb As String = CType(curRow("ProjectProperty.Title"), String)
               Dim curList As String = CType(curRow("ListProperty.Title"), String)

               If webTitle <> curWeb Then
                  listTotal = PrintSubTotal(listTotal, listTitle)
                  listTitle = String.Empty

                  webTotal = PrintSubTotal(webTotal, webTitle)
                  webTitle = curWeb

                  Console.WriteLine(vbCrLf + "Web site: {0}", webTitle)
               End If

               If listTitle <> curList Then
                  listTotal = PrintSubTotal(listTotal, listTitle)
                  listTitle = curList
               End If

               ' Get the size of the current file.
               Dim fileSize As Integer = Convert.ToInt32(results.Rows(i)("FileSizeDisplay"))

               ' Add it to the totals.
               listTotal += fileSize
               webTotal += fileSize
               grandTotal += fileSize

            Next

            listTotal = PrintSubTotal(listTotal, listTitle)
            webTotal = PrintSubTotal(webTotal, webTitle)
            Console.WriteLine(vbCrLf + "Grand total: {0}", grandTotal)

         End Using
      End Using
      Console.Write(vbCrLf + "Press ENTER to continue...")
      Console.ReadLine()
   End Sub

   Function PrintSubTotal(ByVal total As Long, ByVal name As String) As Long
      If total <> 0 Then
         Console.WriteLine("  Total file size for {0} is {1}.", name, total)
      End If
      Return 0
   End Function

End Module

using System;
using System.Data;
using Microsoft.SharePoint;

namespace Test
{
   class ConsoleApp
   {
      static void Main(string[] args)
      {
         using (SPSite site = new SPSite("http://localhost"))
         {
            using (SPWeb web = site.OpenWeb())
            {
               SPSiteDataQuery query = new SPSiteDataQuery();
               
               // Query all Web sites in this site collection.
               query.Webs = "<Webs Scope=\"SiteCollection\">";

               // Ask for document libraries.
               query.Lists = "<Lists ServerTemplate=\"101\" />";

               // Select the records.
               query.Query = "<Where>" +
                                "<Gt>" +
                                  "<FieldRef Name=\"File_x0020_Size\" />" +
                                  "<Value Type=\"Number\">0</Value>" +
                                "</Gt>" +
                             "</Where>";

               // Specify the fields.
               query.ViewFields = "<FieldRef Name=\"FileSizeDisplay\" />" +
                                  "<ProjectProperty Name=\"Title\" />" +
                                  "<ListProperty Name=\"Title\" />";

               // Submit the query.
               DataTable results = web.GetSiteData(query);

               // Process the results.
               string webTitle = string.Empty;
               string listTitle = string.Empty;
               long listTotal = 0;
               long webTotal = 0;
               long grandTotal = 0;

               for (int i = 0; i < results.Rows.Count; i++)
               {
                  DataRow curRow = results.Rows[i];
                  string curWeb = curRow["ProjectProperty.Title"] as string;
                  string curList = curRow["ListProperty.Title"] as string;

                  if (webTitle != curWeb)
                  {
                     listTotal = PrintSubTotal(listTotal, listTitle);
                     listTitle = string.Empty;

                     webTotal = PrintSubTotal(webTotal, webTitle);
                     webTitle = curWeb;

                     Console.WriteLine("\nWeb site: {0}", webTitle);
                  }

                  if (listTitle != curList)
                  {
                     listTotal = PrintSubTotal(listTotal, listTitle);
                     listTitle = curList;
                  }

                  // Get the size of the current file.
                  int fileSize = Convert.ToInt32(results.Rows[i]["FileSizeDisplay"]);

                  // Add it to the totals.
                  listTotal += fileSize;
                  webTotal += fileSize;
                  grandTotal += fileSize;
               }

               listTotal = PrintSubTotal(listTotal, listTitle);
               webTotal = PrintSubTotal(webTotal, webTitle);
               Console.WriteLine("\nGrand total: {0}", grandTotal);

            }
         }
         Console.Write("\nPress ENTER to continue...");
         Console.ReadLine();
      }

      private static long PrintSubTotal(long total, string name)
      {
         if (total != 0)
            Console.WriteLine("  Total file size for {0} is {1}.", name, total);
         return 0;
      }
   }
}