Vb.net 基本VB网络-使表单1上的按钮与表单2上的按钮相同?

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: 表格1: 不起作用的行是
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