下面的程序用于根据输入的内容进行以下处理：若X为1、3、4，则打印“X的值为1、3、4”；若X 在5到9之间，则打印“X的值为大于等于5小于等于9”；若X大于10，则打印“X的值大于10”；否则，打印“X不在范围内”。
Private Sub Commandl_Click()
Dim x As Integer
Select Case x
Case(l)_________
Print “X的值为l,3,4,”
Case (2)_________
Print “X的值为大于等于5小于等于9”
Case Is > 10
Print “X的值大于10”
Case (3)_________
Print “X不在范围内”
Endselect
End Sub
 
 

下面的程序用于根据输入的内容进行以下处理：若X为1、3、4，则打印“X的值为1、3、4”；若X 在5到9之间，则打印“X的值为大于等于5小于等于9”；若X大于10，则打印“X的值大于10”；否则，打印“X不在范围内”。