Vb.net 基本VB网络-使表单1上的按钮与表单2上的按钮相同?
这是我得到的代码: 关于FormNew: 表格1: 不起作用的行是Vb.net 基本VB网络-使表单1上的按钮与表单2上的按钮相同?,vb.net,button,Vb.net,Button,这是我得到的代码: 关于FormNew: 表格1: 不起作用的行是FormNew.Button1。单击。我该如何解决这个问题?我只想按下表格1上的按钮,让它觉得我在按FormNew上的按钮。这样,当我在Form1上单击“保存”时,我可以保存在FormNew上键入的文本,而不是单击FormNew上的“保存”按钮。Replace FormNew.Button1.Click() 与 然后它就可以工作了。您可以通过在模块中创建一个函数来使用如下内容 public Sub Button1_Click(
FormNew.Button1。单击。我该如何解决这个问题?我只想按下表格1上的按钮,让它觉得我在按FormNew上的按钮。这样,当我在Form1上单击“保存”时,我可以保存在FormNew上键入的文本,而不是单击FormNew上的“保存”按钮。Replace
FormNew.Button1.Click()
与
然后它就可以工作了。您可以通过在模块中创建一个函数来使用如下内容
public Sub Button1_Click()
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim writer As New StreamWriter(SaveFileDialog1.FileName)
writer.Write(TextBox1.Text)
writer.Close()
End If
End Sub
然后,您可以从应用程序中的任何位置调用该函数
Public Class Form1
Private Sub SaveToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SaveToolStripMenuItem.Click
Button1_Click()
End Sub
End Class
以新的形式
Public Class FormNew
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Button1_Click()
End Sub
End Class
“私人”是指私人。用户如何知道在Form2上选择菜单选项将在Form1上保存文本框的内容?如果当时没有显示另一个表单,或者更糟的是,没有实例化,该怎么办?这是一个非常小的程序,只有一个菜单和带有save on itTry的文本框:FormNew.Button1.PerformClick()
public Sub Button1_Click()
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim writer As New StreamWriter(SaveFileDialog1.FileName)
writer.Write(TextBox1.Text)
writer.Close()
End If
End Sub
Public Class Form1
Private Sub SaveToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SaveToolStripMenuItem.Click
Button1_Click()
End Sub
End Class
Public Class FormNew
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Button1_Click()
End Sub
End Class