Setting Flag in Outlook

Dear VB users,

I am busy to make a VB program using MS Outlook.
At the moment I am trying to set the flags of Outlook but I can't find the property.
Can someone tell me how to set the flag of Outlook in VB5?

Source

Dim objOutlook As New Outlook.Application
Dim objOutlookMsg As Outlook.MailItem


Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg
.To = "q@q"

. ???? set flag property ????

End With


Nice greetings,

Michelle.

What flag property is it that you are wanting to set??

You could set the 'Flag for Follow up' with this code.

Code:

---

With objOutlookMsg
        .To = "q@q"
        .FlagStatus = olFlagMarked
End With

---