SqlStr1 = "Select 编号,ItemName,ItemValue,ItemTime From historydata where ItemName='" & combo1.text & "' order by 编号"