蔡鸟求救,谢谢大哥le

pipididi 2003-08-22 05:52:13
有两个窗体f1,f2
f1上有个button1,f2上一个textbox
怎么才能让button1.text=textbox.text,并且跟踪显示
谢谢
...全文
67 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
pipididi 2003-08-23
  • 打赏
  • 举报
回复
谢谢各位了
sin6007 2003-08-22
  • 打赏
  • 举报
回复
要想frm1上的button1的名字与frm2上的textbox1.text上的时时一样就要先启动frm2
把frm2设置为启动项
窗体2
Load事件
dim f1 as new frm1
f1.show
再用frm2的textbox1_textchanged事件
f1.button1.text=textbox1.text

或者先启动模块,把模块设置为启动项
再模块中写入
public f1 as new frm1
sub Main()
Application.Run(f1)
end sub

在frm1的Load事件写入
dim f2 as new frm2
f2.show

在frm2窗体的textbox1_textchanged事件
写入
f1.button1.text=textbox1.text



menuvb 2003-08-22
  • 打赏
  • 举报
回复


dim f as new f2
button1.text=f.textbox.text'两个窗体间进行数据传输
yufenfeila 2003-08-22
  • 打赏
  • 举报
回复
首先程序从f2启动

f1中写入代码

Public WriteOnly Property MyText()
Set(ByVal Value)
Button1.Text = Value
End Set
End Property


在f2的代码中,Inherits System.Windows.Forms.Form下面写入

Dim Myf1 As f1


修改f2_Load

Private Sub f2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
Myf1 = New f1
Myf1.Show()
End Sub


f2中加入代码

Private Sub TextBox_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Try
f1.MyText = TextBox.Text
Catch
End Try
End Sub
panyee 2003-08-22
  • 打赏
  • 举报
回复
form2 f2 = new form2(this);//实例化Form2时, 把Form1的对象一起带过去
public form2(form1 _f1){ //实例化Form2时, 会取得Form1


... textbox_textchange(...) {
f1.button1.text = this.textbox.text;

//Form2中textbox的TextChage事件中, 把Form1的按钮文本改掉
}
ZQY801105 2003-08-22
  • 打赏
  • 举报
回复
不太明白你的意思!详细点!
ArLi2003 2003-08-22
  • 打赏
  • 举报
回复
//form1

form2 f2 = new form2(this);
f2.show();

//form2

private readonly form1 f1 = null;
public form2(form1 _f1){
f1 = _f1;
}

... textbox_textchange(...) {
f1.button1.text = this.textbox.text;
}

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧