📄 msg.vb
字号:
Public Class Msg
' Fields
Private _编号 As String
Private _发送方 As String
Private _接受方 As String
Private _发送时间 As String
Private _内容 As String
Public Sub New()
Me._发送方 = ""
Me._发送时间 = ""
Me._编号 = ""
Me._内容 = ""
End Sub
Public Property 编号() As String
Get
Return Me._编号
End Get
Set(ByVal value As String)
Me._编号 = value
End Set
End Property
Public Property 接受方() As String
Get
Return Me._接受方
End Get
Set(ByVal value As String)
Me._接受方 = value
End Set
End Property
Public Property 发送方() As String
Get
Return Me._发送方
End Get
Set(ByVal value As String)
Me._发送方 = value
End Set
End Property
Public Property 发送时间() As String
Get
Return Me._发送时间
End Get
Set(ByVal value As String)
Me._发送时间 = value
End Set
End Property
Public Property 内容() As String
Get
Return Me._内容
End Get
Set(ByVal value As String)
Me._内容 = value
End Set
End Property
End Class
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -