View email in VB6

I have a program that I am emailing the client. I have found many ways to send the email, which works fine for automatically send it. I am not sure how to get the email to show the email and have the user manually press send. This is what I have so far

Set mail_object = New Outlook.Application
Set Mail_Single = Mail_object.createitem(olMailItem)
With Mail_Single
.subject = Email_Subject
.To = Email_Send_to
.CC = Email_Co
.Body = StrEmail
.Send
End With

I have tried replacing .Send with .Show. Neither are working. Is this even possible?

Andrew