189 8069 5689
创建结构体，用结构体传输数据：
10年的惠阳网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。成都全网营销的优势是能够根据用户设备显示端的尺寸不同，自动调整惠阳建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联从事“惠阳网站设计”,“惠阳网站推广”以来，每个客户项目都认真落实执行。
Public Structure InValue
Public P As 类型
Public Q As 类型
'其他值定义
End Structure
Public Structure OutValue
Public A() As 类型
Public B As 类型
'其他值定义
End Structure
把Dll内的方法改为：
Public Function calculation(value As InValue) As OutValue
Dim [out] As New OutValue
'处理函数
Return [out]
End Function
引用：
dim ffun as new pla.tua
dim inval as invalue
in.** = **
dim outp as outvalue = ffun.calculation(inval)
如果楼主熟悉VB6，可以直接在项目中添加ADODB的Com引用，这样你就可以像VB6那样操作数据库了！
另外
.NET
Framework中连接数据库要用到ADO.NET。如果要操作Access数据库，要用到System.Data.OleDb命名空间下的许多类。
比如按楼主所说，“我想在textbox1中显示表一中【一些数据】字段下的第一个内容”：
'首先导入命名空间
Imports
System.Data
Imports
System.Data.OleDb
'然后在某一个事件处理程序中写：
Dim
conn
As
New
OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data
Source=数据库.accdb;Jet
OLEDB:Database
Password=MyDbPassword")
Dim
command
As
New
OleDbCommand("Select
*
From
数据表",
conn)
conn.Open()
'打开数据库连接
Dim
reader
As
OleDbDataReader
=
command.ExecuteReader()
'执行SQL语句，返回OleDbDataReader
对象
Do
While
reader.Read()
'读取一条数据
textbox1.Text
+=
reader("一些数据")
VbCrLf
Loop
reader.Close()
'关闭OleDbDataReader
conn.Close()
'关闭连接
我想了两种思路，winform没有findControl，只有个this.Controls.Contains("textBox1")，因此除了遍历没办法了。。。
思路1：遍历Controls，具体你自己完善下，
if(this.Controls.Count0)
{
foreach(Control c in this.Controls)
if(c.GetTepy==Tepyof(TextBox))
string str += ((TextBox)c).Text;
}