フォームを半透明にするフォームの透明度をフォームのOpacityプロパティで指定できます。指定できる値は、0.0(完全に透明)~1.0(完全に不透明)の間です。ただし、透過的なフォームはWindows2000以降でだけサポートされているため、Windows98などでは無視されます。 次の例ではButton1をクリックすることにより、フォームのウィンドウ全体が徐々に消えて、また徐々に現れます。 Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click '徐々に消えて、また現れる Dim i As Integer '徐々に消える For i = 10 To 0 Step -1 'フォームの不透明度を変更する Me.Opacity =