Pytanie : VB Pismo pomoc potrzebować!


      
            

      
      
      

            
      
      



The błąd kod dawać błąd. Móc ty dylemat the praca program i ono praca?

Dzięki

Odpowiedź : VB Pismo pomoc potrzebować!

Próbować to.

~bp
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:

Okręt podwodny MethExecute ()
 
   Ciemnawy objRegEx, objMatch, strString, strDisplayMsg
 
   Ustalony objRegEx = CreateObject ("VBScript.RegExp")
   objRegEx.Pattern = "niedźwiedź"
   objRegEx.Global = Prawdziwy
   objRegEx.IgnoreCase = Prawdziwy            
 
   strString = "Niedźwiedź na czas tam  być trzy mały Niedźwiedź. Tam  być mama Niedźwiadkowy, tata Niedźwiedź i dziecko niedźwiedź"
 
   strDisplayMsg = ""
 
   Dla ObjRegEx.Execute objMatch w objRegEx.Execute (strString)
      strDisplayMsg = strDisplayMsg & "Przykład" + objMatch.Value & "zakładać przy pozycja" & CStr (CInt (objMatch.FirstIndex) + 1) & VbCrlf
   Następnie
 
   MsgBox (strDisplayMsg)      
   
Końcówka Okręt podwodny
Inne rozwiązania  
 
programming4us programming4us