CODIGO PARA CRIAR SISTEMA COM SERIAL - 01

Antes de tudo após criado os 2 formulários 

1º Form - Name: frmAtivar

2º Form - Name: frmPrincipal

Faça as seguintes configurações...

Depois

1 Botão - Text: Ativar

1 TextBox - Name: txtSerial

Clique 2 vezes no botão Ativar e cole o código abaixo:

'Serial para testar é: 0000-0000-0000-0000 para mudar o serial basta alterar esta parte do código

If txtSerial.Text = "0000-0000-0000-0000" Then

My.Settings.Ativado = "Sim"

My.Settings.Save()

My.Settings.Reload()

frmPrincipal.Show

Me.Close()

Else

MsgBox ("Serial Inválido")

Me.Close()

End If

Clique 2 vezes no Form do serial (frmAtivar) e cole o código abaixo:

'Esta parte do código é para fazer o formulário do serial (frmAtivar) aparecer somente uma vez depois de ativado. 

If My.Settings.Ativado = "Sim" Then

frmPrincipal.Show()

Me.Close()

End If