C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[3]: VB SELECT CASE文で二つの条件式で判断させたい。

(過去ログ 86 を表示中)

[トピック内 4 記事 (1 - 4 表示)]　 << 0 >>

■51563 / inTopicNo.1)

　VB SELECT CASE文で二つの条件式で判断させたい。

▼■

□投稿者/ TSR (1回)-(2010/07/09(Fri) 09:38:06)

分類:[VBScript]　

初めまして。ＶＢ初心者のＴＳＲと申します。
下記のコードですが、
処理としては、@243と@249が空白の場合、6211と出力。
　　　　　　　@243が401000@249が空白の場合、6211と出力・・・・・。

といった具合に二つの条件を同時に見にいきたいのですが、
何かコードの書き方に問題があるのでしょうか？
よろしくお願い致します。
現時点では、CASE ELSEの出力しか出ません＞＜；

"#"は２つの条件を同時に見に行く場合の区切りとして使用すると良いと、
ネットで見つけたので使用しています。



SELECT CASE @243& "#" & "@249"

  CASE "#"
    P = "6211" 
  CASE "401000#" 
    P = "6211" 
  CASE "401001#" 
    P = "6211"  
  CASE "401002#" 
    P = "6211"  
  CASE "401003#580542"
    P = "6211"  
  CASE "401004#530149"
    P = "6211"  
  CASE "401005#580612" 
    P = "6211"  
  CASE "401006#" 
    P = "6211"  
  CASE "401007#530121" 
    P = "6211"  
  CASE "401009#" 
    P = "6211"  
  CASE "401010#530583" 
    P = "6211"  
  CASE "401011#544601" 
    P = "6211"  
  CASE "401012#581055" 
    P = "6211"  
  CASE "401013#" 
    P = "6211"  
  CASE "401014#531102" 
    P = "6211"  
  CASE "401015#531139" 
    P = "6211"  
  CASE "401016#580977" 
    P = "6211"  
  CASE "401017#" 
    P = "6211"  
  CASE "401018#" 
    P = "6211"  
  CASE "401019#" 
    P = "6211"  
  CASE "401020#531467" 
    P = "6211"  
  CASE "401021#531166" 
    P = "6211"  
  CASE "401022#581462" 
    P = "6211"  
  CASE "401023#581444" 
    P = "6211"  
  CASE "401024#581736" 
    P = "6211"  
  CASE "401025#581860" 
    P = "6211"  
  CASE "401026#581967" 
    P = "6211"  
  CASE "401027#" 
    P = "6211"  
  CASE "401028#" 
    P = "6211"  
  CASE "401029#531607" 
    P = "6211"  
  CASE "401030#531865" 
    P = "6211"  
  CASE "401031#532350" 
    P = "6211"  
  CASE "401032#582434" 
    P = "6211"  
  CASE "401033#" 
    P = "6211"  
  CASE "401034#582443" 
    P = "6211"  
  CASE "401035#531786" 
    P = "6211"  
  CASE "401036#582328" 
    P = "6211"  
  CASE "401037#531670" 
    P = "6211"  
  CASE "401038#582841" 
    P = "6211"  
  CASE "401039#544267" 
    P = "6211"  
  CASE "401040#" 
    P = "6211"  
  CASE "401041#533951" 
    P = "6211"  
  CASE "401042#582425" 
    P = "6211"  
  CASE "401043#532934" 
    P = "6211"  
  CASE "401044#581152" 
    P = "6211"  
  CASE "401045#535807" 
    P = "6211"  
  CASE "401046#536356" 
    P = "6211"  
  CASE "401047#535782" 
    P = "6211"  
  CASE "401048#" 
    P = "6211"  
  CASE "930893#" 
    P = "6211"  
  CASE ELSE
    P = "6213"

END SELECT

引用返信 編集キー/

■51566 / inTopicNo.2)

　Re[1]: VB SELECT CASE文で二つの条件式で判断させたい。

▲▼■

□投稿者/ もりお (241回)-(2010/07/09(Fri) 10:54:49)

■No51563 (TSR さん) に返信

@243、@249 というのは変数でしょうか。
慥か変数の1文字目はアルファベットにする必要があったように思います。
at243、at249 としてはいかがでしょうか。

> 現時点では、CASE ELSEの出力しか出ません＞＜；

いずれの Case 式にも適合しないということですよね。
実際の値はどのようなものなのでしょうか。
こんな感じで確認してみてはいかがでしょうか。

Call WriteLine("at243:" & at243)
Call WriteLine("at249:" & at249)
Call WriteLine("at243 & # & at249:" & at243 & "#" & at249)

Sub WriteLine(ByVal obj)
  Call WScript.StdOut.WriteLine(obj)
End Sub

引用返信 編集キー/

■51581 / inTopicNo.3)

　Re[2]: VB SELECT CASE文で二つの条件式で判断させたい。

▲▼■

□投稿者/ かたぎり (38回)-(2010/07/10(Sat) 09:56:16)

SELECT CASE TRUE
CASE IF文と同じ条件文の書き方でTRUEとなる評価式
　　TRUEだった時の処理
　
～～～
END SELECT

良く使っていますです。

引用返信 編集キー/

■51584 / inTopicNo.4)

　Re[3]: VB SELECT CASE文で二つの条件式で判断させたい。

▲▼■

□投稿者/ なちゃ (458回)-(2010/07/10(Sat) 12:27:20)

とりあえず、２つめの方の変数はダブルクォーテーション消さないとダメでしょう。

> SELECT CASE TRUE
> CASE IF文と同じ条件文の書き方でTRUEとなる評価式
> 　　TRUEだった時の処理
> 　
> ～～～
> END SELECT
>
> 良く使っていますです。

結構見かけますけど、普通にIfでやればいいような気がします。
どこまで評価されるのかとか、紛らわしくありません？

引用返信 編集キー/

トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

- Child Tree -