Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Điều khiển vị trí con trỏ vào Subform !
#1
tmtien261 dùng phương thức:
Mã:
Dim rst As Recordset
Set rst = Me.RecordsetClone
rst.FindFirst "[Sophieu]='" & Me.txtSophieu & "'"
If Not rst.EOF Then Me.Bookmark = rst.Bookmark
để di chuyển vị trí con trỏ đến record vừa thao tác trên Mainform thì OK.
Tuy nhiên khi muốn di chuyển vào record vừa thao tác của Subform bằng đoạn code:
Mã:
Dim rst As Recordset
Set rst = Me.frmXeDH_CapXangDau_ListPhieu.Form.RecordsetClone
rst.FindFirst "[Sophieu]='" & Me.txtSophieu & "'"
If Not rst.EOF Then Me.Bookmark = rst.Bookmark
thì ko thực hiện được. Báo lỗi ở dòng: Me.Bookmark = rst.Bookmark
Xin các Pro chỉ giáo các di chuyển con trỏ đến record của Subform vừa thao tác.
Cảm ơn nhiều !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#2
tmtien261 đã mày mò và làm được theo yêu cầu của mình rồi. Đoạn code như sau:
Mã:
...
DoCmd.GoToControl "Subform"
Me.Subform!Textbox.SetFocus
If IsNull(Form!Subform!Textbox) = False Then
     DoCmd.GoToRecord , , acFirst
     Do Until IsNull(Form!Subform!Textbox) = True
     If Me.Subform!Textbox = Me.TextboxX Then
         Me.Subform!Textbox.SetFocus
         Exit sub
     End If
     DoCmd.GoToRecord , , acNext
     Loop
End If
Các Pro có phương thức nào hay, gọn hơn xin chỉ giúp tmtien261. Cảm ơn nhiều !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Hướng Dẫn Demo tổng hợp xuất Table, Query sang Excel có điều kiện ở vị trí nào cũng được maidinhdan 18 2,790 20-10-16, 11:51 AM
Bài mới nhất: jeck09nt
  Trả lời câu hỏi bạn dinhnhieu: Export Query sang Excel có điều kiện maidinhdan 1 630 11-02-15, 05:17 PM
Bài mới nhất: maidinhdan
  [Help] Tìm kiếm theo nhiều điều kiện vulhu06 1 442 25-04-14, 11:57 AM
Bài mới nhất: vulhu06
  ý tưởng dùng ms access điều khiển thiết bị điện quanghoasla 10 3,487 13-10-11, 12:09 AM
Bài mới nhất: quanghoasla

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ