主题：[求助]

 那你就分别写

Dim c As String

If e.Sender.Text = "表A" Then

    c = "第一列,100|第二列,100|第三列,100|第四列,100|第五列,100|第六列,100"

Else If e.Sender.Text = "表B" Then

    c = "第一列,100|第二列,100|第三列,100|第四列,100|第五列,100|第六列,100"

End if