Question

我正在学习VS VB，所以请原谅。

我建立了一个接受文件搜索模式的表单，搜索匹配的文件，然后在文本框中显示文件名（最多10个）。

如果双击文件名（最多10个）文本框，我希望它调用一个例程以打开Powerpoint并显示第一张幻灯片。

我到处搜索，找不到任何对2017年有帮助的信息。

这时，我的代码如下所示（仅显示我具有完整的文件名）。

Public Sub DisplaySong(ByVal SongFileName)

    Dim SongToDisplay As String = ""
    Dim i As Integer

    ' get the full song path/name
    Try
        Dim strFiles As String() = Directory.GetFiles(strSearchPath.ToString, SongFileName.ToString, IO.SearchOption.AllDirectories)
        i = 0
        ' should never be more than 1 song
        For Each SongFileName In strFiles
            SongToDisplay = strFiles(i)
            i = i + 1
        Next
    Catch ex As Exception
        MessageBox.Show("Error processing Display Song: Finding Song!! ")
    End Try

    MessageBox.Show("Song Selected: " + SongToDisplay.ToString)

End Sub

我讨论的有关添加COM的示例，但在2017版中看不到“ Microsoft Graph Object Library”。我选择了MS PowerPoint和MS Graph 14.0，并认为这是我所需要的。

当我添加

Dim oApp as PowerPoint.Application

在子例程中，我收到未定义的错误消息。我知道如何在Access VB 2010中执行此操作，但是我不知道如何在VS VB 2017中执行此操作。

感谢您的帮助。

Answer 1

假我。添加

Imports Microsoft.Office.Interop

解决了问题。

Visual Studio 2017 Visual Basic-如何将变量从一个事件传递到另一个事件

1 个答案: