存儲值在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語句

回答

相關問題