Public Sub Move( _
   ByVal DestAE As String _
) 

Dim instance As Study
Dim DestAE As String
 
instance.Move(DestAE)

public void Move( 
   string DestAE
)

public: void Move( 
   string* DestAE
) 

public:
void Move( 
   String^ DestAE
) 

Private Studies As List(Of Study) = New List(Of Study)()
Private StudySeries As List(Of Series) = New List(Of Series)()


Public Sub StudyRetrieve()
    DicomEngine.Startup()
    DicomNet.Startup()

    Dim studyRetrieve_Dataset As QueryRetrieveScu = New QueryRetrieveScu()
    Dim query As FindQuery = New FindQuery()
    Dim scp As DicomScp = New DicomScp()

    scp.AETitle = "MI_SERVER"
    scp.Port = 104
    scp.Timeout = 60
    scp.PeerAddress = IPAddress.Parse("10.1.1.96")

    '
    ' Find all studies
    '
    query.QueryLevel = QueryLevel.Study
    AddHandler studyRetrieve_Dataset.MatchStudy, AddressOf studyRetrieve_MatchStudy
    AddHandler studyRetrieve_Dataset.MatchSeries, AddressOf studyRetrieve_MatchSeries
    studyRetrieve_Dataset.Find(scp, query)

    If Studies.Count > 0 Then
        '
        ' Find all series in study
        '
        Studies(0).FindSeries()
        If StudySeries.Count > 0 Then
            '
            ' Move all series to me
            '
            Studies(0).Move(String.Empty)
        End If
    End If

    studyRetrieve_Dataset = Nothing
    query = Nothing
    scp = Nothing

    DicomNet.Shutdown()
    DicomEngine.Shutdown()
End Sub

Private Sub studyRetrieve_MatchStudy(ByVal sender As Object, ByVal e As MatchEventArgs(Of Study))
    Studies.Add(e.Info)
End Sub

Private Sub studyRetrieve_MatchSeries(ByVal sender As Object, ByVal e As MatchEventArgs(Of Series))
    StudySeries.Add(e.Info)
End Sub

List<Study> Studies = new List<Study>();
List<Series> StudySeries = new List<Series>();


public void StudyRetrieve()
{
    DicomEngine.Startup();
    DicomNet.Startup();

    QueryRetrieveScu studyRetrieve = new QueryRetrieveScu();
    FindQuery query = new FindQuery();
    DicomScp scp = new DicomScp();

    scp.AETitle = "MI_SERVER";
    scp.Port = 104;
    scp.Timeout = 60;
    scp.PeerAddress = IPAddress.Parse("10.1.1.96");

    //
    // Find all studies
    //
    query.QueryLevel = QueryLevel.Study;
    studyRetrieve.MatchStudy += new MatchStudyDelegate(studyRetrieve_MatchStudy);
    studyRetrieve.MatchSeries += new MatchSeriesDelegate(studyRetrieve_MatchSeries);
    studyRetrieve.Find(scp, query);

    if(Studies.Count>0)
    {
        //
        // Find all series in study
        //
        Studies[0].FindSeries();
        if(StudySeries.Count>0)
        {
            //
            // Move all series to me
            //
            Studies[0].Move(string.Empty);
        }
    }

    studyRetrieve = null;
    query = null;
    scp = null;

    DicomNet.Shutdown();
    DicomEngine.Shutdown();
}        

void studyRetrieve_MatchStudy(object sender, MatchEventArgs<Study> e)
{
    Studies.Add(e.Info);
}

void studyRetrieve_MatchSeries(object sender, MatchEventArgs<Series> e)
{
    StudySeries.Add(e.Info);
}