?? classuser.vb
字號:
'************************************************************
'Copyright(c) 2007 長沙南方職業學院 信息系 軟件2-061班
'All rights reserved
'
'程序名稱:學校基本信息管理系統
'
'作者(原):易湘陵
'完成日期:2007-11-12
'作者(改):
'修改日期:
'************************************************************
Public Class ClassUser
Private NameStr As String
Private RoleStr As String
Public PassWord As String
Public Sub New(ByVal Nstr As String, ByVal Rstr As String, ByVal Pstr As String)
NameStr = Nstr
RoleStr = Rstr
PassWord = Pstr
End Sub
Public Property LoginUserName() As String
Get
Return NameStr
End Get
Set(ByVal Value As String)
NameStr = Value
End Set
End Property
Public Property LoginUserRole() As String
Get
Return RoleStr
End Get
Set(ByVal Value As String)
RoleStr = Value
End Set
End Property
End Class
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -