Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
[Blue]Private[/Blue] textbox1focused [Blue]As[/Blue] [Blue]Boolean[/Blue] = [Blue]False[/Blue]
[Blue]Private[/Blue] [Blue]Sub[/Blue] TextBox1_GotFocus([Blue]ByVal[/Blue] sender [Blue]As[/Blue] Object, [Blue]ByVal[/Blue] e [Blue]As[/Blue] System.EventArgs) [Blue]Handles[/Blue] TextBox1.GotFocus
TextBox1.SelectAll()
[Blue]End[/Blue] [Blue]Sub[/Blue]
[Blue]Private[/Blue] [Blue]Sub[/Blue] TextBox1_Click([Blue]ByVal[/Blue] sender [Blue]As[/Blue] Object, [Blue]ByVal[/Blue] e [Blue]As[/Blue] System.EventArgs) [Blue]Handles[/Blue] TextBox1.Click
[Blue]If[/Blue] Not textbox1focused [Blue]Then[/Blue]
textbox1focused = [Blue]True[/Blue]
TextBox1.SelectAll()
[Blue]End[/Blue] [Blue]If[/Blue]
[Blue]End[/Blue] [Blue]Sub[/Blue]
[Blue]Private[/Blue] [Blue]Sub[/Blue] TextBox1_LostFocus([Blue]ByVal[/Blue] sender [Blue]As[/Blue] Object, [Blue]ByVal[/Blue] e [Blue]As[/Blue] System.EventArgs) [Blue]Handles[/Blue] TextBox1.LostFocus
textbox1focused = [Blue]False[/Blue]
[Blue]End[/Blue] [Blue]Sub[/Blue]