我试图与用户输入的双号进行比较,与listview中包含的子项进行比较。我尝试了以下代码,但它删除了错误的值,我似乎无法让它工作。我想比较
ListView1.Items(index).SubItems(1).Text <= spread_less_then_input.Text
我不确定这些数字是字符串格式的代码是否有问题。这是我正在尝试的代码
If spread_less_then_input.Text() <> "" And (ListView1.Items.Count <> 0) Then
For index As Integer = ListView1.Items.Count - 1 To 0 Step -1
If ListView1.Items(index).SubItems(1).Text <= spread_less_then_input.Text Then
ListView1.Items.RemoveAt(index)
End If
Next index
End If
答案 0 :(得分:0)
只需要将字符串转换为double 索引As Integer = ListView1.Items.Count - 1到0步-1 Dim userinput As Double Dim subitem As Double userinput = CDbl(Val(spread_greater_then_input.Text())) subitem = CDbl(Val(ListView1.Items(index).SubItems(1).Text))'// Val做努力工作(ListView1.Items(index).SubItems(3).Text,result1) 如果userinput&gt; = subitem那么 ListView1.Items.RemoveAt(指数) 万一 下一个索引 结束如果