2

ご存知のように、Microsoft は Windows 11 のシステム トレイ タスクバーに秒を表示しないことを選択しました。そこで、ちょっとしたツールを作ることにしました。

シンプルなタイマーと、時計の横に秒を表示するラベル。私が使用しているコードは次のとおりです。


Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.StartPosition = FormStartPosition.Manual
        Me.Location = New Point(1891, 1029)
        Me.Size = New Size(21, 18)

        Me.TransparencyKey = Color.LightBlue
        Me.BackColor = Color.LightBlue
    End Sub
    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Label1.Text = ":" + Format(Now, "ss")
    End Sub
End Class

常に一番上にあるプロパティはtrueですが、タスクバーをクリックするとフォームが消えます。それを修正する方法はありますか？ありがとう

4

2 に答える 2

0

しばらくして、この小さなツールの開発を続けることにしましたが、何らかの理由で、通知があるたびにフォームの位置が上に移動していたため、System.Timers.Timer内の次のコードを使用して位置を強制することになりました0.1 秒 (100 ミリ秒) ごとにTimer.Tickイベントを発生させるオブジェクト

 Me.StartPosition = FormStartPosition.Manual
        Me.Location = New Point(1897, 1039)
        Me.Size = New Size(21, 18)
        Me.TransparencyKey = Color.LightBlue
        Me.BackColor = Color.LightBlue
        Label1.Text = Format(Now, "ss")
        Me.TopMost = True

シンプルですが、効率的です。

于 2022-01-07T23:57:09.773 に答える