Vấn đề Zoom control khi Maximized, Minimized, Normal trong form (1 người xem)

[Hoàng Trọng Nghĩa]

Xin vui lòng cho hỏi, khi Max hay Normal cửa sổ của Form, có code nào zoom các control trong form theo tỷ lệ có được không?
Tôi đã tìm mãi trên Google mà chưa thấy.
Xin cám ơn mọi sự hướng dẫn và giúp đỡ.

 

[doveandrose]

hiện tại có anh "Chim hồng" đang xem, mong anh giải giúp dùm

hôm nay CN các thành viên thường đi nhậu hoặc thư giãn bên gia đình , bạn cứ vào spam suốt ngày thì ai giải quyết ?
bạn làm ẩu mà không biết tự kiểm tra lấy thì chả ai muốn giúp

xem dòng này

With CmdGhi2
           .Top = MtpInsideHeight [COLOR=#ff0000][SIZE=6][B]=[/B][/SIZE][/COLOR] .Height - 6

tự sửa nhé

 

[DMQ]

Sao em làm theo cách của Anh Nghĩa thì zoom các control cân đối theo form, nhưng khi em gán code MultiPage_Change thì có sự khác biệt. Em xin đưa 2 file mong các AC xem giúp:
Với file MUltiPageNoChange thì rất Cân đối theo Form(ListBox1 và ListBox2 sát với các CommandButton)
Với file MultiPageChange thì khác, nếu mở lần đầu thì sát nhưng lần thứ 2, 3 thì không sát với CommandButton. (nếu mở Nhập-> Xuất -> Nhập -> xuất thì có sự khác biệt)

 

[DMQ]

File MultiPageNoChange thì chuẩn rồi, nhưng sao em gán sự kiện MultiPage1_Change vào(Flie MultiPageChange) để tạo list cho ComboBox thì có sự khác biệt(không chuẩn về vấn đề cân đối Form). Mong các AC chỉ giáo.

 

[lightd]

Tôi thử không thấy khác biệt gì, ở file change
tuy vậy nên quan tâm vào cốt lõi, thay vì trình bày kiểu chẳng ra sao thế này?

 

[DMQ]

Ở File Change, bạn mở Form thì hiện Page"Nhập", bạn sẻ thấy ListBox1 sát với các Nút "Sửa","Xóa" "Ghi vào Sheet", bạn nhấp chọn Page"Xuất" rồi quay lại chọn Page"Nhập" thì lúc này ListBox1 cách các nút "Sửa", "Xóa", "Ghi vào Sheet" một khoảng cở 8mm. Còn vấn đề trình bày, thì theo cá nhân mình rất thích cái đẹp, cân đối.

 

[lightd]

Ở File Change, bạn mở Form thì hiện Page"Nhập", bạn sẻ thấy ListBox1 sát với các Nút "Sửa","Xóa" "Ghi vào Sheet", bạn nhấp chọn Page"Xuất" rồi quay lại chọn Page"Nhập" thì lúc này ListBox1 cách các nút "Sửa", "Xóa", "Ghi vào Sheet" một khoảng cở 8mm. Còn vấn đề trình bày, thì theo cá nhân mình rất thích cái đẹp, cân đối.

Đẹp, tôi vẫn thấy xấu quá, và không tiện lợi chút nào.

Ah, còn nguyên nhân là do các list box ngay trên đó, List box luôn thay đổi chiều cao chút, đặc biệt khi có dòng dữ liệu trong nó --> bạn nên đặt nó vào 1 cái Frame, hay Panel nào đó thì sẽ khắc phục được.

 

[DMQ]

Mình thấy khi mở lại Page"Nhập" đâu có dòng dữ liệu nào đâu mà nó cũng thay đổi, bạn thấy Form mình xấu, thế bạn có thể chỉ cho mình làm cho nó đẹp hay đưa mẫu nào đẹp để mình học hỏi chăng!!!!

 

[lightd]

Mình thấy khi mở lại Page"Nhập" đâu có dòng dữ liệu nào đâu mà nó cũng thay đổi, bạn thấy Form mình xấu, thế bạn có thể chỉ cho mình làm cho nó đẹp hay đưa mẫu nào đẹp để mình học hỏi chăng!!!!

Không, vì với tôi đẹp, có khi bạn là xấu,

Chưa cần có dữ liệu listbox đã luôn tự đổi kích thước rồi, nên bạn cần chú ý chút hoặc cho vào frame như tôi nói, hoặc là bạn phải tự tính lại chiều cao cho nó hợp lý

 

[DMQ]

Ah, vậy tại sao ở File NoChange, có mở Page"Nhập" 3 lần nó cũng không thay đổi vậy bạn. Do Code MultiPage1_Change?????

 

[lightd]

Ah, vậy tại sao ở File NoChange, có mở Page"Nhập" 3 lần nó cũng không thay đổi vậy bạn. Do Code MultiPage1_Change?????

Vì bên dưới nó có gì đâu mà thay đổi,

Nên tốt nhất bạn cho các nút lên trên hết như ở page tồn đó, vừa đẹp vừa không lo bị thay đổi

 

[DMQ]

Bạn nói sao vậy. Hai File đó giống y chang nhau, chỉ có khác chổ file có code MultiPage1_Change và File không có thôi.

 

[lightd]

Bạn nói sao vậy. Hai File đó giống y chang nhau, chỉ có khác chổ file có code MultiPage1_Change và File không có thôi.

thế thì bạn bỏ thử MultiPage1_Change đi cũng được, vì change là có thay đổi nên nó tác động tới chiều cao list box, vì chiều cao list box tự bản thân nó cũng thay đổi chiều cao khi mỗi lần load rồi, nó phải tính lại cho phù hợp dữ liệu nên có sai số

 

[DMQ]

Thì File NoChange không có Code MultiPage1_Change, nó có thay đổi đâu.

 

[Hoàng Trọng Nghĩa]

Bạn nói sao vậy. Hai File đó giống y chang nhau, chỉ có khác chổ file có code MultiPage1_Change và File không có thôi.

Một cách để đảm bảo chiều cao của ListBox là bạn chọn trong thuộc tính của nó có mục IntergralHeight, hiện tại nó là True, nhưng nếu bạn đổi là False thì không bị thay đổi chiều cao của nó nữa.

Tuy nhiên, nó có thể sẽ bị khuất dòng cuối cùng. Để khắc phục điểm này, trong dữ liệu ta thêm 1 dòng rỗng ở dưới.

Tôi cũng nhắc nhở bạn lần cuối cùng là không được gửi bài hối thúc liên tục khi chưa có người giúp đỡ. Nếu như thế tôi tạm thời ban nick bạn trong 1 tuần lễ!

 

[lightd]

Thì File NoChange không có Code MultiPage1_Change, nó có thay đổi đâu.

Tôi không download file đó về, nên không biết, vì tôi sợ màu mè thiếu thực dụng. Nên chắc chờ người khác quan tâm trả lời bạn.