Ajuda Com TexBox - Visual basic

Question

Ola,

Quero saber como que eu faço para que quando eu Clico em button no texbox aparece os arquivos que foi deletado da pasta Ou o que foi Instalado.

Exemplo:

Musicas 100% Deletado

Videos 100% Deletado

Arquivos detetado com Sucesso 100%

                                                              Agradeço desde já a atenção.

Answer 1

Desculpe mais detalhe mais o que precisa, a principio o que entendi foi so em clicar em um botao para aparecer um texto.

Detalhe o que você quer fazer alem de clicar em um botao, que informação quer pegar e de onde

Answer 2

Meu programa serve só para apagar os registro de duas pasta (Prefetch e Temp).

Eu quero quando eu aperta o botão Prefetch ou Temp,No texbox apareça os arquivos que foi deletado.

Exemplo:

Player Musica 100% Deletado

Google Chrome 100% Deletado

Arquivos detetado com Sucesso 100%

Answer 3

Ok melhorou um pouco, preciso saber que método utiliza para deletar os arquivos para saber se dá para identificar o que deleta,fazendo isso saberei quais arquivos deletados e se deletou todos os arquivos encontrados.

Answer 4

Ok melhorou um pouco, preciso saber que método utiliza para deletar os arquivos para saber se dá para identificar o que deleta,fazendo isso saberei quais arquivos deletados e se deletou todos os arquivos encontrados.

Você quer fazer um tipo de CCleaner

Answer 5

Isso tipo CCleaner.

Esse e o código que eu uso para deletar os arquivos das pasta.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try

            Dim arrStr As String() = {}

            arrStr = System.IO.Directory.GetFiles("C:\Users\Felipi\AppData\Local\Temp", "*.*")



            For i As Integer = 0 To arrStr.Length - 1

                Try

                    System.IO.File.Delete(arrStr(i))

                Catch ExIO As Exception

                    Debug.Print(ExIO.Message)

                End Try

            Next i



        Catch ExIO As IOException

            MsgBox(ExIO.Message)

Answer 6

Seria mais ou menos isso aqui:

Imports System.IO

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Try

            Dim arrStr As String() = {}

            arrStr = System.IO.Directory.GetFiles("C:\Users\nome_usuario\AppData\Local\Temp", "*.*")


            ListBox1.Items.Clear()
            For i As Integer = 0 To arrStr.Length - 1

                Try

                    ListBox1.Items.Add(arrStr(i))

                    If i <> arrStr.Length - 1 Then
                        System.IO.File.Delete(arrStr(i))

                    ElseIf ListBox1.Items.Count - 1 = arrStr.Length - 1 Then
                        'MessageBox.Show("Arquivos Deletados = " & i)
                        MessageBox.Show("Arquivos Deletados 100%")
                        '    MessageBox.Show(String.Format("{0} % arquivos Deletados com sucesso!", Convert.ToInt32(i / 100).ToString()))
                        End If
                Catch ExIO As Exception

                    Debug.Print(ExIO.Message)

                End Try

            Next i



        Catch ExIO As IOException
            MsgBox(ExIO.Message)

        End Try


    End Sub
End Class

OBS: Alguns arquivos do sistema não serão deletados ,mais também não apresentam erros.

Answer 7

Caro Mr.GMSOFT,agradeço pela ajuda,Funciono perfeitamente.