Dim cmb As WinForm.ComboBox = e.SenderDim v As Integer = e.Form.Controls("TextBox9").Value
cmb.ComboList = DataTables("背面规格").GetComboListString("背面规格", "长度 >= '" & v-1 & "' And 长度 <= '" & v+1 &"'")
顺便问一下,为啥你的长度不是数值型,而是字符型,长度应该是数值才对啊。