Tùy chọn
hỏi về code đóng mở form trong access
- hỏi về code đóng mở form trong access
-
hỏi về code đóng mở form trong access
cuongvan09 > 31-03-12, 10:42 PM
xin anh/chị chỉ dùm e cái code đóng mở form trong access. tình hình là em muốn mở cái form này thì cái form trước đó sẽ bị đóng lại, khi đóng cái form hiện tại thì cái form trước đó sẽ tự động đc mở lại ( là mình đag ở form ông nội mà mình mở form cha thì form ông nội sẽ bị đóng lại và mở form con thì form cha sẽ bị đóng lại. còn khi mình đóng form con thì form cha sẽ tự động đc mở lại và đóng form cha thì form og nội sẽ tự động đc mở lại)
e xin cám ơn các anh/chị nhiều nha
-
RE: hoi ve code dong form nay khi mo form khac
gialilama > 01-04-12, 09:19 AM
Bạn chọn hai thuộc tính pop up=yes và Medal= yes.
Mình tin chắc là được. nhưng nhiều khi cũng phiền toái cho người dùng đó.
Chúc Bạn thành công! -
RE: hỏi về code đóng mở form trong access
Noname > 01-04-12, 01:41 PM
Giả sử bạn có hai form là FormCha và FormCon. Bạn muốn khi mở FormCon thì tự đóng FormCha, và khi đóng FormCon thì FormCha tự mở lại. Dưới đây là cách thực hiện:
Bạn tạo một module vào copy code sau vào:
Trong sự kiện Form_Load của form con, bạn cho code sau vào:Mã:' Cho âÒn hiêòn form Form
'Write by Noname
'Site thuthuataccess.com
Sub setVisibleForm(myForm As String, Visible As Boolean)
If visible Then
If Forms(myForm).CurrentView = 0 Then
DoCmd.OpenForm myForm
End If
End If
Forms(myForm).Visible = Visible
End Sub
Mã:Private Sub Form_Load()
setVisibleForm "FormCha", False ' thay chu FormCha bang form truoc do cua ban
End Sub
Trong sự kiện Unload của Form Con, cho code sau vào:
Mã:Private Sub Form_Unload(Cancel As Integer)
setVisibleForm "FormCha", True
End Sub
Xem demo -
RE: hỏi về code đóng mở form trong access
Xuân Thanh > 06-04-12, 06:05 PM
Câu lệnh cho nút Đóng của frmCha
Tương tự cho frConMã:Private Sub cmdDong_Click()
DoCmd.OpenForm("frmCon", acNormal)
Docmd.Close
End Sub