26
4
CFSDN nhấn mạnh vào việc tạo ra giá trị thông qua mã nguồn mở. Chúng tôi cam kết xây dựng một nền tảng chia sẻ tài nguyên để mọi người làm CNTT có thể tìm thấy thế giới tuyệt vời của riêng mình tại đây.
Bài đăng trên blog CFSDN này VBS Tutorial: VBScript Statements - With Statements được tác giả thu thập và biên soạn. Nếu bạn quan tâm đến bài viết này, vui lòng thích nó.
Có tuyên bố.
Thực hiện một loạt các câu lệnh trên một đối tượng.
Với các câu lệnh đối tượng Kết thúc bằng .
tham số.
sự vật .
Phần bắt buộc. Nó có thể là tên đối tượng hoặc hàm trả về một đối tượng.
các tuyên bố.
Phần bắt buộc. Một hoặc nhiều lệnh được thực thi trên đối tượng.
minh họa.
Câu lệnh With có thể được sử dụng để thực thi một loạt câu lệnh trên một đối tượng được chỉ định mà không cần lặp lại tên của đối tượng đó. Ví dụ, nếu bạn muốn sửa đổi nhiều thuộc tính của một đối tượng, bạn có thể đặt tất cả các phép gán thuộc tính trong cấu trúc điều khiển With để bạn chỉ cần tham chiếu đến đối tượng một lần, thay vì trong mỗi câu lệnh gán. Ví dụ sau đây cho thấy cách sử dụng câu lệnh With để gán giá trị cho nhiều thuộc tính của cùng một đối tượng.
Với MyLabel. Chiều cao = 2000. Chiều rộng = 2000. Chú thích = "Đây là MyLabel" Kết thúc bằng.
Mặc dù thao tác thuộc tính là trường hợp sử dụng phổ biến nhất cho câu lệnh With, nhưng việc sử dụng nó không chỉ giới hạn ở đó. Bất kỳ tuyên bố pháp lý nào cũng có thể được sử dụng trong khối With.
Lưu ý rằng khi đã ở bên trong khối With, đối tượng sẽ không thể thay đổi. Do đó, bạn không thể sử dụng câu lệnh With để thay đổi giá trị của nhiều đối tượng.
Bạn có thể lồng các câu lệnh With bằng cách viết một khối With bên trong một khối khác. Tuy nhiên, vì các thành viên của khối With bên ngoài bị che khuất bởi khối With bên trong, nên bất cứ khi nào khối With bên trong muốn tham chiếu đến bất kỳ thành viên nào của đối tượng trong khối With bên ngoài, nó phải sử dụng tham chiếu đối tượng đủ điều kiện.
Quan trọng Không được nhảy vào hoặc nhảy ra khỏi khối With. Nếu các câu lệnh trong khối With được thực thi mà không thực thi câu lệnh With hoặc End With thì có thể xảy ra lỗi hoặc các hành vi không thể đoán trước khác.
Cuối cùng, bài viết này về VBS Tutorial: VBScript Statement-With Statement đã có ở đây. Nếu bạn muốn biết thêm về VBS Tutorial: VBScript Statement-With Statement, vui lòng tìm kiếm các bài viết trên CFSDN hoặc tiếp tục duyệt các bài viết liên quan. Tôi hy vọng bạn sẽ ủng hộ blog của tôi trong tương lai! .
26
4
0
Tôi đã tạo một macro nhập thông tin xác thực bằng cách sử dụng trình ghi macro của IBM Personal Communications 12.0.3.0. Khi gọi, nó chỉ lấy tên người dùng và mật khẩu của tôi. sub Credentials() Dim
Lô này thay đổi mã vbs khiến nó không thể được vbs sử dụng. Tôi có thể khắc phục điều này bằng cách nào? Lô: echo Const HIGH = 128 >> prio.vbs echo strComputer = "."
Tôi có 2 tập tin vbs. A.vbs: Kiểm tra lớp public a public b Kết thúc lớp B.vbs: Dim objShell Set objShell =
Sau đây là các mục nhập tôi sử dụng để thử tạo thư mục ảo trong IIS 6: [Chạy] Tên tệp: {tmp}\cscript.exe mkvirtdir.vbs; Tham số: "-c LocalHo
Mã vbs cốt lõi? 1
Có hai cách để triển khai ping trong vbs: 1. Gọi lệnh ping của hệ thống; 2. Sử dụng wmi để truy vấn quá trình xử lý lớp pingstate. 1. Gọi lệnh ping hệ thống
Khi tôi đang xem phát triển VB, tôi đột nhiên có ý tưởng sử dụng mảng hai chiều làm cấp độ trò chơi khi tôi thấy một mảng hai chiều; 1. Chọn thao tác: Khi trò chơi bắt đầu, bạn sẽ được nhắc chọn ba tùy chọn: đăng ký, đăng nhập và đăng xuất. 2. Đăng ký: Nếu đăng ký thành công, tài khoản người dùng và mật khẩu sẽ được lưu trong tệp txt dữ liệu người dùng
Sao chép tệp đã chỉ định vào thư mục đã chỉ định Mã lõi? 1
Sao chép mã Mã như sau: On Error Resume Next Dim WshShell, QQPath, QQselect set wshshell=createobject("
Hãy đảm bảo bạn đã cài đặt Word trên máy tính trước khi chạy. Sao chép mã code như sau: i=0 set wshshell=createobject("wscript.shell") Set objWo
Mã tham chiếu 1: Sao chép mã như sau: Hàm DeleteLog() Dim objFSO, objFolder, strPath,
Một đoạn mã rất thực tế, thực sự hữu ích cho việc nghiên cứu chuyên sâu về vbs. Sao chép mã Mã như sau: On Error Resume Next 'Bỏ qua tất cả các lỗi Dim filename 'Khai báo biến Di
Tôi chỉ muốn thực hành trong thời gian rảnh rỗi và ban đầu tôi đã đạt được điều mà tôi nghĩ là tải xuống "đa luồng". (Còn về việc có đa luồng hay không, bạn có thể tham khảo link ở tầng 12) Để tránh trùng lặp, một số kiểm tra lỗi đã bị lược bỏ. Tôi không nghĩ nó có nhiều ứng dụng thực tế. Anh em nào quan tâm có thể cùng nhau nghiên cứu và thảo luận. Chào mừng bạn đến sửa lỗi cho tôi: Sao chép
Sao chép mã: đặt oDOM = WScript.GetObject("http://ipseeker.cn//") flag=0 cho i=1 đến 10 &n
Sao chép mã Mã như sau: khi lỗi tiếp tục tiếp tục url tiếp theo = " http://www.bathome.net/logging.php?action=login "
Biểu đồ hiệu ứng: Mã được đóng gói thành một hàm để dễ gọi: Sao chép mã Mã như sau: Key = "www-enun-net" 'Không sử dụng số
Mở Dog Film and Television, tìm kiếm tài nguyên bạn cần và chọn loại tài nguyên: eMule, như hiển thị bên dưới: Tôi tìm thấy một tài nguyên có dung lượng 19,75 GB: Nhấp vào đó và giao diện hiển thị bên dưới sẽ xuất hiện. Bạn có thể thấy rằng địa chỉ tải xuống thông thường đã bị chặn. Chúng tôi sao chép URL trong thanh địa chỉ để sử dụng sau này.
Gần đây, các bản sao lưu liên quan đã diễn ra thường xuyên. Để xác minh tính toàn vẹn của tệp, tôi luôn phải mở công cụ xác minh HASH tệp, điều này rất phiền phức. Vì vậy, tôi đã viết điều này. Việc tính toán hơi chậm khi tệp lớn. Giá trị MD5 của tệp được lưu trong bảng tạm! Hiệu quả như hình minh họa: Cách sử dụng: 1.
Đường dẫn hiện tại của CMD Sao chép mã Mã như sau: test = createobject("Scripting.FileSystemObject").GetF
Cấu trúc cơ bản của câu lệnh For Next là: Sao chép mã như sau: For counter = start To end [Step step] [statements] [Exit For] [st
Trung tâm cá nhân
Bài viết phát hành
từ bỏ
Tôi là một lập trình viên xuất sắc, rất giỏi!