VBA - Thêm điều khiển động vào Dạng người dùng

Để tạo hỗ trợ cho bản demo này, chúng tôi đã sử dụng ví dụ máy tính, nhưng lần này tạo ra tất cả các điều khiển một cách linh hoạt.

Khi bạn tạo điều khiển động trên Biểu mẫu người dùng, Excel sẽ không nhận ra tên của các điều khiển. Điều này có nghĩa là các sự kiện được tạo bởi các điều khiển của bạn và các thuộc tính của chúng sẽ không thể truy cập được thông qua các tên được gán. Ví dụ: khi bạn tạo một nút có mã sau:

Đặt Bouton = Me.Controls.Add ("Forms.CommandButton.1", "Bt" & i, True)

Tên của nút sẽ là (trong trường hợp i = 1) BT1

Nhưng sự kiện Private Sub BT1_Click () sẽ không bao giờ được tạo. Để xử lý vấn đề đó, bạn đã sử dụng một bộ sưu tập các đối tượng cho các thuộc tính và bộ sưu tập các lớp cho các sự kiện. Bộ sưu tập các đối tượng không chỉ chứa điều khiển mà còn là chìa khóa để tham chiếu nó. Bằng cách định cấu hình thuộc tính Tag của các điều khiển với chỉ mục mong muốn, tập hợp lớp có thể trả về một chỉ mục cũng cho phép bạn biết điều khiển nào là chủ đề của sự kiện này.

Không có sự kiểm soát nào trong thiết kế của UserForm. Tất cả các điều khiển được tự động tạo ra máy tính, bao gồm cả Container Container. Bản demo cũng cung cấp một cách để kết hợp các nút trong khung