るきおさんありがとうございます。

Private Sub CommandButton2_Click()
            InkPicture1.CollectionMode = ICM_GestureOnly

            InkPicture1.setGestureStatus(IAG_AllGestures,True)　※１
            '上記が赤くなって
　　　　　　'コンパイルエラー
            '修正候補 =
            'というエラーがＩＤＥ？ＶＢＥ？から出ます。
            
            If InkPicture1.GetGestureStatus(IAG_AllGestures) Then
             MsgBox "maru"
            Else
            MsgBox InkPicture1.GetGestureStatus(IAG_AllGestures)
            End If
End Sub

　　　　　※１を
　　　　　　InkPicture1.SetGestureStatus(IAG_AllGestures, True) = 0にすると
　　　　　「コンパイルエラー、定数には値を代入できません。」
　　　　　になり、魔界さんが１０年前に、筆圧の回答の中で、
　　　　　’http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=9918
　　　　　なんちゃらに定数を指定～と書いてらっしゃったので、
　　　　　右辺（セット）、左辺（何かわかりません。型？）かなぁ？と思ったものです。

　　　　るきおさん、いかがでしょうか？

　　　　　'https://flylib.com/books/en/2.187.1/using_gestures_to_control_tablet_media_player.htmlに
　　　　　タブレットＳＤＫ？のＣＤ？に、参照したコードがあるような事も書いてありまして、
　　　　　重鎮の皆さんは、お持ちではないでしょうか？

　　　　よろしくお願い致します。

　　　　　’