存储值在Select Case语句

说我有一个字符串，它看起来像这样使用...存储值在Select Case语句

Dim Value as String 
Value = "373, 273"

我的目标是能够使用的字符串值在case语句...

因此，一些沿

Dim Number as integer 
Number = 273 

Select Case Number 

Case Value 
    Msgbox "Value is 273" 

Case else 
    'do nothing 
End select

当我运行这种情况下语句行 - 它不读取值（273），因此它只是到别的区分。

如何在我的select case语句中使用VALUE以便它能够识别它的值？

来源

2017-02-27 BobSki

，什么是你的问题？ –

@ProGrammer更新 – BobSki

我不知道你在这里试图达到什么......看起来你只是想检查'Value'是否包含'Number'，在这种情况下，你只需使用'Value .Contains（Number.ToString（））' –

试试这个（未经测试）：

Dim Number as Integer = 273 
Dim Value = "373, 273" 

Dim numAsString = CStr(Number) 
If InStr(1, Value, numAsString) 
    MsgBox("Value is " & numAsString) 
End If

来源

2017-02-27 15:01:08

我在case case声明中需要这个：/我不知道如何去做那个 – BobSki

你要求的东西在'Select Case'中没有意义， –

它在这种情况下也是这样。我试图摆脱harcoding值（272，373），而是让它驱动表（将数字存储在VALUES字符串中）。因此，以前它是案件273,373。现在我试图让select case语句读取VALUE字符串 - 这种方式如果我需要添加另一个数字 - 我不必发布代码，只需更新数据库 – BobSki

存储值在Select Case语句

回答

相关问题