Substuir texto em uma string
str = string.Replace("localizar", "substuir por")
Eventos form
activate ANTES do load
shown DEPOIS do load
shown DEPOIS do load
Copiar string para área de transferência
Dim str1 As String = ListBox1.Text.ToString
Clipboard.Clear() ' limpa o ClibBoard
Clipboard.SetText(str1) ' Poe o texto no ClipBoard
Clipboard.Clear() ' limpa o ClibBoard
Clipboard.SetText(str1) ' Poe o texto no ClipBoard
Carregar imagem botão via código
btn.BackgroundImageLayout = ImageLayout.Stretch
btn.BackgroundImage = Image.FromFile(”CaminhoImagem”)
ou
btn.BackgroundImage = Nothing
btn.BackgroundImage = Image.FromFile(”CaminhoImagem”)
ou
btn.BackgroundImage = Nothing
caixa de diálogo pra abrir arquivo
OpenFileDialog - link
messagebox com pergunta
If MessageBox.Show("Pergunta "Title", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then
datas para string e formatos
txtNome.Text = Now.ToString("yyyyMMdd HHmmss")
PAUSA NA Execução do programa
'Pausa em milessegundos 1s = 1000
System.Threading.Thread.Sleep(4500)
System.Threading.Thread.Sleep(4500)
Clique aqui para editar.