vb.net - StorageFileQueryResults.ContentsChanged 未触发

Question

我尝试为我的新表面开发一个简单的（也是第一个）Windows 8 应用程序。在这个应用程序中，我尝试查看用于添加新文件（尤其是图片）的文件夹。为此，我尝试使用事件 StorageFileQueryResults.ContentsChanged。

代码很简单，但是当我添加一个新文件时事件没有触发。这是代码：

    'Load Image Libary Pictures
    Dim fqFiles = KnownFolders.PicturesLibrary.CreateFileQuery()
    AddHandler fqFiles.ContentsChanged, AddressOf ContentsChanged
    Dim liFiles = Await fqFiles.GetFilesAsync()

Private Sub ContentsChanged(sender As IStorageQueryResultBase, args As Object)
    Dim msgDialog = New MessageDialog("Test", "test2")
    msgDialog.ShowAsync()
End Sub

如果我做错了什么，有人知道吗？