Nhấn phím tắt mà combobox không chạy.

Liên hệ QC
Tôi tuân thủ nội quy khi đăng bài

LuuAnh980

Thành viên tiêu biểu
Tham gia
28/9/22
Bài viết
452
Được thích
104
Giới tính
Nữ
Em có 1 Form nhập liệu, khi nạp dữ liệu đầy đủ vào Listbox2 (trong phần Cutting) nhấn Alt+X thì nạp dữ liệu vào Sheet!Cat.
Ví dụ như sau:
Gõ ngày 12/1 vào Date->Gas vào Machine->01235 vào Track No->2222 vào Job->18 vào RQ No-> 1015120 vào Code->gõ 2 vào Q'Ty nhấn Enter thì dữ liệu đập vào ListBox2, và lúc nhấn phím tắt Alt+X thì lại nhảy lên Cb_Machine. Em nghĩ có thể do lúc đó Cb_Machine setfocus, nhưng nếu vậy thì lại ở ListBox1 lại không sao. Em xin đưa hình minh họa và file.
Mở Form: Ctrl+q.
Code trong file có sự giúp đỡ của anh @HieuCD , mong các anh giúp đỡ cho Form chạy mượt.LoiLB.png
 

File đính kèm

  • Cutting_F6_24.xlsb
    94.3 KB · Đọc: 20
Anh @HeSanbi em thay code của anh bài #32, thì các combobox Job, RQ, Code không hiện dữ liệu luôn anh ơi.
Nó cà giựt anh @HeSanbi ơi, lúc hiện dữ liệu lúc không anh ơi.
Anh có thể giúp em thử như sau, nếu lần đầu tiên anh mở lên mà chạy được, thì anh thoát file, và mở đi mở lại và thử chạy cho em 5 lần coi có phải nó cà giựt lúc có dữ liệu lúc không không ạ.
 

File đính kèm

  • Cutting_F6_24tamon.xlsb
    90.2 KB · Đọc: 1
Lần chỉnh sửa cuối:
Upvote 0
Bạn @zzzsxxx01 mở thử trên máy bạn 5 lần chạy coi có bị như mình không .
Nhờ các anh Test dùm em ạ.
 
Upvote 0
Giờ mở chạy thử thì lại được các anh ạ.
file không ổn định.
 
Upvote 0
Có 2 cách:
Một là Enter 2 lần như trên nói: Enter lần 1 tại SL ghi 1 record vào Listbox2, enter lần 2 tại Listbox2 thì set focus. Nếu không enter lần 2 thì Alt X, cuối sub lưu Listbox2 xuống sheet thì thêm Setfocus.
Hai là vĩnh biệt alt X. Enter 3 lần: Lần 1 tại tại SL ghi 1 record vào Listbox2, enter lần 2 tại Listbox2 thì setfocus cho nút nhấn Lưu, enter lần 3 tại nút nhấn thì ghi xuống sheet.
Mọi sự không nên cưỡng cầu.
 
Upvote 0
Form Nó dở chứng thầy @ptm0412 ơi, lúc chạy được lúc không chạy đươc.
Lỗi nó như sau: gõ ngày vào Tb_Ngay->tab->hiên Cb_Machine->chọn trong Cb_Machine->goc số vào Tb_Track->tab->tơi Cb_Job thì nó xổ ra 1 dong trắng, mà Cb_Job trắng thì Cb_RQ, Cb_Code cũng trắng.
Nói chung Fỏm chạy không ơn định Thầy Mỹ ơi.
Bài đã được tự động gộp:

Lỗi đây Thầy Mỹ ơi.loipoi.png
 
Lần chỉnh sửa cuối:
Upvote 0
Xóa Listbox2 vẽ lại. Hiện tại Listbox bị hư không focus được, click không ăn, bàn phím không ăn.
Nhớ vẽ lại phải kiểm tra tab index liền kề txtSL
Dùng cách 1 ở bài 44:
từ txt ngày, tab để di chuyển, mũi tên lên xuống để chọn nếu là combobox, điền SL xong nhấn tab (ghi list), nhấn tiếp enter (listbox đang focus) sẽ chuyển focus sang cb_machine, nhập liệu tiếp
Được 2, 3 record thì thay vì nhấn enter tại listbox, nhấn alt X để lưu


File dưới đây tôi sửa duy nhất 1 việc sao cho phím tắt hoạt động mà không lỗi "trắng xóa". Còn những code còn lại tôi vẫn thấy ghét nên không đụng vào.
Còn ít nhất 1 chuyện thấy ghét, đó là khi gõ text vào txt SL, báo lỗi mà phải click chuột vào ô để sửa. Lẽ ra phải sử dụng sự kiện BeforeUpdate để cancel text, bắt gõ lại. Cái này khi tôi test bị lỗi nên đã sửa.
 

File đính kèm

  • Cutting_F6_24.xlsb
    92.2 KB · Đọc: 6
Lần chỉnh sửa cuối:
Upvote 0
Em có 1 Form nhập liệu, khi nạp dữ liệu đầy đủ vào Listbox2 (trong phần Cutting) nhấn Alt+X thì nạp dữ liệu vào Sheet!Cat.
Ví dụ như sau:
Gõ ngày 12/1 vào Date->Gas vào Machine->01235 vào Track No->2222 vào Job->18 vào RQ No-> 1015120 vào Code->gõ 2 vào Q'Ty nhấn Enter thì dữ liệu đập vào ListBox2, và lúc nhấn phím tắt Alt+X thì lại nhảy lên Cb_Machine. Em nghĩ có thể do lúc đó Cb_Machine setfocus, nhưng nếu vậy thì lại ở ListBox1 lại không sao. Em xin đưa hình minh họa và file.
Mở Form: Ctrl+q.
Code trong file có sự giúp đỡ của anh @HieuCD , mong các anh giúp đỡ cho Form chạy mượt.View attachment 298445
Một số code mình viết nhưng hình như không phải cho file và form nầy
Xây dựng form, đầu tiên phải mô tả chi tiết quy trình nhập liệu và xử lý thể hiện mối quan hệ giữa các thành phần trong form, lúc đó mới viết code chạy tạm ổn được
 
Upvote 0
Dạ code của anh Hiếu là làm dùm cho 3 combobox phụ thuộc, rồi em ghép vào Form của em ạ. Xin lỗi anh Hiếu.
Form của thầy Mỹ cũng có vấn đề ạ, khi em xóa Form của em đi, em chép Form của thầy vào cũng bị trắng combobox ạ.
Thôi nhập liệu trên sheet luôn cho nó lành ạ.
 
Upvote 0
Form của thầy Mỹ cũng có vấn đề ạ, khi em xóa Form của em đi, em chép Form của thầy vào cũng bị trắng combobox ạ.
Nếu chạy trên file của tôi thì có lỗi không? Kết luận là tại form hay tại file? Nếu không kết luận được thì đúng là "nhập liệu trên sheet luôn cho nó lành"
 
Upvote 0
Chạy trên file của thầy Mỹ cũng lỗi thầy ơi.
Bó tay.
Nhập trên sheet thôi.
 
Upvote 0
Bạn có thể nói gọn mong muốn ở cái Form đó không?
 
Upvote 0
Upvote 0
@ptm0412 em có đem file thầy lên máy cty chạy thử rồi ạ. Cũng bị lỗi combobox rỗng thầy ơi.
 
Upvote 0
Có bị luôn thầy ơi, lúc đó em chỉ chú tâm vào việc nhấn Alt+X mà không được nên em chỉ hỏi vấn đè đó, mà em thấy ngộ, chỉ chạy đôi ba lần xong thoát ra mai làm tiếp thì lại bị, nói chung file không ổn định, em có sợ đụng với code làm ẩn caption Form, em bỏ code đó đi và làm hẳn Form mới không có phần của Frame1, mà vẫn bị
Bài đã được tự động gộp:

File làm mới, không có code làm ẩn caption form, vẫn bị combobox rỗng20240118_134127.jpg
 
Upvote 0
Zời ơi. Cây đã có hoa, sắp ra quả rồi.

Đánh giá sơ bộ thì form cũng đẹp, về nước sơn thì ngon, giờ chỉ cần chọn loại gỗ nữa là ngon lành.

Thế mà lại đi cắt bớt form.

Đã lựa chọn nhập form thì phải sống chết với nó, ít nhất phải 1 tuần không ra gì thì bỏ, đây mới có ít ngày. Người ta có câu: "muộn còn hơn không" chứ có phải "sớm còn hơn không" đâu.
 
Upvote 0
Anh @cantl "giải thoát" cho em với.
Giải thoát theo cách của tớ thì nó khác lắm, nó phải buông bỏ hết mọi thứ kể cả form.

Còn thay vì sửa form thì nêu ra cái mong muốn thì dễ đồng cảm hơn. Thực tế là mới tinh nó vẫn nhanh gọn lẹ hơn là sửa cũ.

Nguyên tắc là không được nêu đích danh 1 người:
1 là người khác sẽ lướt qua và xem nhau như 1 ga nhỏ dọc đường.
2 là người nêu đích danh nhiều khi đếch biết làm.

Tớ mò thử mà chả hiểu thế quái nào nó lại khác.

1705567476348.png



"Giải thoát" là "Đi về nơi xa" không phải cùng Đan Trường mà là nhặt "Cát bụi" với Khánh Ly.




1705567504742.png
 
Upvote 0
Hãy là "Cát Bụi Cuộc Đời" đi anh @cantl.
"Cuộc đời là bao hãy mến thương nhau với bằng tất cả con tim để rồi một mai ta lìa xa nhân thế không lo lắng ưu buồn"
 
Upvote 0
Hãy là "Cát Bụi Cuộc Đời" đi anh @cantl.
"Cuộc đời là bao hãy mến thương nhau với bằng tất cả con tim để rồi một mai ta lìa xa nhân thế không lo lắng ưu buồn"
Là cát bụi được thì ngon, đấy là xá lợi rồi còn gì.

Còn đến lúc lìa xa thì lúc đấy mải xin Diêm Vương nhẹ tay, không vứt vào chảo dầu nên không có thời gian lo lắng ưu buồn đâu.

Giờ quay lại form, không buông bỏ được thì chiến đấu tiếp đi, kết quả râu ông cằm bà đến đâu rồi chốt hạ cho cái form đẹp đẹp để anh em tải về cắm thêm.

Phong cách code râu này của bạn rất giống tớ. --=0 --=0 --=0
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom