以下是一个简单的示例，展示了如何在ASP.NET VB中创建一个下拉列表：

1. 在ASP.NET页面上添加一个DropDownList控件：

2. 在页面的代码后台中添加代码，以便在页面加载时填充下拉列表的选项：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    If Not IsPostBack Then
        ' 添加选项
        ddlOptions.Items.Add(New ListItem("选项1", "1"))
        ddlOptions.Items.Add(New ListItem("选项2", "2"))
        ddlOptions.Items.Add(New ListItem("选项3", "3"))

        ' 设置默认选中项
        ddlOptions.SelectedIndex = 0
    End If
End Sub

3. 在页面的代码后台中可以使用下拉列表的SelectedIndexChanged事件来获取用户选择的值：

Protected Sub ddlOptions_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddlOptions.SelectedIndexChanged
    Dim selectedValue As String = ddlOptions.SelectedValue
    ' 根据选择的值执行相应的操作
    ' ...
End Sub

这是一个简单的示例，演示了如何在ASP.NET VB中创建和使用下拉列表。您可以根据自己的需求进行进一步的定制和修改。