私のvb.net Windowsアプリケーションでは、 event 内にいくつかのコードを書きMouseMove
ました。アプリケーションが実行され、カーソルがアプリケーション内に入ると、messagebox
ポップアップが表示され、1 秒以内に表示されなくなります。その中に何が入っているか読めませんmessagebox
。
messagebox
キャプション.netフレームワークを持っているこの不要なものを取り除くのを手伝ってくれませんか。これが私のコードです
Public Class ToolDashboard
Imports System.Configuration
Imports System.Collections.Specialized
Public Class CompassToolDashboard
Dim path As NameValueCollection
Private Sub ToolDashboard_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Location = New Point(Screen.PrimaryScreen.WorkingArea.Width - (Me.Width - 50), Screen.PrimaryScreen.WorkingArea.Height - Me.Height)
path = ConfigurationManager.GetSection("ToolPath")
End Sub
Private Sub ToolDashboard_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseEnter
Me.BringToFront()
While Me.Opacity < 1
Me.Opacity = Me.Opacity + 0.06
End While
End Sub
Private Sub ToolDashboard_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseLeave
While Me.Opacity > 0
Me.Opacity = Me.Opacity - 0.001
End While
End Sub
Private Sub CloseForm_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CloseForm.Click, CloseForm.Click
Process.GetCurrentProcess().Kill()
End Sub
Private Sub ShareTool_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VMDashboard.Click
System.Diagnostics.Process.Start(path("IndexGenerator"))
'getting path for Indexgenerator.exe from app.config
'Index generator.exe is present in a remote system
End Sub
End Class