fix: Ctrl+A 实现不合逻辑

2024-08-05 19:53:45 +08:00
parent 8972aec56a
commit f9c4e5a752
1 changed files with 1 additions and 1 deletions
@@ -380,7 +380,7 @@
        AniControlEnabled += CacheAniControlEnabled
    End Sub
    Private Sub PageVersionMod_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
-        If My.Computer.Keyboard.CtrlKeyDown AndAlso e.Key = Key.A Then ChangeAllSelected(True)
+        If My.Computer.Keyboard.CtrlKeyDown AndAlso e.Key = Key.A Then ChangeCurrentSelected(True)
    End Sub

    Private ViewModType As String = "All"