控件获取焦点及设置输入法全角半角或无效

ASP.NET 让控件获取焦点及设置输入法全角半角或无效

让控件获取焦点及设置输入法全角半角或无效

做开发的过程中,常遇到一些页面要求光标的默认位置固定在某控件上
看起来好像很难,其实实现方法很简单.
JavaScript里面有现成的设置焦点的方法
可以写一个简单的函数命名为setFocus,然后在Page_Load里调用就可以了
比如需要设置焦点的是mytextbox控件
那么只要Page_Load写上Call setFocus(Me.mytextbox)就可以了
下面是VB.NET代码实例.C#的代码也差不多...

1.  Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
2.        Call setFocus(Me.txt_code)
3.        End Sub
5.  
7.    Private Sub setFocus(ByVal ctrl As Control)
8.        Dim script As String
9.        script = "<script language='JavaScript'>" & _
10.                 "        document.getElementById('" & ctrl.ClientID & "').focus();" & _
11.                 "</script>"
12.        RegisterStartupScript("setfocus", script)
13.    End Sub
16. 
    
18.       Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
19.        If Not Page.IsPostBack Then
20.            'IME半角設定
21.            setIME(Me.Page, Me.txt_code, 1)
22.            setIME(Me.Page, Me.txt_date, 1)
23.        End If
24.        End Sub
26.  
28.    Public Sub setIME(ByRef pgTemp As Page, _
29.                      ByRef ctrTemp As WebControl, _
30.                      ByVal intMode As Integer)
31.        Select Case intMode
32.            Case 0 'IME無効
33.                ctrTemp.Attributes.Add("style", "ime-mode:disabled")
34.            Case 1 'IME半角
35.                ctrTemp.Attributes.Add("style", "ime-mode:inactive")
36.            Case 2 'IME全角
37.                ctrTemp.Attributes.Add("style", "ime-mode:active")
38.            Case 3 'IME自動
39.                ctrTemp.Attributes.Add("style", "ime-mode:auto")
40.            Case 4 'IME無効且右对齐
41.                ctrTemp.Attributes.Add("style", "ime-mode:disabled;text-align:right")
42.            Case 5 'IME半角且右对齐
43.                ctrTemp.Attributes.Add("style", "ime-mode:inactive;text-align:right")
44.        End Select
45.    End Sub