Question

VB中添加代码时，想要实现在form1中输入查询条件，在form2中显示要查找的所有内容，请问如何添加代码？

Answer 1

在form1和form2中加入一个TextBox 新建一个模块 申野卖明一个全局变量Result 在form1TextBox里面让脊岁输入查询条件 然后查询出结果通过复制给模块变量Result 再使用form2.show语句显坦睁示form2 在form2中的Load过程里加入赋值语句如Text1.text = Result 就行了

Answer 2

数据库编程吗？
你可以设置一个全局变量
把FORM1的查配纤庆培握询条件赋值到这个全局变量 再到form2用这个条件建立连竖差接

Answer 3

附代码
在类模块中定义全局变量巧旅销
Public sql As Str
在Form1中
Dim strsql As string
strsql=这里是由form1中条件sql和form2中需求产生的搜索语句，假设为
strsql="select * from people where nameof='" & sql & "'"
然后在form2中
//假设你已经定义了变量res和conn分别作为记录集和连接
Set res=New ADODB.RecordSet
res.Open strsql,conn,3,1
接下来聪明的提问者孝游你一镇敬定会的

Answer 4

把 Ipnum = 0 + Num改成Ipnum = 0 + Val(Num)，再试试看。