MS Access 报告中的换行符

Posted 2023-05-06

【中文标题】MS Access 报告中的换行符

【英文标题】：Line Breaks in MS Access Report

【发布时间】：2013-02-27 15:27:48

【问题描述】：

我正在使用 VB.NET 和 MS ACCESS 2007。

我正在尝试为收据创建标题。

在我的程序中，我希望用户使用富文本框输入收据的标题。

我想将用户的输入存储到数据库中，并将其作为收据的标题。

例子：

richtextbox中显示的用户输入为：

胡安·德拉克鲁兹

16

日本东京

并且存入数据库时​​显示为：

Juan Dela Cruz [这里有一个符号] 16 [符号] 日本东京

MS Access 报告中也会显示相同的内容，这是我不希望 Access 显示给我的。

我希望 Access 给我一个与用户在富文本框中输入相同的结果：

胡安·德拉克鲁兹

16

日本东京

我怎样才能做到这一点？

点击按钮后执行的代码：

Try
        If receiptEdit = 0 Then
            Dim updateHeader = "UPDATE tbl_receiptdetails SET RHeader = '" & boxReceipt.Text & "'"
            ExecNonQuery(updateHeader)
            MsgBox("Receipt Header Updated")
        ElseIf receiptEdit = 1 Then
            Dim updateFooter = "UPDATE tbl_receiptdetails SET RFooter = '" & boxReceipt.Text & "'"
            ExecNonQuery(updateFooter)
            MsgBox("Receipt Footer Updated")
        End If
    Catch ex As Exception
        MsgBox(ex.ToString)
    End Try

【问题讨论】：

符号是什么意思？一个矩形？里面有日文吗？

我无法在此处粘贴符号。它只是给我换行符。

你是说在 Access 中 CrLf 字符显示为矩形而不是创建回车符？

在保存之前尝试替换。 val = Replace(val, vbCr, vbNewLine) val = Replace(val, vbLf, vbNewLine)

是的 clweeks，我显示为一个矩形

【参考方案1】：

@GM-XileGM-Xile：

我的评论中的解决方案，作为答案：

替换

boxReceipt.Text 

与

boxReceipt.Text.Replace(vbCr, vbNewLine).Replace(vbLf, vbNewLine)