If e.Form.Controls("PassWord1").Value <> e.Form.Controls("PassWord").Value Then Messagebox.show("請輸入登錄工號!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If 【这里只是提示,没有中止后面代码执行】
Dim Parts() As String = e.Form.【这里缺少点什么】Text.Split("-") OldUserName = Parts(Parts.Length -1)