• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Textbox không chứa hết văn bản

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thảo Luận Access
  • [Hỏi] Textbox không chứa hết văn bản
• Textbox không chứa hết văn bản

• RE: Textbox không chứa hết văn bản

  MTNQ > 19-12-16, 02:39 PM

  Bạn code cho sự kiện After Update của combobox như sau:
  
  

  Mã:

  Private Sub Cb_AfterUpdate()
   If Len(Me!Cb) > 0 Then
       Me.Text = DLookup("noidung", "Table1", "ten = '" & Me.Cb & "'")
   End If
End Sub

  
  -Lưu ý: Bound Column của Cb phải là 1 (bạn đang set là 2, như vậy giá trị của  Me.Cb sẽ là trường Noidung)

• RE: Textbox không chứa hết văn bản

  thanhquyt > 19-12-16, 02:51 PM

  MatTroiNguQuen Đã viết:Bạn code cho sự kiện After Update của combobox như sau:
  
  

  Mã:

  Private Sub Cb_AfterUpdate()
   If Len(Me!Cb) > 0 Then
       Me.Text = DLookup("noidung", "Table1", "ten = '" & Me.Cb & "'")
   End If
End Sub

  
  -Lưu ý: Bound Column của Cb phải là 1 (bạn đang set là 2, như vậy giá trị của  Me.Cb sẽ là trường Noidung)

  Hi Bạn
  Cảm ơn Bạn rất nhiều !
• Bài trước Bài tiếp