Object 类型添加扩展方法后如何使用？

[Triumph]

给 Object 类型添加了一个扩展方法，用于将对象序列化为 Json 字符串，代码如下：

Imports System.Runtime.CompilerServices

Public Module JSON
	<Extension()> Public Function ToJsonString(ByVal o As Object) As String
		Return Newtonsoft.Json.JsonConvert.SerializeObject(o)
	End Function
End Module

在使用时，如果类型定义不是 Object ，则正常使用，否则出错。如：

Dim o As String = "aaa"
Response.Write(o.ToJsonString)  '不会报错，运行正常

Dim o As Object = "aaa"
Response.Write(o.ToJsonString)  '报错，提示【未找到类型“String”的公共成员“ToJsonString”。 】

请问这是什么原因？

[Triumph]

使用泛型的方法之前试过了，不行的，一样执行到那一行时出错。

因为这是个通用的生成 JSON 串的方法，传入的对象类型事先并不知道，所以不能传入具体的类型，只能传入 Object 类型，但只有传入此类型时报错，传入其它类型都正常。

[Triumph]

而更奇怪的是，同样的代码，如果不声明成扩展方法，即把<Extension()>去掉，使用
ToJsonString(o)
的时候，o 无论是什么类型，即使是 Object 类型都可以正常运行。

[以专业开发人员为伍]

[Quote=引用 3 楼 triumph 的回复:]
使用泛型的方法之前试过了，不行的，一样执行到那一行时出错。
[/Quote]

唉，难道你使用泛型概念来编程，程序还是仍然写 Dim o As Object 吗？

[wuyq11]

<System.Runtime.CompilerServices.Extension> _
Private Function ToJsonString(Of T)(t As T) As String
End Function
object.ToString

[以专业开发人员为伍]

[Quote=引用 3 楼 triumph 的回复:]

使用泛型的方法之前试过了，不行的，一样执行到那一行时出错。

因为这是个通用的生成 JSON 串的方法，传入的对象类型事先并不知道，所以不能传入具体的类型，只能传入 Object 类型，但只有传入此类型时报错，传入其它类型都正常。
[/Quote]

其实我们看这个解释，都是定义o为object类型找理由。这就是问题根源。

改变思路（或者说对人员进行培训），让它别为将o懒惰地定义为object类型而找理由，用强类型编程习惯。

[以专业开发人员为伍]

通用的方法就必须使用object类型定义参数？泛型就是整治这个观念的！

[以专业开发人员为伍]

使用泛型吧，不要使用object，以免歧义。

[以专业开发人员为伍]

泛型是这样定义的

<Extension()> Public Function ToJsonString(Of T)(ByVal o As T) As String