aşagıdaki kodu proferty forma eklersen olur ama aynı şey ...
Private Sub Command1_Click()
Dim rs As Object
DoCmd.OpenForm "Compound Form"
Set rs = Forms![Compound Form].Recordset.Clone
rs.FindFirst "[CompoundID] = " & Str(Nz(Me![CompoundName], 0))
If Not rs.EOF Then Forms![Compound Form].Bookmark = rs.Bookmark
End Sub
Openform Butonu Hakkında
Bu Konudaki Yorumlar |
Openform Butonu Hakkında - Yazar: erdoganarslan - 16/10/2017, 16:53
Cvp: Openform Butonu Hakkında - Yazar: C*e*l*o*y*c*e - 16/10/2017, 17:40
Cvp: Openform Butonu Hakkında - Yazar: erdoganarslan - 18/10/2017, 11:36
Cvp: Openform Butonu Hakkında - Yazar: C*e*l*o*y*c*e - 18/10/2017, 11:49
Cvp: Openform Butonu Hakkında - Yazar: erdoganarslan - 18/10/2017, 13:21
Cvp: Openform Butonu Hakkında - Yazar: direnist - 18/10/2017, 13:24
Cvp: Openform Butonu Hakkında - Yazar: erdoganarslan - 18/10/2017, 13:27
|
Konuyu Okuyanlar: 1 Ziyaretçi