正文
数据传递VB.NET 数据传递与数据回传
小程序：扫一扫查出行【扫一扫了解最新限行尾号】
复制小程序
vb.net怎么在两个sub间传递数据？
方法一: 通过WINSOCK传 方法二: 程序一生成一文件,然后程序二读取 方法三: 利用数据库存取这个是调用自制DLL示例,至于用ActiveX EXE,数据传递VB.NET你可以参考一下,关键是留接口给另一程序 VB制作标准DLL文件并调用该文件数据传递VB.NET的示例 1、建立一个ActiveX DLL工程，这时工程中将包括一个类模块Class1。 2、在ActiveX DLL工程中添加一个Form。 3、在类模块添加如下函数数据传递VB.NET： Public Function ShowMyForm(s As String) Form1.Caption = s Form1.Show vbModal End Function 4、将工程编译为DLL。 调用时: 1、建立一个标准EXE，在菜单“工程|引用”中选择前面编译的DLL。 2、使用如下代码调用： Private Sub Form_Click() Dim cls As New Class1 cls.ShowMyForm("Hello") End Sub
vb.net里一个子程序可以用另一个子程序中的数据吗
可以使用数据传递VB.NET，因为两个子程序数据传递VB.NET的数据都是互通的数据传递VB.NET，而且可以相互的补充，数据传递VB.NET你用数据传递VB.NET了另外一个子程序的数据也不影响你原本的子程序，这都是相互的
VB.net 两个窗体之间传递参数
新窗体中写
构造函数
数据传递VB.NET，然后调用。
比如你要调用的新窗体是From1.cs这个窗体数据传递VB.NET，
public
Form1(要传入的参数)
{
//把传入的参数传入窗体中
//执行窗体标准内容
}
然后在需要调用的地方调用
Form1
f
=
new
Form1(传出的参数);
'--------Form1--------
Dim
f2
As
Form2
Private
Sub
Command1_Click()
Set
f2
=
New
Form2
f2.Show
vbModal
End
Sub
'--------Form1
End--------
'--------Form2--------
Dim
WithEvents
f3
As
Form3
Private
Sub
Command1_Click()
Set
f3
=
New
Form3
f3.Show
End
Sub
Public
Sub
f3_f2W()
Me.Command1.Caption
=
"f2W"
End
Sub
'--------Form2
End--------
'--------Form3--------
Public
Event
f2W()
Private
Sub
Command1_Click()
RaiseEvent
f2W
End
Sub
'--------Form3
End--------
f.Show();
如此就能实现调用了。
vb.net 如何传递类参数
线程结束后利用委托生成事件返回数据传递VB.NET，线程应用包括传入和传出参数。
Public Delegate Sub ThreadCallback(value As ThreadResult)
Public Class Form1
Private WithEvents _th_1 As Thread_1
Protected Overrides Sub OnLoad(e As System.EventArgs)
Dim value As ThreadObject
value.Index = 1
Me._th_1 = New Thread_1(Me)
Me._th_1.Run(value)
MyBase.OnLoad(e)
End Sub
Private Sub Thread_1_End(sender As Object, e As ThreadEventArgs) Handles _th_1.ThreadEnd
Me.TextBox1.Text = e.Result.Text
End Sub
End Class
Public Class Thread_1
Public Event ThreadEnd(sender As Object, e As ThreadEventArgs)
Private _control As Control
Sub New(control As Control)
Me._control = control
End Sub
Public Sub Run(value As Object)
Dim th As New Threading.Thread(AddressOf ThreadProc)
th.Start(value)
End Sub
Private Sub ThreadProc(obj As Object)
Dim value As ThreadObject = CType(obj, ThreadObject)
Dim result As ThreadResult = Nothing
If value.Index = 1 Then result.Text = "测试"
Dim callback As New ThreadCallback(AddressOf ThreadInvoke)
_control.Invoke(callback, result)
End Sub
Private Sub ThreadInvoke(value As ThreadResult)
RaiseEvent ThreadEnd(Me, New ThreadEventArgs(value))
End Sub
End Class
Public Structure ThreadObject
Public Index As Integer
'Public Rect As Rectangle
End Structure
Public Structure ThreadResult
Public Text As String
'Public Rect As Rectangle
End Structure
Public Class ThreadEventArgs
Inherits System.EventArgs
Private _result As ThreadResult
Public ReadOnly Property Result As ThreadResult
Get
Return _result
End Get
End Property
Sub New(value As ThreadResult)
Me._result = value
End Sub
End Class
vb.net中怎样数据传递？
分类: 电脑/网络 程序设计 其他编程语言
问题描述:
问个简单的问题怎样在form2中运用form1中的变量？比如，我在form1中声明了一个变量a 也赋予了一个值，也声明为public了，可在form2中，我用“label1.text=form1.a”却总是显示为0.望高手给我这菜鸟解个惑！
解析:
form1要有一个实例才行。
dim f1 as form1
label1.text=f1.a
关于VB.NET中-引用类型参数传递的问题
1.对象变量与对象本身是不同数据传递VB.NET的，对象变量代表数据传递VB.NET了对象真实数据在内存中的地址.
打个比方，“对象变量”就象你家的地址，“对象本身”就象你家。
你不能说你家的地址(xx路xx号xx房)就是你家，但是可以通过这个地址而找到你家。
2.传值的参数本身是被复制一份的，但这并不意味着它所代表的对象也被复制一份.
有如下一个函数:
Public
Function
Do_delete(ByVal
ps_usr_id
As
String)
As
Boolean
你在调用时可能这样调用:
dim
strID
as
string
strID
=
"kknd001"
if
Do_delete(strID)
then.....
当程序执行到Do_delete函数体里面时ps_usr_id变量其实是按照StrID的值而复制的一个变量。
关于数据传递VB.NET和数据传递与数据回传的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。
