fork download
  1. Imports System
  2. Imports System.Text.RegularExpressions
  3.  
  4. Public Class Test
  5. Public Shared Sub Main()
  6. Dim input As String = "17. Specific heat of certain element is 0.064, its approximate atomic mass is" & vbCrLf &
  7. "1) 100 U 2) 10 U 3) 20 U 4) Both 2) and 3)"
  8. Dim regex As Regex = New Regex("(?<=\t)[1-4]\)")
  9. Dim result As String = regex.Replace(input, "#")
  10.  
  11. Console.WriteLine(result)
  12. End Sub
  13. End Class
Success #stdin #stdout 0.05s 19796KB
stdin
Standard input is empty
stdout
17.	 Specific heat of certain element is 0.064, its approximate atomic mass is
1) 100 U	# 10 U	# 20 U	#  Both  2) and 3)