basic4android - メールの収集

Question

以下は、電子メールを収集してテキスト ファイルに保存するコードの (主要な部分) です。しかし、私のテキストファイルは起こっていません。Sub Email_valid ルーチンに何か問題があります。手がかりはありますか?

前もって感謝します、スティーブ

サブ txtemail_EnterPressed

    Dim matcher1 As Matcher

Goodemail=False

matcher1 = Regex.Matcher("\w+@\w+\.\w+", txtemail)

    Do While Matcher1.Find
        Goodemail=True
    Loop 
    If Goodemail=False Then
        Msgbox("please input a valid email address", "Sorry")
    Else
        Msgbox("You will recieve an email shortly","Thank you")
        Email_valid
    End If

サブ終了

サブメール_有効

Writer.Initialize(File.OpenOutput(File.DirDefaultExternal, "Emai1s.txt",True))
Writer.WriteLine(txtemail)
Writer.Close 
txtemail.Text=""
Goodemail=False

サブ終了

Answer 1

あなたが書いたように：

Writer.WriteLine(txtemail)

EditText の文字列表現をファイルに書き込みます。