comment substring texte dans vbscript

Question

J'utilise VBScript

J'ai ci-dessous le texte

str = "tcm:1-245-9" 

Maintenant, je veux sous-chaîne ci-dessus chaîne de telle manière, de sorte que je reçois la sortie comme ci-dessous

pstr = "245" de la chaîne ci-dessus,

S'il vous plaît laissez-moi des suggestions en VBScript seulement.

Merci.

Answer 1

Si le format de la chaîne sera toujours comme ça:

segments = Split(str,"-") 
pstr = segments(1) 

Answer 2

Vous pouvez utiliser

Mid(string,start[,length]) 

string - Required. The string expression from which characters are returned 

start - Required. Specifies the starting position. If set to greater than the number of characters in string, it returns an empty string ("") 

length - Optional. The number of characters to return 

ou utiliser

Split(expression[,delimiter[,count[,compare]]]) 

expression - Required. A string expression that contains substrings and delimiters 

delimiter - Optional. A string character used to identify substring limits. Default is the space character 

count  - Optional. The number of substrings to be returned. -1 indicates that all substrings are returned 

compare - Optional. Specifies the string comparison to use. 

      Can have one of the following values: 
       * 0 = vbBinaryCompare - Perform a binary comparison 
       * 1 = vbTextCompare - Perform a textual comparison