‘ this code assumes that you have used this Imports statement’ Imports Microsoft.Win32Function IsExcelInstalled() As Boolean ‘ Define the RegistryKey objects for the registry hives. Dim regClasses As RegistryKey =
‘ Extract the name of the SoapException’s (the type of exception thrown by a ‘ web service) “inner” exception.” Example:’ Try’ ‘ this call throws an exception’ Dim service As
‘ Execute a batch of OleDb commands.’ Parameters:’ – The list of statements separated by ; chars. Use the ? char as a ‘ placeholder for a parameter.’ – The
‘ Search the specified string, with the case-sensitive mode or not’ Returns the index of the first occurrence found, or -1 if not foundPublic Function SearchString(ByVal source As String, ByVal
‘ Reverse the input string, without using the StrRever function in the VB6 ‘ compatibility assemblyFunction ReverseString(ByVal source As String) As String Dim chars() As Char = source.ToCharArray() Array.Reverse(chars) Return
‘ this code assumes that you have used this Imports statement’ Imports Microsoft.Win32Function IsWordInstalled() As Boolean ‘ Define the RegistryKey objects for the registry hives. Dim regClasses As RegistryKey =
‘ Count the number of string occurrencesPublic Function CountOccurrences(ByVal source As String, ByVal search As String, _ Optional ByVal ignoreCase As Boolean = False) As Integer Dim options As System.Text.RegularExpressions.RegexOptions
‘ Return the number of checked nodes in the specified treePublic Function CountCheckedNodes(ByVal rootNode As TreeNode) As Integer Dim count As Integer = 0 ‘ count the root node, if