質問: myType.GetProperty("DoubleBuffered", Reflection.BindingFlags.Instance Or Reflection.BindingFlags.NonPublic) myPropertyInfo.SetValue(DGV, True, Nothing) End Sub ``` ### 補足情報 Public Sub DoubleBuff(con As Control)に変更してみたのですが '***'は型です。有効な式ではありません。と出てコンパイルエラーになりました。 環境 .Net 3.5 VB2013 Win7 64bit です。 よろしくお願いいたします。
回答: Public Sub DoubleBuff2(obj As Object) Dim myType As Type = obj.GetType() Dim myPropertyInfo As Reflection.PropertyInfo = myType.GetProperty("DoubleBuffered", Reflection.BindingFlags.Instance Or Reflection.BindingFlags.NonPublic) myPropertyInfo.SetValue(obj, True, Nothing) End Sub .GetType()でもTypeを取得できることを思い出し、型じゃなくてもいけるかなと... 以上のコードで動作することが出来ました。 objにはコントロールの名前を入れて動作確認を行いました。