导入Microsoft.Office.Interop.Word中断新框架()

时间:2017-06-13 00:02:41

标签: wpf vb.net

问题是导入 Microsoft.Office.Interop.Word (我在本课程的其他地方需要)中断" New Frame()"。错误是

  

'新'不能在界面上使用

我的猜测是Interop.Word重新定义了#34; frame"。我该如何解决这个问题?

我的代码:

Imports C1.WPF
Imports Microsoft.Office.Interop.Word

End Sub

Private Sub btn_SendQuote_Click(sender As Object, e As RoutedEventArgs) Handles btn_SendQuote.Click

    Dim tab_SendQuote As New C1TabItem()
    Dim frame_SendQuote As New Frame()
    Dim scroller_SendQuote As New ScrollViewer()
    Dim str_Name As String = "Send Quote"
    Dim str_NavigationLink As String = "PM_SendQuote.xaml"

    createNewTab(tab_SendQuote, frame_SendQuote, scroller_SendQuote, str_Name, str_NavigationLink)
End Sub

Private Sub createNewTab(tab As C1TabItem, frame As Frame, scroller As ScrollViewer, str_TabName As String, str_NavigationLink As String)
    'Function to be used for adding tabs

    'Add and name new tab
    tab.Header = tabcontrol.Items.Count + 1 & ". " & str_TabName
    tab.CanUserClose = True
    tabcontrol.Items.Add(tab)

    'Add frame to the tab and include new job subform page
    With frame
        .NavigationService.Navigate(New Uri(str_NavigationLink, UriKind.Relative))
        .HorizontalAlignment = HorizontalAlignment.Stretch
        .VerticalAlignment = VerticalAlignment.Top
        .Margin = New Thickness(0, 0, 0, 0)
    End With

    With scroller
        .CanContentScroll = vbTrue
        .VerticalScrollBarVisibility = ScrollBarVisibility.Auto
        .HorizontalScrollBarVisibility = ScrollBarVisibility.Auto
        .Content = frame
    End With

    tab.Content = scroller
    ' Set new tab as active tab
    tabcontrol.SelectedIndex = tabcontrol.Items.IndexOf(tab)

End Sub

0 个答案:

没有答案