Hỏi về xóa dữ liệu Textbox hoặc Combox ở nhiều Frame khác nhau

[tuannguyen789]

Chào mọi người,

Tuấn có 2 frame (Textbox2 nằm frame 1, Textbox3 nằm frame 2) và Textbox1 nằm ở userform
Cú pháp của Tuấn:

Phần userform khai báo như sau:
Private ChonTextBox As Class1
Dim Textbox As MSForms.Textbox
Set Textbox = Controls.Add("Forms.TextBox.1")
Set ChonTextBox= New Class1
Set ChonTextBox.Textbox = Textbox
With Textbox ' Dùng để tạo ra Textbox2 và Textbox3
.Name = "Textbox1"
.Left = 500
.Top = 500
'.Value = 1
End With

Trong modul Claas:
Public WithEvents Textbox As MSForms.Textbox

Property Set CtrTextbox(Textbox As MSForms.Textbox)
Set CtrTextbox = Textbox
End Property

Private Sub Textbox_Change()
Dim Textbox1 As MSForms.Textbox
Dim Textbox2 As MSForms.Textbox
With TextBox
Set Textbox1 = .Parent.Controls("Frame1").Controls.Add("Forms.TextBox.1")
with Textbox1
.Name = "Textbox2"
.Left=20
.Top=10
End with

Set Textbox2 = .Parent.Controls("Frame2").Controls.Add("Forms.TextBox.1")
With Textbox2
.Name = "Textbox3"
.Left=20
.Top=10
End with
End with
End Sub
Private Sub Textbox_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Textbox.Value = ""
End Sub

Trường hợp DblClick cho Textbox1 thì câu lệnh thực hiện, nhưng ở Textbox2 và Textbox3 thì không thực hiện
Mong nhận được sự hỗ trợ từ diễn đàn.

 

[tuannguyen789]

Chào mọi người,

Mục đích viết, mà viết ở phần nào cũng được, không nhất Thiết như bạn VietMini cũng chưa hoàn toàn đúng.

Tùy vào Nhu cầu sử dụng, ở đây Tuấn không nói về vấn đề thương mại. nên có thể bạn chưa hiểu hết vấn đề.

Với bạn Online, bạn nói đúng, bởi vì chủ ý của người viết là theo mục đích của người viết. Vấn đề nằm ở chỗ, với sự việc dblick (áp dụng cho Excell,) xử lý ở modul Class thì sẽ giải quyết thế nào.Nên cần tới sự trợ giúp của diễn dàn, không phải vấn đề rối, nhìn không hợp lý.

Tuấn đọc qua 2 comment, Tuấn nghĩ tới bài toán: 8-3-3=2, mà hình như 2 bạn đang giải theo hướng này.

Bài đã được tự động gộp: 30/6/20

Tóm lại: Muốn người khác hỗ trợ nhưng không muốn người khác xem file?

Chào a,

Như các comment ở trên, file tuấn chuẩn bị thực hiện rất rối (vì vẽ hình frame), nếu up lên việc giải quyết code cho sự kiện Dblick_change() bị rối.


Tuấn có copy đoạn code đơn gian, vì Thiết nghĩ, các thành viên là những người am hiểu rất rõ, nhìn vào sẽ xử lý được.

 

[huuthang_bd]

Dựng form hoàn toàn bằng code cũng được nhưng chỉ khi bạn có đủ kiến thức, kiểm soát được hoàn toàn code thì khi đó mới hiệu quả. Nếu không, dù cho bạn có hoàn thành được đi chăng nữa thì code của bạn cũng là kiểu mượn chỗ này một ít, mượn chỗ kia một ít chắp vá lung tung và đương nhiên bạn không thể kiểm soát được nó.
Còn một điều nữa làm cho người khác không thoải mái khi giúp bạn là bạn muốn hỏi nhưng cứ giấu giấu giếm giếm cái file liên quan đến vấn đề cần hỏi. Tôi hiểu là bạn bỏ nhiều công sức ra để tạo cái file đó nên bạn thấy nó quý nhưng nói thật với bạn là với những dòng code mà bạn hỏi ở bài #1 thì tôi cho rằng chả có ai trong topic này có ý định "chôm" bất cứ thứ gì trong cái file của bạn cả.

Trở lại câu hỏi ở bài 1, Class module của bạn chỉ có 2 sự kiện Textbox_Change() và Textbox_DblClick() (của textbox có tên Textbox1), bạn có viết code sự kiện cho Textbox1 (textbox có tên Textbox2) và Textbox2 (textbox có tên Textbox3) đâu mà đòi Excel nó thực hiện.

Ngay cả việc đặc tên cũng không khoa học, tôi viết có mấy dòng mà xoắn hết cả não.

Chốt: Bạn chưa đủ kiến thức để đi theo con đường này, bạn nên chọn con đương khác.