Vba 访问outlook邮件的文本框值

Vba 访问outlook邮件的文本框值,vba,ms-access,Vba,Ms Access,我在Access中有一个表单,里面有文本框。我想将文本框值输入outlook邮件正文。我的代码如下 With OutMail .SentOnBehalfOfName = "" .To = "" .CC = "" .Subject = "Test" .HTMLBody = RangetoHTML(objExcel, rng) & Chr(13) & Chr(10) & Form_FactorCoupon.Text25 .Sav

我在Access中有一个表单,里面有文本框。我想将文本框值输入outlook邮件正文。我的代码如下

With OutMail
    .SentOnBehalfOfName = ""
    .To = ""
    .CC = ""
    .Subject = "Test"
    .HTMLBody = RangetoHTML(objExcel, rng) & Chr(13) & Chr(10) & Form_FactorCoupon.Text25
    .Save
    .Close olPromtForSave
End With
RangetoHTML(objExcel,rng)
-此函数复制excel范围并将其粘贴到邮件正文中

表单\u FactorCoupon.Text25
-这是表单中包含电子邮件签名的文本框

我的问题是
Chr(13)&Chr(10)
不起作用。我用它留下一行,然后提供电子邮件签名

如何留下空行并提供文本框值?

您应该使用:

而不是
Chr(13)和Chr(10)


是新行(换行符)的HTML标记,而
Chr(10)
(换行符)和
Chr(13)
(carriege return)是用于在文本文件(非HTML)中获取新行的字符。

您应该使用:

而不是
Chr(13)&Chr(10)


是新行(换行符)的HTML标记,而
Chr(10)
(换行符)和
Chr(13)
(carriege return)是用于在文本文件(非HTML)中获取新行的字符