すべてのボタンのタグを読む

私は、タグのプロパティに基づいて、ボタンのForeColorプロパティを変更しようとしていますが、私が代わりにエラーを取得し、誰もがこのコードと間違っているものを私に伝えることができます

ありがとう

サブSetBTkey（文字列としてByVal BT）

For Each ctrl As Control In Controls 
     If TypeOf ctrl Is Button Then 
      If ctrl.Tag.ToString.Contains(BT) = True Then 
       CType(ctrl, Button).ForeColor = Color.LimeGreen 
      Else 
       CType(ctrl, Button).ForeColor = Color.White 
      End If 
     End If 
    Next 
End Sub

SetBTkey（ "BTkey01"）

出典

2017-11-20 Tom Stachon

あなたはタグが内容を持っていると確信していますか？それはエラーではないようです。プラスあなたはctrl.ForeColor = Color.LimeGreenを持っている必要があります –

すべてのタグがコンテンツを持っているわけではありません、ここで私は達成しようとしています、私はBTKey27を介してBTKey01と呼ばれるボタンのグループを持って、緑と残りのボタンの色を白に色を変更すると、どんな助けにもなりますありがとう –