How to create the case insensitive regular expressions in QTP?

Many times we need to find the string in given file and we are not worried about the upper case or lower case. In such scenarios we can create case insensitive regular expressions in QTP.

Case Sensitive Search
'**********************************************
'With IgnoreCase = false
'**********************************************
  Set regExpObject = New RegExp  
  search_string = "Arjun tendulkar is the son of sachin tendulkar"
  regExpObject.Pattern = "Tendulkar"

  regExpObject.IgnoreCase = false

  set matches = regExpObject.execute(search_string)

   print matches.count
'**********************************************
'output is 0
'**********************************************

Case Insensitive Search
'**********************************************
'With IgnoreCase = true
'**********************************************
  Set regExpObject = New RegExp  
  search_string = "Arjun tendulkar is the son of sachin tendulkar"
  regExpObject.Pattern = "Tendulkar"

  regExpObject.IgnoreCase = true

  set matches = regExpObject.execute(search_string)

   print matches.count
'**********************************************
'output is 1
'**********************************************

You may also like below topics on regular expressions in QTP.

1. Regular Expressions in OR in QTP.
2. Regular Expressions in descriptive programming in QTP.
3. Regular expression evaluator in QTP.
4. Meta characters in regular expressions.
5. Case insensitive regular expressions in QTP.
6. Regexp object in QTP.
7. Global Property in Regular Expressions

Please give your inputs, suggestions, feedback to Us about above QTP topic. We value your thoughts.