2017年10月19日

【Access】実行中のフォームのコントロールを再描画する

2017年10月19日 (木) 21:41 in ,


Repaintメソッドを使って実行中のフォームのコントロールを再描画することが出来ます。

例

たとえば、フォームにラベル（labelHello）が貼り付けてあり、このラベルのフォントサイズをボタン（buttonBig、buttonSmall）を押すことで変更させてみたいと思います。



各ボタンのイベントプロシージャに次のように記述します。
Private Sub buttonBig_Click()

    Me.labelHello.FontSize = Me.labelHello.FontSize + 1
    
    '再描画
    Me.Repaint
    
End Sub

Private Sub buttonSmall_Click()

    Me.labelHello.FontSize = Me.labelHello.FontSize - 1
    
    '再描画
    Me.Repaint

End Sub


実行結果







スポンサーリンク