rami2076

    public static void main(String[] args) {

        String eOne = "h";

        var v = switch (eOne) {
            case "" -> "EMPTY";
            case null -> "NULL";
            case String s && !s.isEmpty() -> "NOT_EMPTY";
            case String s && s.length() == 5 -> "5";
            case String s && s.equals("a") -> "A";

rami2076

Attribute VB_Name = "Module2"
Option Explicit

'リストオブジェクトの作成(正確にはすでにあるリストオブジェクトにチェックボックスを追加する)
'addメソッドを使用することでより動的にリストを作成できる

Private Const Numbering_Column As Integer = 1
Private Const Name_Column As Integer = 2
Private Const Flg_Column As Integer = 3

rami2076

Sub createList()

  Dim list As ListObject
  Dim lRows As ListRows
  Dim lRow As listRow
'  Dim coll As New Collection
  
  MyDeleteeCheckBox
  
  'coll.Add (1)