第一个函数: Create Or Replace Function Change(V_Count Number) Return Varchar2 Is V_Result Varchar2(100); Begin If V_Count = 0 Then V_Result := '末'; Elsif V_Count = 1 Then V_Result := '一' ; Elsif V_Count = 2 Then V_Result := '二' ; Elsif V_Count = 3 Then V_Result := '三' ; Elsif V_Count = 4 Then V_Result := '四' ; Elsif V_Count = 5 Then V_Result := '五' ; Elsif V_Count = 6 Then V_Result := '六' ; Elsif V_Count = 7 Then V_Result := '七' ; Elsif V_Count = 8 Then V_Result := '八' ; Elsif V_Count = 9 Then V_Result := '九'; End If; Return V_Result; End; 第二个函数: Create Or Replace Function Change1(C_Count Number) Return Varchar2 Is V_Result Varchar2(100); V_Len Number; Cnt Number; Begin Select Length(To_Char(C_Count)) Into V_Len From Dual; Cnt := 1; For Rec In 1 .. V_Len Loop V_Result := V_Result || Change(Substr(To_Char(C_Count), Cnt, 1)); Cnt := Cnt + 1; End Loop; Return V_Result; End; Select change1(12345) From dual;结果:一二三四五; Select change1(count(*)) from b where id = 2;