VB的textbox中怎样显示一个变量的值
定义一个公共变量a在第一个窗体加载时候给a赋值要在第二个窗体中把a的值显示在Text1.text中,请高手帮忙呀谢了...
定义一个公共变量a 在第一个窗体加载时候给a赋值 要在第二个窗体中把a的值显示在Text1.text中,请高手帮忙呀 谢了
展开
4个回答
展开全部
说下思路:
首先创建一个工程,窗体form1.
在资源管理器中新建一个窗体,名赞为form2.
再创建一个模块,不要问我如何创建.
在模块里写
public a as string
-------------------------------------------
在form1上添加一个按钮,为了打开form2窗体
在commmand1_click写入以下代码
form2.show
--------------------------------------------
在form1中的Form_Load窗体加载事件里面为变量赋值
a = "我是张某人"
在form2画一个textbox
在Form_Load里面写
me.text1.text = a
----------------------------------------------
完整代码:
form1:
Private Sub Command1_Click()
Form2.Show
End Sub
Private Sub Form_Load()
a = "111"
End Sub
form2:
Private Sub Form_Load()
Me.Text1.Text = a
End Sub
模块:
Public a As String
'我的办法也不见得是最好的,但是实现了你要求的功能.
首先创建一个工程,窗体form1.
在资源管理器中新建一个窗体,名赞为form2.
再创建一个模块,不要问我如何创建.
在模块里写
public a as string
-------------------------------------------
在form1上添加一个按钮,为了打开form2窗体
在commmand1_click写入以下代码
form2.show
--------------------------------------------
在form1中的Form_Load窗体加载事件里面为变量赋值
a = "我是张某人"
在form2画一个textbox
在Form_Load里面写
me.text1.text = a
----------------------------------------------
完整代码:
form1:
Private Sub Command1_Click()
Form2.Show
End Sub
Private Sub Form_Load()
a = "111"
End Sub
form2:
Private Sub Form_Load()
Me.Text1.Text = a
End Sub
模块:
Public a As String
'我的办法也不见得是最好的,但是实现了你要求的功能.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐于2018-05-04 · 知道合伙人互联网行家
关注
展开全部
应该是winform。
直接在B中声明public string 属性。
调用时
B b = new B();
b.Value = "...";
b.ShowDialog();
直接在B中声明public string 属性。
调用时
B b = new B();
b.Value = "...";
b.ShowDialog();
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Form1 的代码:
Option Explicit
Public a As String
Private Sub Form_Load()
a = "你好,问题解决了吗?"
End Sub
Private Sub Command1_Click()
Form2.Show 1, Me
End Sub
-------------------------------------
Form2 的代码:
Option Explicit
Private Sub Form_Load()
With Form1
Text1.Text = .a
End With
End Sub
Option Explicit
Public a As String
Private Sub Form_Load()
a = "你好,问题解决了吗?"
End Sub
Private Sub Command1_Click()
Form2.Show 1, Me
End Sub
-------------------------------------
Form2 的代码:
Option Explicit
Private Sub Form_Load()
With Form1
Text1.Text = .a
End With
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
正常调用啊
Text1.text = a
有什么问题么
Text1.text = a
有什么问题么
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询