toidjtjmtoi > 19-08-22, 12:22 PM
ongke0711 > 19-08-22, 12:31 PM
toidjtjmtoi > 19-08-22, 02:12 PM
(19-08-22, 12:31 PM)ongke0711 Đã viết: Lấy data từ Form là lấy cái gì?
Bạn dùng từ khóa mông lung quá nên tìm không ra là đúng rồi.
ongke0711 > 19-08-22, 02:55 PM
(19-08-22, 02:12 PM)toidjtjmtoi Đã viết: Ví dụ hiện tại Form popup con em phải để defaul value = Forms!Formchinh1!ID
Em có nhiều form Chinh1 , chinh2 nhưng chỉ có 1 form con popup
Em muốn hỏi có cách nào để tất cả form chính dùng chung 1 form con mà vẫn lấy dc default value ko á anh
Docmd.OpenForm "FormCon", OpenArgs:= Me.ID
Private Sub Form_Open()
If Not IsNull (Me.OpenArgs) Then
defaultValue = Me.OpenArgs
End If
End Sub
Public defVal As Long
defVal = Me.ID
Docmd.OpenForm "FormCon"
defaultValue = defVal
...
toidjtjmtoi > 22-08-22, 10:35 AM
(19-08-22, 02:55 PM)ongke0711 Đã viết:(19-08-22, 02:12 PM)toidjtjmtoi Đã viết: Ví dụ hiện tại Form popup con em phải để defaul value = Forms!Formchinh1!ID
Em có nhiều form Chinh1 , chinh2 nhưng chỉ có 1 form con popup
Em muốn hỏi có cách nào để tất cả form chính dùng chung 1 form con mà vẫn lấy dc default value ko á anh
Vậy mới rõ ràng, người ta mới biết bạn cần cụ thể là cái gì.
Ngâm cứu sử dụng tham số OpenArgs để truyền giá trị từ Form này sang Form khác. Một cách nữa là dùng biến toàn cục để lưu giá trị.
Ví dụ:
1. Dùng OpenArgs:
Mã PHP:Docmd.OpenForm "FormCon", OpenArgs:= Me.ID
- Ở sự kiện OnOpen của Form con:
Mã PHP:Private Sub Form_Open()
If Not IsNull (Me.OpenArgs) Then
defaultValue = Me.OpenArgs
End If
End Sub
2. Dùng biến toàn cục:
- Khai báo biến ở Module
Mã PHP:Public defVal As Long
- Gán trị cho biến toàn cục
Mã PHP:defVal = Me.ID
Docmd.OpenForm "FormCon"
- Ở sự kiện OnLoad của Form con:
Mã PHP:defaultValue = defVal
...