Как добавить функцию Enter

Я создал программу, которая, если поместить в нее текст, будет сохранена в текстовом файле в Visual Basic 2010 Express, но я застрял на чем-то.

Как поставить, если я нажму на ENTERто, что он тоже будет сохранен?

Imports System.IO

Public Class Form1

Dim a As StreamReader
Dim b As String
Dim c As String = "C:tempnotedb.txt"

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If Not File.Exists(c) Then
        Dim d As FileStream
        d = File.Create(c)
        d.Close()
    End If
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    If TextBox1.Text = Nothing Then
        MsgBox("Enter a note to be saved!")
    Else
        File.AppendAllText(c, TextBox1.Text & vbCrLf)
        TextBox1.Text = ""
        MsgBox("Note Saved!", MsgBoxStyle.Information, "Saved")
        ReadFile()
    End If
End Sub

Private Sub ReadFile()
    Try
        ComboBox1.Items.Clear()
        a = File.OpenText(c)
        While a.Peek <> -1
            b = a.ReadLine()
            ComboBox1.Items.Add(b)
        End While
        a.Close()
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub

End Class

1 ответ

  1. Я предполагаю, что Вы имеете в виду нажатие Enter, когда фокус находится в текстовом поле…
    TextBox1 в вашем случае!

    Прежде всего, вам нужно создать событие нажатия клавиши против этого текстового поля:
    1)вернитесь в Редактор форм.
    2) Нажмите на TextBox1.
    3) Над на сетке свойств нажмите значок молнии это покажет метку событий, если вы выделите над ним.
    4) теперь дважды нажмите либо клавишу вниз, клавишу вверх или нажмите клавишу событие.
    5) это приведет вас к редактору кода снова, и вы должны быть внутри одного из вышеуказанных событий для вашего TextBox1.
    Теперь вы должны определить, какой ключ пользователь нажимает!
    Есть)
    If e.KeyChar = Keys.Enter Then
    'Place your code here to save.
    End If

    Также просто некоторые советуют об этом вы найдете, что делать некоторые reasearch перед тем, как задать вопрос будет в вашу пользу! Например, быстрый поиск по известной поисковой системе, заканчивающийся «ogle» с простым вопросом, таким как «VB.Net Detect Enter Key» ответит на ваш вопрос!

    Надеюсь, что выше помогает пожалуйста, отметьте это как ответ, если он решает ваш вопрос, чтобы помочь другим в поиске решения быстро!

    Лука