B4J Question Check type of Controls

Dim n As Node = ...
If n Is ComboBox Then
 ...
Else If n Is CheckBox Then
 ...
 Dim cb As CheckBox = n
 ...
Else If n Is TextField Then

End If

Dim n As Node = MyMap.Get("PasteBox")

mpset.Clear
mpset.Put(ComEthbox, 0)
mpset.Put(Serialbox, 0)
mpset.Put(Pastebox, 0)
mpset.Put(iptxt, "192.168.1.25")

dim n as Node
For i = 0 to mpset.Size - 1
    ' n = mpset.Get("Pastebox")
      n = mpset.Get(mpset.GetKeyAt(i))
      If n Is ComboBox Then
        Log("combobox")
      Else If n Is CheckBox Then
        Log("checkbox")
      .........
      Else
      End If
Next

n = mpset.GetKeyAt(i)

For Each n As Node in mpset.Keys

Next