Сравнение текста текстового поля с текстом элементов списка в vb.NET - PullRequest
1 голос
/ 07 декабря 2010

как сравнить текстовое поле с текстом списка в vb.NET .... ПОМОГИТЕ

Ответы [ 3 ]

1 голос
/ 07 декабря 2010

я попробовал следующее в VB.net, оно работало нормально

страница aspx

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

</div>
<asp:ListBox ID="ListBox1" runat="server">
    <asp:ListItem>zero</asp:ListItem>
    <asp:ListItem>first</asp:ListItem>
    <asp:ListItem>second</asp:ListItem>
</asp:ListBox>
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
<asp:Button ID="Button1" runat="server" Text="Button" />
</form>

код позади

Partial Class _Default
Inherits System.Web.UI.Page

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
    For Each item In ListBox1.Items
        If item.ToString = TextBox1.Text Then
            Response.Write("matching " + item.ToString)
        End If
    Next
End Sub

Конечный класс

1 голос
/ 07 декабря 2010
Dim text As String = Me.TxtName.Text
For Each item As Object In Me.ListBox1.Items
    If item.ToString = text Then
        'Do something'
    Else
        'Do something else'
    End If
Next

Если вы используете пользовательские объекты в качестве источника данных вашего списка, переопределите ToString в классе, чтобы сравнить их с текстом вашего текстового поля. ListBox.ObjectCollection Class

Например:

Class FooClass
    Private _name As String

    Public Property Name() As String
        Get
            Return _name
        End Get
        Set(ByVal value As String)
            _name = value
        End Set
    End Property
    Public Overrides Function ToString() As String
        Return Me.Name
    End Function
End Class
0 голосов
/ 07 декабря 2010
Dim tempInt = lbTeams.Items.Count - 1
While (tempInt > -1)
    If (lbTeams.GetItemText(lbTeams.Items.Item(tempInt)).ToString().Equals(txtTeamName.Text) = True) Then
       MsgBox("Team Already Exist")
       Exit Sub
   End If
   tempInt -= 1
End While
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...