Why does my text keep highlighting?

六眼飞鱼酱① 提交于 2020-01-11 10:32:52

问题


I am making a "toast" in vb.net, and whenever it pops up, all the text in the body textbox is ALWAYS highlighted...how can I remove the highlight programmatically?

Thanks!

Here is the code which seems to be automatically highlighting:

Dim i As Integer
        toast.HeaderL.Text = headertext
        toast.BodyL.Text = contenttext
        toast.Show()
        toast.Opacity = 0
        i = 0
        While i < 100
            toast.SetDesktopLocation(My.Computer.Screen.WorkingArea.Right - toast.Width, My.Computer.Screen.WorkingArea.Bottom - ((toast.Height / 100) * i))
            toast.Opacity += 0.01
            wait(7)
            i += 1
        End While
        wait(4000)
        toast.Opacity = 1
        i = 0
        While i < 100
            toast.SetDesktopLocation(toast.Location.X, toast.Location.Y + toast.Height / 100)
            toast.Opacity -= 0.01
            wait(7)
            i += 1
        End While
        toast.Close()

Always, the text inside BodyL (which is a textbox), highlights itself.I tried adding in toast.Focus() at some points, but that did not work.

toast is the form name.


回答1:


It's more of a guess, but you could try to add the following line, after assigning the text to BodyL:

toast.BodyL.Select(toast.BodyL.Text.Length, 0)

Another idea is to add some other control to the toast form (such as a Panel) that can receive input focus without showing (it can be made very tiny, or even have it moved outside the visible part of the form), and making sure that that control receives focus when the toast form is displayed.



来源:https://stackoverflow.com/questions/1344855/why-does-my-text-keep-highlighting

易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!