Có thể lấy một đối tượng chuỗi .Net trong VBScript không?

Question

Trong VBScript, bạn có thể sử dụng các lớp .net nhất định bằng cách sử dụng tự động hóa COM. Điều này có ích khi bạn muốn sử dụng mảng động, danh sách, hàng đợi, vv

Sẽ tốt hơn nếu tôi có thể sử dụng chuỗi làm đối tượng, vì vậy tôi có thể làm all fancy string stuff với nó, nhưng bất cứ khi nào tôi chuyển chuỗi từ một đối tượng khác , nó được xem bởi VBScript như một chuỗi chữ và không phải là một đối tượng chuỗi:

Set s = CreateObject("System.Text.StringBuilder") 
s.Append_3 "I love deadlines. I like the whooshing sound they make as they fly by." 

' This gives me the literal string 
MsgBox s.ToString 
text = s.ToString 

' But unfortunately this won't work 
MsgBox s.ToString.Length 
Set stringRef = s.ToString 

Ngoài việc tạo ra một chuỗi như một đối tượng COM sẽ không làm việc:

Set s = CreateObject("System.String")  ' Nope. 

có ai đó đã làm quản lý điều này, hoặc đang có những suy nghĩ khác về nó?

Answer 1

Bạn có thể sử dụng một số phương pháp và thuộc tính, không phải tất cả chúng. Các công trình sau đây, nhưng từ thời điểm bạn sử dụng toString bạn có một biến VBScript hoạt động như vậy.

Set s = CreateObject("System.Text.StringBuilder") 
s.Append_3 "I love deadlines. I like the whooshing sound they make as they fly by." 
s.Append_3 "and the rest." 
wscript.echo s.Length 
wscript.echo s.Capacity 
wscript.echo chr(s.chars(0)) 
wscript.echo s.Replace("t", "d").Replace("l", "k").toString 

cho

83 
140 
I 
I kove deadkines. I kike dhe whooshing sound dhey make as dhey fky by.and dhe resd. 

Nhưng ví dụ sau đây không làm việc, mặc dù nó là một phương pháp StringBuilder http://msdn.microsoft.com/en-us/library/system.text.stringbuilder_methods.aspx đừng hỏi tôi tại sao

s.Insert 1, "insert this" 

và

s.Insert_2 7, "insert this" 

không hoạt động

Tôi cũng lập trình trong Ruby nơi bạn có thể sử dụng các đối tượng này và cũng có hành vi tương tự. Đối với một số đối tượng tôi có thể liệt kê các thuộc tính hoặc các phương pháp như ví dụ cho Excel

require 'win32ole' 
excel = WIN32OLE.new('Excel.Application') 
properties = excel.ole_get_methods 
properties.each do |property| 
    p property.to_s 
end 

đưa ra một danh sách rất dài như

"Application" 
"Creator" 
"Parent" 
"ActiveCell" 
"ActiveChart" 
"ActiveDialog" 
"ActiveMenuBar" 
"ActivePrinter" 
"ActiveSheet" 
"ActiveWindow" 
"ActiveWorkbook" 
etc etc 

Nhưng không phải như vậy vì System.Text.StringBuilder, tôi cho rằng đó là do cách lập trình cho thấy phương pháp và thuộc tính của anh ta ở bên ngoài.

Đáng buồn thay, tôi không nghĩ rằng có thể trực tiếp sử dụng System.String trong vbscript.

Answer 2

Bạn đã thử. Msgbox len (s.ToString) hoặc chỉ đơn giản là MsgBox (s.Length)

Hoặc bạn có thể tạo lớp .Net của riêng bạn và hiển thị nó với com, hoạt động như một trình bao bọc cho các hàm chuỗi tĩnh bạn muốn trưng ra ...