Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Wanet Telecoms Ltd on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

2005 Express to VB6

Status
Not open for further replies.

Jhtexas

Technical User
Jan 4, 2005
59
US
I wrote a small program in 2005 Express and found out that it will not run on the Win95 OS. I was wondering if someone could show an example of what the code would look like if written in VB6?

Thanks in advance,
Jim

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.Diagnostics.Process.Start("C:\Program Files\IDM Computer Solutions\UltraEdit-32\uedit32.exe")
Application.DoEvents() ' Process outstanding messages before sleeping
System.Threading.Thread.Sleep(6000)
Application.Exit()
End Sub

Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
My.Computer.FileSystem.CopyFile("C:\TestFolder\test.f01", _
"C:\TestFolder\test.dat", Microsoft.VisualBasic.FileIO.UIOption.OnlyErrorDialogs, FileIO.UICancelOption.DoNothing)

End Sub

Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
My.Computer.FileSystem.CopyFile("C:\TestFolder\test.f00", _
"C:\TestFolder\test.dat", Microsoft.VisualBasic.FileIO.UIOption.OnlyErrorDialogs, FileIO.UICancelOption.DoNothing)
End Sub
End Class
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top