参考如下代码
让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：域名申请、网站空间、营销软件、网站建设、庐阳网站维护、网站推广。
1
2
$("select").val(); // 选中项目的value值
$("select option:checked").text(); // 选中项目的显示值
示例如下：
创建Html元素
1
2
3
4
5
6
7
8
请选择：
select id="sel"
option value="1"选项1/option
option value="2"选项2/option
option value="3"选项3/option
option value="4"选项4/option
/select
input type="button" value="点击查看被选项目"
编写jquery代码
1
2
3
4
5
6
7
$(function(){
$("input").click(function() {
a = $("#sel").val();
b = $("#sel option:checked").text();
alert("被选项目的值："+a+"，被选项目的显示值："+b+"。");
});
})
设置一个全局变量：
Public item As String
然后在第一个窗口那里取：
item = ComboBox1.SelectedItem.ToString()
然后加到第二个窗口那里：
ComboBox2.DropDownStyle = ComboBoxStyle.DropDownList（这个不可改内容的设定可以在建立ComboBox的时候就设定了）
ComboBox2.Items.Add(item) （加入内容，你或者也可以用别的，比如insert，这个可以加到指定的位置）
ComboBox2.SelectedItem = item （显示那个刚加进来的内容）
这样应该可以了，建议你多看MSDN。
Public Class Form1
Dim b(9)() As String
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim a(9) As String '这个数组用来存储第一个下拉框的全部值。
For i = 0 To 9
a(i) = i '赋值。
ReDim b(i)(9) '定义选择第一个下拉框的值时，第二个下拉框分别有十个值。
For j = 0 To 9
b(i)(j) = i '赋值。
Next
Next
ComboBox1.Items.AddRange(a)
End Sub
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
ComboBox2.Items.Clear()
ComboBox2.Items.AddRange(b(ComboBox1.SelectedIndex))
End Sub
End Class