我正在玩我的应用程序中的隔离存储设置,我决定添加这些选项:按字母顺序,新旧到最旧,最旧到最新。所有这些值都存储在listpicker中,它们保存并加载正常,但错误是当我添加更多if语句时它不会工作。例如这是不会工作的:
Try
Dim ListOrder As Byte = CByte(AppSettings("OrderNotes"))
If ListOrder = 1 Then
AscendingOrder()
ElseIf ListOrder = 1 Then
NewestOldest()
ElseIf ListOrder = 2 Then
OldestNewest()
End If
Catch ex As KeyNotFoundException
AppSettings.Save()
End Try
这将有效:
Try
Dim ListOrder As Byte = CByte(AppSettings("OrderNotes"))
If ListOrder = 1 Then
AscendingOrder()
ElseIf ListOrder = 2 Then
NewestOldest()
End If
Catch ex As KeyNotFoundException
AppSettings.Save()
End Try
似乎只有它是If或者其他。如果......等等,就不能成为别的。 有办法解决这个问题吗?所以我可以选择2个以上的选项。
谢谢!