Re: [.NET] 如何簡短程式

[fumizuki (矇面加菲獅)]

Private Sub TextBox_GotFocus(ByVal sender As Object, _
ByVal e As System.EveArgs) Handles TextBox2.GotFocus, _
TextBox3.GotFocus, TextBox4.GotFocus, TextBox5.GotFocus

    UserControl11.Show()
    Dim txt As TextBox = CType(sender, TextBox)
    num = Val(txt.Name.SubString(txt.Name.Length - 1))
    '取得控制項名稱的最後一個字元，並轉換成數字型態
    'Windows 應用程式使用 control.Name
    'ASP.NET 應用程式使用 control.ClientID 

End Sub


--
                                ▃▅▇▆▄                         ▆▂▃  `  
逝去感情如何能留住，半點癡情遺留殊不易，██▅▇▄▃                ▇▃▂"  .
                                    █████████▃i              ▁▄▇ 
              更多悽悽慘慘的遭遇…………██▆▃                █▅▆▃ˍ▄* 
                                                 ◢           ▂█▄▇▅▂▌. 
我不知道，王～八～蛋～～！           ▂▆███    █▄▃  。fumizuki。Check。

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 123.194.100.4
推 btohung:懂了，謝謝大大的教導。