在窗体上，当需要对多个控件的值复制到粘贴板上时，可以先将多个控件的值进行组合，赋值给另一个文本框，然后再对该文本框的内容复制到粘贴板，代码如下：

Private Sub Command2_Click()
    Me.Text4.SetFocus '获得焦点
    Me.Text4 = Me.Text1 & Me.Text2 & " " & Me.Text3 '对内容进行合并
    DoCmd.RunCommand acCmdCopy '复制到粘贴板
    Me.Text4.SetFocus '获得焦点
End Sub

示例下载：

点击下载此附件

图   示：