Enviar dialog box

[arrelialp]

Viva,

Gostaria de enviar uma caixa de diálogo (dialog box), após o utilizador carregar num button.

Nesta caixa de diálogo, que aparecerá no ecrã, o utilizador terá que escrever um texto, carregando de seguida em Gravar, ou Cancelar.

Obrigado desde já.

[José Lopes]

Deves querer referir-te a uma inputbox.....

Se bem que as opções que tens não são propriamente gravar e cancelar...mas vai dar ao mesmo..

podes ver aqui como funciona...

http://msdn.microsoft.com/pt-br/library/6z0ak68w(v=vs.90).aspx

[arrelialp]

Ok,

Está feito. Deixo o código para quem precisar:

Private Sub okButton_Clik(ByVal sender As Object, _ ByVal e As EventArgs) Handles okButton.Click

        Dim message, title, defaultValue As String

        Dim myValue As Object

         message = "Entre um nome para a tabela:"

         title = "Nome da Tabela:"

        defaultValue = "Teste"   
  
        myValue = InputBox(message, title, defaultValue)

        If myValue Is "" Then myValue = defaultValue
End Sub

Obrigado pela ajuda 🙂