请问大侠们VSTO里用VB语言怎么改调用outlook的代码，参数olMailItem？

吾股丰登

VBA调用OUTLOOK发送邮件的通用代码如下
Sub sentmail()
    On Error Resume Next
    Dim Temp As Outlook.Application
    Dim Newmail As MailItem
    Dim strg As String
    Set Temp = CreateObject("outlook.application")
    Set Newmail = Temp.CreateItem(olMailItem)
    With Newmail
        .To = "收件人邮箱"
        .cc = "抄送邮箱"
        .Subject = "主题"
        .Attachments.Add (ThisWorkbook.Path & "\" & ThisWorkbook.Name)
        .Send
    End With
End Sub

在VSTO里开发excel插件时，通过VB语言修改以上代码时在上面这个“olMailItem”这里不知道怎么改，已经提示报错，我将这红色字体部分改为“Microsoft.Office.Interop.Outlook.OlItemType.olMailItem”也不行，哪位大侠知道怎么改啊，麻烦告知一下呗，万分感谢。

临沂-枸杞

set去掉呀,vb.net里没有set了

吾股丰登

临沂-枸杞 发表于 2021-10-12 08:39
set去掉呀,vb.net里没有set了

依旧谢谢你
我上面已经写了“VBA调用OUTLOOK发送邮件的通用代码如下”，言外之意这是VBA代码，我的疑问只是在红色字体部分  其他方面的我倒是知道怎么改。

临沂-枸杞

那你是运行时报错,还是编辑的时候就报错?我这边试了没红啊

吾股丰登

临沂-枸杞 发表于 2021-10-12 16:24
那你是运行时报错,还是编辑的时候就报错?我这边试了没红啊

那就奇怪了   我当时是红色的    不过我后来稀里糊涂歪打正着搞对了

临沂-枸杞

吾股丰登 发表于 2021-10-12 16:27
那就奇怪了   我当时是红色的    不过我后来稀里糊涂歪打正着搞对了

大概VS卡了,没加载完引用的outlook引用