拆分字符串为单一字符

以下面这个样子：

 

本函式是学习使用WHILE以及SUBSTRING的应用：

 

CREATE FUNCTION [dbo].[svf_SplitStringToSingleCharacter]( @DataSource NVARCHAR(4000) ) RETURNS NVARCHAR(4000) AS
BEGIN
   DECLARE @rtvResult NVARCHAR(4000),@length INT       

   SET @length = lEN(ISNULL(@DataSource,'')) IF @length = 0
      SET @rtvResult = N''
   ELSE
   BEGIN
        WHILE @length > 0
        BEGIN
            SET @rtvResult = ISNULL(@rtvResult + ',',N'') + '''' + SUBSTRING(@DataSource,@length,1) + ''''
            SET @length = @length - 1
        END
   END
     
   RETURN @rtvResult
END

Source Code

 
上面的自定义的函数，在执行以后所获得的结果，并无按照输入的顺序排列。

那Insus.NET能够修改一下：

 

CREATE FUNCTION [dbo].[svf_SplitStringToSingleCharacter1]( @DataSource NVARCHAR(4000) ) RETURNS NVARCHAR(4000) AS
BEGIN
   DECLARE @rtvResult NVARCHAR(4000),@length INT       

   SET @length = lEN(ISNULL(@DataSource,'')) IF @length = 0
      SET @rtvResult = N''
   ELSE
   BEGIN
        DECLARE @i INT = 1
        WHILE @i <= @length
        BEGIN
            SET @rtvResult =  ISNULL(@rtvResult + ',',N'') + ''''  +  SUBSTRING(@DataSource,1,1) + ''''
            SET @DataSource = STUFF(@DataSource,1,1,N'') SET @i = @i + 1
        END
   END
     
   RETURN @rtvResult
END
GO

Source Code

 

再来看看执行的结果：