Thủ Thuật Access

Thế Giới Thủ Thuật với Access

Mở Form từ listbox, combobox

Posted by Noname on 01.02.2010

ạo một combo box từ mẫu biểu nào mà bạn muốn chọn để mở mẫu biểu đầu tiên. Combo box được thiết lập các thuộc tính sau:
Name: List of forms
Data: Value list (để cài đặt thuộc tính Row Suorce type)
Event: [On Enter]
‘ Đoạn mã xử lý như sau:

Private Sub Listofforms_enter()
   Dim MyDb as Database
   Dim MyContainer as Container
   Dim I as integer
   Dim list as string
   Set MyDb = DBEngine.Workspace(0).Database(0)
   Set My Container = MyDb.Containers(“Forms”)
   List = ” “
   For I=0 to MyContainer.Documents.count – 1
   List = List & MyContainer.Documents(I).name & “;”
   Next I
   me![List of Forms].Row Suorce = Left(List, Len(list)-1)
End sub

Nhập tiếp thuộc tính After Update của Combo box

Private Sub ListofForms_AfterUpdate()
   Docmd.OpenForm me![ListofForms)
End Sub

Sưu Tầm
____________________________________________________________________________________
Thảo luận thêm: http://thuthuataccess.co.cc/forum

3 phản hồi to “Mở Form từ listbox, combobox”

  1. Anonymous said

    mình đang thiết kế 1 from trong đó có 1 combobox chứa các danh mục sau: canhan,tochuc, hogiadinh1, hogiadinh2, canhannuocngoai. sao cho khi chọn 1 trong các mụctrên thì nó sẽ chạy query tương ứng sau: canhan, tochuc, hogiadinh1, hogiadinh2,canhannuocngoai. bạn giúp mình với. mình cám ơn bạn trước nha. email of mình:hoangthai77772000@yahoo.com

  2. haquocquan said

    Bạn tạo một form có combobox chứa danh sách các query.Đặt sự kiện combobox afterupdate như sau:Private Sub combobox_AfterUpdate() Docmd.OpenQuery me.ComboboxEnd Sub*****Như bài của Noname: không cần dài dòng thế đâu. Chỉ cần:Private Sub combobox_AfterUpdate() Docmd.OpenForm me.ComboboxEnd Sub

  3. Mình có một csdl về quản lý điểm, mỗi lần nhập cột điểm thảo luận nhóm (mỗi nhóm 20 sv) rất tốn thời gian. Bạn có thể chỉ cho mình làm thế nào để chỉ cần nhập một lần là sẽ có dữ liệu điểm của các thành viên trong nhóm luôn không. Cảm ơn trước nhé.

Gửi phản hồi

Mời bạn điền thông tin vào ô dưới đây hoặc kích vào một biểu tượng để đăng nhập:

WordPress.com Logo

Bạn đang bình luận bằng tài khoản WordPress.com Log Out / Thay đổi )

Twitter picture

Bạn đang bình luận bằng tài khoản Twitter Log Out / Thay đổi )

Facebook photo

Bạn đang bình luận bằng tài khoản Facebook Log Out / Thay đổi )

Google+ photo

Bạn đang bình luận bằng tài khoản Google+ Log Out / Thay đổi )

Connecting to %s

 
%d bloggers like this: