Select Case 中的case不能合并吗

[billlyh]

Select Case TB_PartNum.Text.Length
Case 14
Get_标识位()
Get_分类()
Get_材质()
Get_版类字母()
Case 16
MessageBox.Show("16位胶模")
Get_标识位()
Get_分类()
Get_材质()
Get_版类字母()
Case Else
MessageBox.Show("目前没有")
End Select

Case 14 Case 16 合并后结果和上面程序不一样，
Select Case TB_PartNum.Text.Length
Case 14
Case 16
MessageBox.Show("16位胶模")
Get_标识位()
Get_分类()
Get_材质()
Get_版类字母()
Case Else
MessageBox.Show("目前没有")
End Select

为什么会这样，以前用C#的时候，switch是可以合并的

[捷哥1999]

Case 14 Case 16 合并后结果和上面程序不一样，
结果有何不同，没有说呀。

[SYSSZ]

Case 14
Case 16
改为:
Case 14,16

[WM_JAWIN]

vb6还有这样的写法
case is>10
case 1 to 10
.net 不知有没。LZ可以去试试