主题：帮忙看看，代码该怎么改？

Dim drp As WinForm.DropDownBox = e.sender
Dim txt As String = "'%" & drp.Text & "%'"
Dim tbl As WinForm.Table = Forms("明细查询").Controls("Table1")

Dim dt As DataTable = tbl.Table.DataTable
dt.LoadFilter = "[品名] Like  " & txt               
dt.Load(False)