组合名称的所有部分而无需多余的空格-优快云博客

本文介绍了一种在Visual Basic中更简洁地组合全名（包含首名、中间名和姓氏）的方法，避免了因中间名缺失导致的多余空格问题。通过使用Trim函数，代码不仅更紧凑，执行效率也得到了提升。

我正在创建一个数据库，在该数据库中，所跟踪的事情之一是一个人的名字：首先，中间和最后是单独的字段。在一个特定的例子中，我需要在某种措辞中包括该人的全名。使用以下方法很容易做到：

Dim strFullName As String
strFullName = Me.AccusedF & " " & Me.AccusedM & " " & Me.AccusedL

问题是，如果未提供中间名，则名字和姓氏之间将留有两个空格。最初，我已经对Me.AccusedM＆“” <>“”进行了测试，然后根据结果包括或排除了中间名字段。但是，使用If / Then / Else语句花费了五行代码。

为此，我现在想出了一种更简单的方法。

strFullName = Trim(Me.AccusedF & " " & Me.AccusedM) & " " & Me.AccusedL

如果Me.AccusedM为空，则在添加第二个空格作为姓氏之前，Trim（）函数会占用额外的空间。这样不仅可以将代码从五行缩减为一行，而且还不需要测试Me.AccusedM的代码，从而可以部分地加快代码的执行速度。它肯定使代码看起来更干净。