VB搜索代码

来源：百度知道 编辑：UC知道 时间：2024/06/08 18:35:53
VB在窗口Form1里面加入一个那个写字框，然后和一个按钮，然后在Form2里面输入同学的信息（如XX）怎么才能在第一个窗口的写字框里面输入这个XX然后就弹出这个同学的信息？

逻辑有点乱，说清楚点好吗？

不知我理解的对不对，你首先建一个标准的exe工程，再添加一个窗体，在FORM1上添加一个 text1和一个command1，在form2上添加一个text1.
form1的代码为

Option Explicit
Private Sub Form_Load()
Form2.Show
End Sub

form2的代码为

Option Explicit

Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Form1.Text1.Text = Form2.Text1.Text
End Sub

我不明白的是你想在什么时候弹出对话框？是输入完还是点击command1呢?
要是输入完那就麻烦一些，需要用特定的字符或特定的长度先判断是否完成输入，再弹出对话框。
例如如果在form2的text1里输入回车,就表示用户输入完成，弹出对话框
在form2里的代码改为

Option Explicit
Private i As Long
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
i = i + 1
Form1.Text1.Text = Form2.Text1.Text
If KeyCode = 13 And i Mod 2 <> 0 Then
MsgBox Text1.Text
End If
End Sub

如果是点击command1那么在form1里添加如下代码

Private Sub Command1_Click()
MsgBox Text1.Text
End Sub

用数据库？