Progress Monitor for IdealProgrammer.com

Take Swift, Intelligent, Massive, Planned, Loving, Effective (S.I.M.P.L.E.) Action to Transform Self into Ideal

Skip Repetitive Navigational Links

Home

News

Presenters

Contact

Please login

StrComp() Example Syntax VB.NET ASP.NET - StrComp() - Source Code

Description: Illustrates using StrComp with Source Code Syntax Example in VB.NET ASP.NET.

Example Webform Code:

< %@ Page Language="VB" AutoEventWireup="false" CodeFile="StrComp.aspx.vb" Inherits="StrComp" %>
 
< !DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
        <h1><asp:label ID="Label1" runat="server" Text="Label"></asp:label> </h1>
         <asp:textbox ID="TextBox1" runat="server"></asp:textbox><br />
         <asp:textbox ID="TextBox2" runat="server"></asp:textbox><br />
         <asp:textbox ID="TextBox3" runat="server"></asp:textbox>
 
 
    </div>
    </form>
</body>
</html>

Example Code Behind:

Imports System
Imports System.IO
Imports System.Data
 
' This example is from http://idealprogrammer.com
' It shows how you can use StrComp syntax in VB.NET ASP.NET
 
'****************************************************************************************
' Example #1: 	StrComp(string1,string2,comparemethod) - returns integer
' Returns -1, 0, or 1, based on the result of a string comparison. 
' -1  String1 sorts ahead of String2
'  0  String1 is equal to String2
'  1  String1 sorts after String2
' comparemethod - Optional. Specifies the type of string comparison. If Compare is omitted, 
' the Option Compare setting determines the compare method 
'****************************************************************************************
 
 
Partial Class StrComp
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 
        Label1.Text = "Example #1: 	StrComp(string1,string2,comparemethod)"
 
        Dim strString1 As String = "XYZ"
        Dim strString2 As String = "xyz"
 
        TextBox1.Text = Microsoft.VisualBasic.StrComp(strString1, strString2, CompareMethod.Text).ToString 'Returns 0
        TextBox2.Text = Microsoft.VisualBasic.StrComp(strString1, strString2, CompareMethod.Binary).ToString 'Returns -1
        strString2 = "ABC"
        TextBox3.Text = Microsoft.VisualBasic.StrComp(strString1, strString2).ToString 'Returns 1
 
 
 
 
    End Sub
End Class

Example Connection String: