Visual Basic

[STAThread()]
static void Main(string[] args)
{
   Console.WriteLine("Hit a key: ");
   Console.ReadKey();

   System.Windows.Forms.Form frm = new System.Windows.Forms.Form() { Text = "Test" };

   System.Windows.Forms.Application.Run(frm);
}

Module Module1

    Sub Main()

        Dim inputString As String = String.Empty

        Do While inputString.Equals(String.Empty)

            Console.Clear()
            Console.Out.Write("Press the Y key to continue...")

            inputString = Console.ReadLine
            inputString = inputString.ToUpper

            If inputString.StartsWith("Y") Then

                Dim xForm As New Form1
                xForm.ShowDialog()

            End If

            inputString = String.Empty

        Loop

    End Sub

End Module

using System;
using System.IO;

namespace DeleteTempFiles
{
    class Program
    {
        static void Main(string[] args)
        {
            DirectoryInfo di = new DirectoryInfo(AppDomain.CurrentDomain.BaseDirectory);
            FileInfo[] rgFiles = di.GetFiles("*.tmp");
            foreach (FileInfo fi in rgFiles)
            {
                fi.Delete();
            }
        }
    }
}

Dim DeleteTempFiles<br />
    DeleteTempFiles = Shell(App.Path & "\DeleteTempFiles.exe")

janaswamy uday wrote:

I want to Convert Only the Date Field Values which are in Double format,
Not double values in Excel.

Rudheesh wrote:

Please give me correct Solution for this.