[N]ARUTO_

Memory Cleaner : Programa para diminuir consumo de memória dos programas File name Memory Cleaner.exe File size 335.5 KB Last analysis 2018-08-13 23:23:00 UTC SCAN: ( [Hidden Content] ) SRC : ( [Hidden Content] ) PROGRAMA EXE : ( [Hidden Content] ) VIDEO : ( [Hidden Content] )

[spoiler=Direto do programa] [spoiler=Direto do programa] Public Class Form1 Private Script As New List(Of String) Sub New() InitializeComponent() Control.CheckForIllegalCrossThreadCalls = False Label1.Text = Nothing Script.AddRange({"Prepare-se para o enem isso irá poder te ajudar, tal tal tal tal", "Aqui vai algumas dicas que poderão ser úteis", "E assim continuaria no looping, até o fim do meu texto."}) Dim X As New Threading.Thread(AddressOf ShowText) X.Start() End Sub Private Sub ShowText() For P = 0 To Script.Count - 1 Label1.Text += Script.Item(P) & vbNewLine Threading.Thread.Sleep(5000) Next Label1.Text += "- Texto completo -" End Sub End Class [spoiler=Usando texto de um arquivo txt] [spoiler=Usando texto de um arquivo txt] Public Class Form1 Sub New() InitializeComponent() Control.CheckForIllegalCrossThreadCalls = False Label1.Text = Nothing Dim X As New Threading.Thread(AddressOf ShowText) X.Start() End Sub Private Sub ShowText() Dim F As IO.StreamReader = New IO.StreamReader("C:\Users\???\Desktop\Script.txt") Do While Not F.EndOfStream Label1.Text += F.ReadLine & vbNewLine Threading.Thread.Sleep(5000) Loop End Sub End Class

Sistema de login com trial sem bug de data Site para pegar a data correta: [Hidden Content] Site para criar ftp : [Hidden Content] 'Login 'Criar conta 'Acabou vip 'Video [Hidden Content] 'Scan [Hidden Content] 'Download [Hidden Content]

deixou o timer ativado com interval 1? rs

Tenta usar esse codigo: [spoiler=Codigo] Sub New() InitializeComponent() Process.Start("Aqui voce coloca o local do programa que irá abrir // exemplo o local do chrome") End Sub Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick Dim X() As Process = Process.GetProcessesByName("chrome") If Not X.Count > 0 Then 'Se o chrome fechar seu programa tmb fecha End End If End Sub

tente utilizar o Select Case. exemplo: Select Case ListBox1.SelectedIndex Case 0 'aqui coloca o codigo para injetar a dll do csgo MsgBox("csgo") Case 1 'aqui coloca o codigo para injetar a dll do Team Fortress 2 MsgBox("Team Fortress 2") End Select

nem webbrowser e nem api foi usando "regex" fiz um post mostrando como "usa". [Hidden Content]

Todos programa que estou postando aqui foi eu q fiz

Programa para ver videos do youtube Ao abrir: Em alta: Inicio: Playlist: [Playlist reproduz todos os videos] Pesquisa: Historico: Video: [Hidden Content] Scan: [Hidden Content] Download: [Hidden Content]

Site usado : RedeCanais Programa feito para assistir filmes (HD) sem precisar abrir o navegador Video (Antigo) Esse video é antigo pois o programa tinha parado de funcionar ( o programa é o da print não do video ) video é uma versão "antiga" do programa Scan [Hidden Content] EDIT: RedeCanais Series (EM HD) SCAN: [Hidden Content] DOWNLOAD SRC: [HIDE][Hidden Content]]