如何使用JavaScript将数据源从数据表添加到下拉列表

Question

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load


    Dim dt As DataTable = tbport()
    cbosearch.DataSource = dt
    cbosearch.DataValueField = "portCode"
    cbosearch.DataTextField = "portName"
    cbosearch.DataBind()


End Sub

Private Function tbport() As DataTable

    Dim dtport As New DataTable


    dtPort.Columns.Add("portCode")
    dtPort.Columns.Add("portId")
    dtPort.Columns.Add("portName")

    dtPort.Rows.Add(25, "Indocin", "David")
    dtPort.Rows.Add(50, "Enebrel", "Sam")
    dtPort.Rows.Add(10, "Hydralazine", "Christoff")
    dtPort.Rows.Add(21, "Combivent", "Janet")
    dtPort.Rows.Add(100, "Dilantin", "Melanie")
    Return dtPort


End Function

我有一个具有70000行的数据表，它是静态数据。当我尝试添加上述方法的数据时，需要花费更多时间才能找到特定的行。如何创建javascript函数以通过下拉列表中输入的值找出一行数据？