public class NumericFormats
{
public static void Main()
   {
// Display string representations of numbers for en-us culture
      CultureInfo ci = new CultureInfo("en-us");
// Output floating point values

      double floating = 10761.937554; Console.WriteLine("C: {0}",
              floating.ToString("C", ci));           // Displays "C: $10,761.94"
      Console.WriteLine("E: {0}",
              floating.ToString("E03", ci));         // Displays "E: 1.076E+004"
      Console.WriteLine("F: {0}",
              floating.ToString("F04", ci));         // Displays "F: 10761.9376"        
      Console.WriteLine("G: {0}", 
              floating.ToString("G", ci));           // Displays "G: 10761.937554"
      Console.WriteLine("N: {0}",
              floating.ToString("N03", ci));         // Displays "N: 10,761.938"
      Console.WriteLine("P: {0}",
              (floating/10000).ToString("P02", ci)); // Displays "P: 107.62 %"
      Console.WriteLine("R: {0}",
              floating.ToString("R", ci));           // Displays "R: 10761.937554"           
      Console.WriteLine();
// Output integral values
      int integral = 8395;
      Console.WriteLine("C: {0}",
              integral.ToString("C", ci));           // Displays "C: $8,395.00"
      Console.WriteLine("D: {0}",
              integral.ToString("D6", ci));          // Displays D: 008395""
      Console.WriteLine("E: {0}",
              integral.ToString("E03", ci));         // Displays "E: 8.395E+003"
      Console.WriteLine("F: {0}",
              integral.ToString("F01", ci));         // Displays "F: 8395.0"   
      Console.WriteLine("G: {0}", 
              integral.ToString("G", ci));           // Displays "G: 8395"
      Console.WriteLine("N: {0}",
              integral.ToString("N01", ci));         // Displays "N: 8,395.0"
      Console.WriteLine("P: {0}",
              (integral/10000).ToString("P02", ci)); // Displays "P: 83.95 %"
      Console.WriteLine("X: 0x{0}",
              integral.ToString("X", ci));           // Displays "X: 0x20CB"
      Console.WriteLine();
   }
}

来源:http://www.cnblogs.com/RickyYan/archive/2009/03/06/1404667.html

declare @i int select @i=1declare @l int select @l=dbo.GetSplitLength(@mbh,',') ---字符串分割长度while(@i<=@l)begin insert into #tmbTable(mbhid) select a.mbhid from dockconfig_mbhTable a where a.mbh=dbo.GetSplitOfIndex(@mbh,',',@i)select @i=@i+1end;

-----------------------------------------------

由于dockconfig_mbhTable 表中有上万条数据,执行起来效率低下.经过尝试分析功能的执行时间,发现效率是受函数影响,

但是单独进行函数dbo.GetSplitOfIndex 测试,效率又没有问题.于是稍微修改了下代码:

declare @i int select @i=1declare @l int select @l=dbo.GetSplitLength(@mbh,',')declare @v varchar(20)while(@i<=@l)begin select @v=dbo.GetSplitOfIndex(@mbh,',',@i)insert into #tmbTable(mbhid) select a.mbhid from dockconfig_mbhTable a where a.mbh=@v select @i=@i+1end;  

居然…居然效率提高了好几千倍.记录下以后遇到该问题都在进行查询时进行变量申明分开使用函数.

   1:  Public Function RawSerialize(o As Object) As Byte()

   2:          Dim rawSize As Integer = Marshal.SizeOf(o)

   3:          Dim buffer As IntPtr = Marshal.AllocHGlobal(rawSize)

   4:          Marshal.StructureToPtr(o, buffer, False)

   5:          Dim rawDatas As Byte() = New Byte(rawSize) {}

   6:          Marshal.Copy(buffer, rawDatas, 0, rawSize)

   7:          Marshal.FreeHGlobal(buffer)

   8:          Return rawDatas

   9:      End Function

byte—>Structure

   1:  Public Function RawDeserialize(rawdata As Byte(), position As Integer, t As Type) As Object

   2:          Dim rawsize As Integer = Marshal.SizeOf(t)

   3:          If rawsize > rawdata.Length Then

   4:              Return Nothing

   5:          End If

   6:          Dim buffer As IntPtr = Marshal.AllocHGlobal(rawsize)

   7:          Marshal.Copy(rawdata, position, buffer, rawsize)

   8:          Dim retobj As Object = Marshal.PtrToStructure(buffer, t)

   9:          Marshal.FreeHGlobal(buffer)

  10:          Return retobj

  11:      End Function

 Private Sub GridEditExitCheck()

        Try

            Dim p As SourceGrid.Position = Grid1.Selection.ActivePosition

            If p.Row <> -1 AndAlso p.Column <> -1 Then

                Dim c As SourceGrid.CellContext = New SourceGrid.CellContext(Grid2, p)

                '   c.Value = CType(Grid1.Item(p.Row, p.Column).Editor, SourceGrid.Cells.Editors.TextBox).Control.Text

                c.EndEdit(False)

            End If

        Catch ex As Exception

            Exit Try

        End Try

    End Sub

网络上说的那个wwwkeys.eu.pgp.net好像已经不能使用了.

本函数严格处理字符串，同位置的字符串相同时才算是相似。结果采用小于等于1的小数表示，越靠近1表示相似度越高。