VBA - InputBox

Các InputBox functionnhắc người dùng nhập giá trị. Sau khi nhập các giá trị, nếu người dùng nhấp vào nút OK hoặc nhấn ENTER trên bàn phím, chức năng InputBox sẽ trả về văn bản trong hộp văn bản. Nếu người dùng nhấp vào nút Hủy, hàm sẽ trả về một chuỗi trống ("").

Cú pháp

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])

Mô tả về Thông Số

  • Prompt- Một tham số bắt buộc. Chuỗi được hiển thị dưới dạng thông báo trong hộp thoại. Độ dài tối đa của lời nhắc là khoảng 1024 ký tự. Nếu thông báo kéo dài hơn một dòng, thì các dòng có thể được phân tách bằng ký tự xuống dòng (Chr (13)) hoặc ký tự dòng (Chr (10)) giữa mỗi dòng.

  • Title- Một tham số tùy chọn. Biểu thức chuỗi hiển thị trong thanh tiêu đề của hộp thoại. Nếu tiêu đề bị bỏ trống, tên ứng dụng sẽ được đặt trên thanh tiêu đề.

  • Default- Một tham số tùy chọn. Văn bản mặc định trong hộp văn bản mà người dùng muốn được hiển thị.

  • XPos- Một tham số tùy chọn. Vị trí củaXtrục đại diện cho khoảng cách lời nhắc từ phía bên trái của màn hình theo chiều ngang. Nếu để trống, hộp nhập liệu được căn giữa theo chiều ngang.

  • YPos- Một tham số tùy chọn. Vị trí củaYtrục biểu thị khoảng cách lời nhắc từ phía bên trái của màn hình theo chiều dọc. Nếu để trống, hộp nhập sẽ được căn giữa theo chiều dọc.

  • Helpfile- Một tham số tùy chọn. Biểu thức Chuỗi xác định tệp trợ giúp được sử dụng để cung cấp Trợ giúp theo ngữ cảnh cho hộp thoại.

  • context- Một tham số tùy chọn. Biểu thức số xác định số ngữ cảnh Trợ giúp được tác giả Trợ giúp chỉ định cho chủ đề Trợ giúp thích hợp. Nếu ngữ cảnh được cung cấp, thì hồ sơ trợ giúp cũng phải được cung cấp.

Thí dụ

Hãy để chúng tôi tính diện tích của một hình chữ nhật bằng cách nhận các giá trị từ người dùng tại thời điểm chạy với sự trợ giúp của hai hộp nhập liệu (một cho chiều dài và một cho chiều rộng).

Function findArea() 
   Dim Length As Double 
   Dim Width As Double 
   
   Length = InputBox("Enter Length ", "Enter a Number") 
   Width = InputBox("Enter Width", "Enter a Number") 
   findArea = Length * Width 
End Function

Đầu ra

Step 1 - Để thực hiện tương tự, hãy gọi bằng tên hàm và nhấn Enter như trong ảnh chụp màn hình sau.

Step 2- Khi thực hiện, hộp nhập đầu tiên (độ dài) được hiển thị. Nhập một giá trị vào hộp nhập liệu.

Step 3 - Sau khi nhập giá trị đầu tiên, ô nhập thứ hai (chiều rộng) được hiển thị.

Step 4- Khi nhập số thứ hai, nhấp vào nút OK. Khu vực được hiển thị như trong ảnh chụp màn hình sau.