用vba创建一个点击查询按钮，并在弹窗信息内显示我要录入的表格信息框。

您可以使用以下VBA代码来创建一个点击查询按钮，并在弹窗信息框内显示您要录入的表格信息框：

首先，您需要在Excel中打开Visual Basic Editor（VBE），然后在工作表上创建一个按钮控件。接下来，您需要在VBE中添加以下代码：

Sub ShowTableInfo()
    Dim tbl As ListObject
    Dim msg As String
    
    Set tbl = ActiveSheet.ListObjects("Table1") '替换Table1为您的表格名称
    msg = "您要录入的表格信息如下:" & vbCrLf & vbCrLf
    msg = msg & "表格名称: " & tbl.Name & vbCrLf
    msg = msg & "表格行数: " & tbl.Range.Rows.Count & vbCrLf
    msg = msg & "表格列数: " & tbl.Range.Columns.Count & vbCrLf
    
    MsgBox msg, vbInformation, "表格信息"
End Sub

然后，您需要将该代码分配给您创建的按钮控件。在VBE中，双击按钮控件以打开代码编辑器，并将以下代码添加到该模块：

Private Sub CommandButton1_Click()
    ShowTableInfo
End Sub

这将使按钮单击时调用ShowTableInfo过程，并在弹出窗口中显示表格信息。现在，您可以保存文件并测试该按钮是否按预期工作。