プロが教える店舗&オフィスのセキュリティ対策術

VisualBasic2008で開発しております。

フォームを常に最背面に表示したく、
http://jeanne.wankuma.com/tips/vb.net/form/botto …
で紹介されているような方法を試してみました。

この方法で、フォームを最背面にするという事自体は解決できたのですが、最背面にしたフォームのイベントハンドラが機能しなくなってしまいました。

どうすればイベントハンドラが機能するようになるのでしょうか?

A 回答 (1件)

はじめまして、通りすがると申します。


ご質問の意味がいまいち明確に解らないのですが、実際に最背面のフォームにて
何をしたいのかが解らないです。
例として、以下のサンプルを作成してみました。
以下サンプルは、立ち上げ時のフォームは時計を表示します。(仮form1)
form1のボタンをクリックするとform2を起動します。
form2のloadイベントでform2のフォームを前面にするコントロールを指定
してます。
この場合、背面のフォームの時計は常に動いてますのでイベントを常に受け取って
いることが解ると思います。

------------------------form1---------------------------
フォームにtextbo1を一つ、bottomを一つ,Timer1を一つを貼りつけ以下のソースを記述


Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim wTime As DateTime = DateTime.Now


TextBox1.Text = Format(wTime, "yyyy/MM/dd hh:mm:ss")
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim frm2 As New Form2
frm2.Show()
End Sub
End Class
------------------------form2---------------------------
formにbuttomを一つ貼りつけ、以下のソースを記述

Public Class Form2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.TopMost = True
End Sub
End Class
    • good
    • 1

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


このQ&Aを見た人がよく見るQ&A