ASP.Net/Mobile Control/List

Add hyperlink item to mobile list (VB.net)

   <source lang="csharp">

<%@ Page

   Inherits="System.Web.UI.MobileControls.MobilePage" 
   Language="VB" 

%> <%@ Register

   TagPrefix="mobile" 
   Namespace="System.Web.UI.MobileControls" 
   Assembly="System.Web.Mobile" 

%> <script runat="server" language="VB"> </script> <mobile:form

   id="StartForm" 
   runat="server">

<mobile:list

   runat="server" 
   id="list1"
   decoration="Numbered"
   itemsaslinks="True"

>

   <item 
       value="http://www.nfex.ru"
       text="nfex"
   />
   <item 
       value="http://www.yahoo.ru"
       text="Yahoo"
   />
   <item 
       value="http://www.microsoft.ru"
       text="Microsoft"
   />

</mobile:list> </mobile:form>

      </source>
   
  

Add items to mobile List in code (VB.net)

   <source lang="csharp">

<%@ Page

   Inherits="System.Web.UI.MobileControls.MobilePage" 
   Language="VB" 

%> <%@ Register

   TagPrefix="mobile" 
   Namespace="System.Web.UI.MobileControls" 
   Assembly="System.Web.Mobile" 

%> <script runat="server" language="VB"> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)

   Dim MyItem1 as New MobileListItem
   Dim MyItem2 as New MobileListItem
   Dim MyItem3 as New MobileListItem
   MyItem1.Text = "A"
   MyItem2.Text = "B"
   MyItem3.Text = "C"
   List1.Items.Add(MyItem1)
   List1.Items.Add(MyItem2)
   List1.Items.Add(MyItem3)

End Sub </script> <mobile:form

   id="StartForm" 
   runat="server">

<mobile:list

   runat="server" 
   id="List1"

/> </mobile:form>

      </source>
   
  

Assign values to mobile list (VB.net)

   <source lang="csharp">

<%@ Page

   Inherits="System.Web.UI.MobileControls.MobilePage" 
   Language="VB" 

%> <%@ Register

   TagPrefix="mobile" 
   Namespace="System.Web.UI.MobileControls" 
   Assembly="System.Web.Mobile" 

%> <script runat="server" language="VB"> </script> <mobile:form

   id="StartForm" 
   runat="server">

<mobile:list

   runat="server" 
   id="list1"
   decoration="bulleted"
   forecolor="red"

>

   <item value="A"/>
   <item value="B"/>
   <item value="C"/>
   <item value="D"/>

</mobile:list> </mobile:form>

      </source>
   
  

mobile list decoration: bulleted (VB.net)

   <source lang="csharp">

<%@ Page

   Inherits="System.Web.UI.MobileControls.MobilePage" 
   Language="VB" 

%> <%@ Register

   TagPrefix="mobile" 
   Namespace="System.Web.UI.MobileControls" 
   Assembly="System.Web.Mobile" 

%> <script runat="server" language="VB"> </script> <mobile:form

   id="StartForm" 
   runat="server">

<mobile:list

   runat="server" 
   id="list1"
   decoration="bulleted"
   forecolor="red"

>

   <item value="A"/>
   <item value="B"/>
   <item value="C"/>
   <item value="D"/>

</mobile:list> </mobile:form>

      </source>
   
  

Remove value from mobile list (VB.net)

   <source lang="csharp">

<%@ Page

   Inherits="System.Web.UI.MobileControls.MobilePage" 
   Language="VB" 

%> <%@ Register

   TagPrefix="mobile" 
   Namespace="System.Web.UI.MobileControls" 
   Assembly="System.Web.Mobile" 

%> <script runat="server" language="VB"> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)

   If Not IsPostBack Then
       Dim MyItem1 as New MobileListItem
       Dim MyItem2 as New MobileListItem
       Dim MyItem3 as New MobileListItem
       MyItem1.Text = "A"
       MyItem2.Text = "B"
       MyItem3.Text = "C"
       List1.Items.Add(MyItem1)
       List1.Items.Add(MyItem2)
       List1.Items.Add(MyItem3)
   End If

End Sub Sub OK_OnSubmit(Sender As Object, E As EventArgs)

   List1.Items.Remove(txtitem.Text)

End Sub </script> <mobile:form

   id="StartForm" 
   runat="server">

<mobile:list

   runat="server" 
   id="List1"

/> <mobile:label

   runat="server" 
   id="lbl1"
   Text="Item to remove:" 

/> <mobile:textbox

   runat="server" 
   id="txtItem"

/> <mobile:Command

   runat="server" 
   id="cmdOK"
   OnClick="OK_OnSubmit" 
   Text="OK" 

/> </mobile:form>

      </source>