access数据库：1、模拟随机生成一个数字，并将其显示在text0文本框内； 2、使用ADO对象将该随机数保存至“保存数据表”表中。 3、显示“保存数据表”表。

在Access数据库中，你可以通过VBA宏（Visual Basic for Applications）来实现这些功能。以下是步骤的简要描述：

1. **生成随机数并显示**: 首先，在VBA编辑器中创建一个模块，然后编写一个函数来生成随机数。例如：

Function GenerateRandom()
    Dim rng As New Random
    GenerateRandom = rng.Next(1, 101) '这里生成1到100之间的整数，你可以调整范围
End Function

接着，可以在Form的设计视图中找到`Text0`控件，设置其`.Value`属性为该随机数：

Private Sub Form_Load()
   Text0.Value = GenerateRandom
End Sub

2. **保存随机数到表**: 创建一个ADODB.Connection对象来连接到“保存数据表”，使用Recordset对象插入随机数：

Sub SaveToTable()
    Dim conn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    
    '设置连接字符串
    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=your_database.accdb;Persist Security Info=False;"
    
    'SQL查询或命令
    Set rs = conn.Execute("INSERT INTO [保存数据表] ([数值字段]) VALUES (?)", , adParamValue)
    If Not rs.EOF Then
        rs!数值字段 = GenerateRandom '假设表中有一个名为"数值字段"的列
        rs.Update
    End If
    
    rs.Close
    conn.Close
End Sub

记得替换`your_database.accdb`为你实际的数据库文件名。

3. **显示数据表**: 要显示表的内容，你可以创建一个新的Form或使用已有Form，绑定到“保存数据表”的数据源：

Sub DisplayTable()
    Dim dt As DAO.Database
    Dim rt As DAO.Recordset
    
    Set dt = CurrentDb '当前数据库
    Set rt = dt.OpenRecordset("SELECT * FROM 保存数据表")
    
    '在这里可以添加一个窗体或控件来遍历显示记录
    Do While Not rt.EOF
        Debug.Print rt!数值字段 '打印或处理每一行的数据
        rt.MoveNext
    Loop
    
    rt.Close
    dt.Close
End Sub

运行上述宏后，你会看到随机数已经保存到表中，并能在新打开的Form上查看数据。