点击按钮切换Drop Downlist下拉列表下一项功能实现异常咨询

你的代码核心问题在于逻辑判断错误和缺少边界校验：

• 原有判断条件If idx <> Me.Dpdtokens.SelectedIndex - 1完全无效：因为你刚将Me.Dpdtokens.SelectedIndex赋值给idx，该条件等价于idx <> idx - 1，恒为真，完全无法判断是否到达下拉列表末尾
• 未校验索引边界：当选中索引已经是列表最后一项时，直接+1会超出合法索引范围，导致赋值失效，这就是你只能跳转一次的原因

Dim idx As Integer = Me.Dpdtokens.SelectedIndex
' 下拉列表最大合法索引为项数减1
Dim maxValidIdx As Integer = Me.Dpdtokens.Items.Count - 1
If idx < maxValidIdx Then
    ' 未到末尾，跳转到下一项
    Me.Dpdtokens.SelectedIndex = idx + 1
Else
    ' 已到末尾，回到第一项实现循环跳转
    Me.Dpdtokens.SelectedIndex = 0
End If

如果你使用的是ASP.NET Web Forms场景，还要检查Page_Load方法中下拉列表的绑定逻辑，必须加回发判断，避免每次点击按钮都重新绑定下拉列表、重置选中项：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    If Not IsPostBack Then
        ' 仅首次加载时绑定下拉列表数据
        Me.Dpdtokens.DataSource = 你的数据源
        Me.Dpdtokens.DataBind()
    End If
End Sub

内容的提问来源于stack exchange，提问作者McVision Richard