本文介绍了为什么这个CLS不合规?的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧! 问题描述 这个课程的出现不符合CLS,为什么? 带有这个警告 警告2类型''帐户''不符合CLS。 命名空间账号 '''''< summary> '''' ''代表一个帐户 '''''< / summary> ''''''<备注> < / remarks> 公共类账号 私人m_AccountID为Int64 私人m_Name As String = String.Empty 公共财产AccountID()如Int64 获取 返回m_AccountID 结束获取 设置(ByVal值为Int64) m_AccountID = value 结束集 结束财产 公共财产名称()字符串 获取 返回m_Name.Trim 结束获取 设置(ByVal值为字符串) m_Name = value 结束集 结束物业 Public Sub New() Me.AccountID = -1 Me.Name = String.Empty End Sub 公共子新(ByVal accountID为Int64,ByVal名称为字符串) Me.AccountID = accountID Me.Name = name.Trim End Sub 公共覆盖函数ToString()为字符串 返回Me.Name 结束函数 /> 结束类 结束命名空间 解决方案 This class is coming up as not CLS compliant, why?with this warrningWarning 2 Type ''Account'' is not CLS-compliant.Namespace Accounts'''''' <summary>'''''' Represents an account'''''' </summary>'''''' <remarks></remarks>Public Class AccountPrivate m_AccountID As Int64Private m_Name As String = String.EmptyPublic Property AccountID() As Int64GetReturn m_AccountIDEnd GetSet(ByVal value As Int64)m_AccountID = valueEnd SetEnd PropertyPublic Property Name() As StringGetReturn m_Name.TrimEnd GetSet(ByVal value As String)m_Name = valueEnd SetEnd PropertyPublic Sub New()Me.AccountID = -1Me.Name = String.EmptyEnd SubPublic Sub New(ByVal accountID As Int64, ByVal name As String)Me.AccountID = accountIDMe.Name = name.TrimEnd SubPublic Overrides Function ToString() As StringReturn Me.NameEnd FunctionEnd ClassEnd Namespace 解决方案 这篇关于为什么这个CLS不合规?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!
09-14 08:03