Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
“保存”“记住我”按钮?(VB.net)_Vb.net_Visual Studio_Outlook_Outlook Addin - Fatal编程技术网

“保存”“记住我”按钮?(VB.net)

“保存”“记住我”按钮?(VB.net),vb.net,visual-studio,outlook,outlook-addin,Vb.net,Visual Studio,Outlook,Outlook Addin,我正在制作一个电子邮件程序,突然想到用单选按钮设置“记住我”。我在想它可以保存人们在“textbox4”、“textbox5”和“textbox6”中键入的内容。这可能吗 编辑: 我的朋友告诉我这种方法会奏效,但它似乎不起作用: Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged TextBox4.Text = (Text

我正在制作一个电子邮件程序,突然想到用单选按钮设置“记住我”。我在想它可以保存人们在“textbox4”、“textbox5”和“textbox6”中键入的内容。这可能吗

编辑:

我的朋友告诉我这种方法会奏效,但它似乎不起作用:

Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged
    TextBox4.Text = (TextBox4.Text)
    TextBox5.Text = (TextBox5.Text)
    TextBox6.Text = (TextBox6.Text)
End Sub

放弃别人告诉你的,试试这个

使用字符串变量保存此会话的数据,如下所示

    Dim box1 as string
    Dim box2 as string
    Dim box3 as string

Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged

    Call SaveInput() 
    'OR
    Call SaveInputToFile()
    ' OR BOTH

End Sub

Public Sub Saveinput()

   box1 = TextBox4.Text
   box2 = TextBox5.Text
   box3 = TextBox6.Text 

End Sub
Public Class Form1

   Private Sub RadioButton1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles RadioButton1.CheckedChanged

        My.MySettings.Default.TextBox4 = TextBox4.Text
        My.MySettings.Default.TextBox5 = TextBox5.Text
        My.MySettings.Default.TextBox6 = TextBox6.Text
        My.MySettings.Default.Save()

    End Sub

    Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        TextBox4.Text = My.MySettings.Default.TextBox4
        TextBox5.Text = My.MySettings.Default.TextBox5
        TextBox6.Text = My.MySettings.Default.TextBox6
    End Sub
End Class
如果要将其保存到文件中以供其他会话使用

Public Sub SaveinputtoFile()


  Dim writer As System.IO.StreamWriter = New System.IO.StreamWriter("FilePath",  False)

    writer.write(TextBox4.Text)
    writer.writeline()
    writer.write(TextBox5.Text)
    writer.writeline()
    writer.write(TextBox6.Text)
    writer.writeline()
    writer.dispose()

首先,如果您要使用单选按钮,您需要有多个单选按钮,那么可能需要一个复选框。可以使用项目用户设置在应用程序使用之间保留存储。您需要转到“项目设置”选项卡并创建设置,它应该如下所示:

你可以这样实现它

    Dim box1 as string
    Dim box2 as string
    Dim box3 as string

Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged

    Call SaveInput() 
    'OR
    Call SaveInputToFile()
    ' OR BOTH

End Sub

Public Sub Saveinput()

   box1 = TextBox4.Text
   box2 = TextBox5.Text
   box3 = TextBox6.Text 

End Sub
Public Class Form1

   Private Sub RadioButton1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles RadioButton1.CheckedChanged

        My.MySettings.Default.TextBox4 = TextBox4.Text
        My.MySettings.Default.TextBox5 = TextBox5.Text
        My.MySettings.Default.TextBox6 = TextBox6.Text
        My.MySettings.Default.Save()

    End Sub

    Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        TextBox4.Text = My.MySettings.Default.TextBox4
        TextBox5.Text = My.MySettings.Default.TextBox5
        TextBox6.Text = My.MySettings.Default.TextBox6
    End Sub
End Class

是的,这是可能的。给我们看看你有问题的代码你是想在使用应用程序之间还是在当前会话中记住它?很抱歉我的回答太多了