怎样在access中将datagird(有没有控件)?

来源:百度知道 编辑:UC知道 时间:2024/05/20 18:09:25

在ACCESS中(按设计视图)新建窗体,在该窗体上添加文本框和列表框,列表框出现后,在列表框向导上选取消按钮。鼠标右键文本框,选处理事件(B),接着选代码生成器编写如下代码:Option Compare Database
Option Explicit
Dim n As Byte

Private Sub Text0_KeyUp(KeyCode As Integer, Shift As Integer)
Text0.Text = UCase$(Text0.Text)
Text0.SetFocus
n = Len(Text0.Text)
Text0.SelStart = n
Text0.SelLength = 1
List5.RowSource = "select 序号,单词,解释 from wz_bm where 单词>='" & Text0.Text & "' order by 单词"
End Sub

对列表框,用鼠标右键列表框选属性,在行来源项鼠表点此框右处选中所需连接的数据表,并点...按钮建立查询按需要选字段。
然后保存窗体。就能执行此窗体达到目的。
在下列网址有ACCESS数据库db1.mdb压缩文件供调试其中数据表结构和窗体代码附件:db1.rar
http://iask.sina.com.cn/b/2408738.html
以上意见供参考。