VB 弹出子窗口后父窗口不能动,怎么设置,求解,谢谢!
VB 弹出子窗口后父窗口不能动,怎么设置,求解,谢谢!
还有一个问题就是我连接数据库。
dim RsParty As New ADODB.Recordset
RsParty.Open "select * from 党员表 order by 序号",DBCON, adOpenKeyset, adLockOptimistic
RsParty里的姓名有18个,我要怎么一个一个取出来用IF来判断呀,比较说有个TextBox.text = "123"
For j = RsParty.RecordCount To 2 Step -1
if TextBox.text = RsParty-->里18个名字里一一比对出来then
.....
有什么办法呀~~!谢谢了!
[解决办法]
1.你确定两个窗体是父子关系?看看你是不是用了模式窗体,没有代码很难帮你呀……
2.
For j = 0 To RsParty.RecordCount-1
If TextBox.Text = RsParty.Fields("字段名称或者是序号") Then
'添加代码
End If
RsParty.Move(j)
Next
RsParty.MoveFirst
Do Until RsParty.EOF
If TextBox.Text = RsParty.Fields("字段名称或者是序号") Then
'添加代码
End If
RsParty.MoveNext
Loop