ramirobf

Eu uso o seguinte código para copiar os arquivos: Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click My.Computer.FileSystem.CopyDirectory("C:\Teste", "C:\Documents and Settings\User") End Sub Como eu faço para copiar a pasta (Teste) para pasta (User) e zipar esta pasta? (Eu tenho o Winrar e Winzip instalados no pc) Obrigado.

Private Sub botaosim_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt.Click labelinfo.Text = "Aguarde..." image1.Visible = True botaosim.Visible = False botaonao.Text = "Cancelar" botaonao.Select() progress.Value = 10 progress.Value = 20 My.Computer.FileSystem.CopyDirectory("C:\Documents and Settings\Teste", "C:\Documents and Settings\Teste1", True) progress.Value = 60 My.Computer.FileSystem.CopyDirectory("C:\Documents and Settings\Teste2", "C:\Documents and Settings\Teste2", True) progress.Value = 100 image1.Visible = False labelinfo.Text = "Concluido!" image2.Visible = True botaonao.Text = "Fechar" End Sub Eu queria que meu código fosse executado na ordem que foi escrito, porém da errado, a barra de progresso sempre é executada antes, a label não muda o texto no inicio e as imagens só aparecem no fim. Existe algum meio para executar o código exatamente na ordem que foi escrito? Obrigado!

No Microsoft Visual Basic 2008 Express Edition eu uso: Dim Form1 As New Form2() Form1.Show() Me.Close() Coloque no evento do botão que vai abrir o form2. Espero ter ajudado!