您好，假设在窗体上有10个label控件，Label1 到Label10 下面我将10个Label控件的caption（就是label控件的显示内容）合并在一字符串里：sub text() dim s$ for i=1 to 10 s=s &"、" & Me.Controls("Label" & i).Caption next end sub不知道满足你的要求没？
