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

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

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

Example Webform Code:

< %@ Page Language="VB" AutoEventWireup="false" CodeFile="StrDup.aspx.vb" Inherits="StrDup" %>
 
< !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 />
          <h1><asp:label ID="Label2" runat="server" Text="Label"></asp:label> </h1>
         <asp:textbox ID="TextBox2" runat="server"></asp:textbox><br />
          <h1><asp:label ID="Label3" runat="server" Text="Label"></asp:label> </h1>
         <asp:textbox ID="TextBox3" runat="server"></asp:textbox><br />
 
 
 
    </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 StrDup syntax in VB.NET ASP.NET
 
       '****************************************************************************************
' Overload #1: 	StrDup(Int32,Char) Returns a string or object consisting of the specified 
' character repeated the specified number of times.
' Overload #2: 	StrDup(Int32,Object) Returns a string or object consisting of the specified 
' character repeated the specified number of times.
' Overload #3: 	StrDup(Int32,String) Returns a string or object consisting of the specified 
' character repeated the specified number of times.
'****************************************************************************************
 
Partial Class StrDup
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 
        Label1.Text = "Overload #1: 	StrDup(Int32,Char) "
 
        TextBox1.Text = Microsoft.VisualBasic.StrDup(5, "a") 'Returns aaaaa
 
        Dim aObject As New Object
        aObject = "Object"
        Label2.Text = "Overload #2: 	StrDup(Int32,aObject) "
        TextBox2.Text = Microsoft.VisualBasic.StrDup(5, aObject) 'Returns OOOOO
 
        Dim aString As String = "String!"
        Label3.Text = "Overload #3: 	StrDup(Int32,aString) "
        TextBox3.Text = Microsoft.VisualBasic.StrDup(5, aString) 'Returns SSSSS
 
 
    End Sub
End Class

Example Connection String: