比如代码
Dim s As String = Tables("表A").Value
msgbox(s)
If s = "1" then
ElseIf s = "2" Then
ElseIf s = Nothing Then
End If
你说的打印选项,指什么?请用具体实例说明。