Dim count As Integer = " " & Tables("表a").Rows.Count & " "
txt="最新公告: " & txt0 & " "
txt="最新公告: " & txt0 & " " & txt2 & " ★ " & txt1 & " "
。。。