展望在后面打开 [英] outlook opens on the back

问题描述

我有这个非常简单的子工作正常但ms outlook（2010）在背面打开

I have this very simple sub works fine but ms outlook (2010) opens on the back

怎么做我把它带到前面？

how do I bring it to the front?

      尝试

            Dim Outl As Outlook.Application

            Outl = CreateObject（" Outlook.Application"）

            Dim omsg As Object

            omsg = Outl.CreateItem（Outlook.OlItemType.olTask​​Item）



            omsg.Subject =" Do billing"

            omsg.StartDate = Me.ActiveControl.Text

            omsg.DueDate = Me.ActiveControl.Text



            omsg.Display（True）

       Try
            Dim Outl As Outlook.Application
            Outl = CreateObject("Outlook.Application")
            Dim omsg As Object
            omsg = Outl.CreateItem(Outlook.OlItemType.olTaskItem)

            omsg.Subject = "Do billing"
            omsg.StartDate = Me.ActiveControl.Text
            omsg.DueDate = Me.ActiveControl.Text

            omsg.Display(True)

        C ex ex As Exception

            MsgBox（" Function tsb_todoadd：Error：" + Environment.NewLine + Err.Description，MsgBoxStyle.Critical，app_cia）

      最后

        Catch ex As Exception
            MsgBox("Function tsb_todoadd : Error : " + Environment.NewLine + Err.Description, MsgBoxStyle.Critical, app_cia)
       Finally

谢谢大家

推荐答案

嗨Bre-x，

Hi Bre-x,

感谢您在MSDN论坛上发帖。

Thank you for posting in MSDN forum.

由于您的问题与outlook更相关，我会将此主题移至更相关的论坛以获得更好的支持。

Since your issue is more related to outlook, I will move this thread to the more related forum for better support.

参考：
https： //social.msdn.microsoft.com/Forums/en-US/home?forum=outlookdev&filter=alltypes&sort=lastpostdesc

感谢您的理解和支持。

最好的问候，

Neda Zhang

Neda Zhang

这篇关于展望在后面打开的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！