VB中listBox的问题！（不是.net）
我想单击listBox的一项 使得txtNub cboType dtpEsp txtReason获得对应数据库里的记录！
Private Sub Form_Load()
Call getCn
Dim SQL As String
SQL = "select * from [异动记录]"
Set rs = New ADODB.Recordset
rs.Open SQL, cn, adOpenKeyset, adLockOptimistic
Do Until rs.EOF
libNub.AddItem rs("学号")
rs.MoveNext
Loop
If Not (rs.EOF And rs.BOF) Then
rs.MoveFirst
showing
End If
End Sub
Private Sub showing()
txtNub = rs("学号")
cboType = rs("类型")
dtpEsp = rs("日期")
txtReason = rs("原因")
End Sub
Private Sub libNub_Click()
Call showing
End Sub
出现什么问题？......
我写的这个单击事件没反应
Private Sub libNub_Click()
Call showing
End Sub
谢谢VB老鸟，我刚才试了：rs.Find "学号='" & libNub.Text & "'", , , adBookmarkFirst
其实应该把它放在Private Sub libNub_Click()
rs.Find "
相关问答：
希望大家能够帮我下.感谢了..
源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html
转为VB.NET源码.
小弟完全是新手 不懂的说.麻烦各位帮忙一下
我的EMAIL是:4452 ......
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
DIM ds as new DataSet
我这样声明 怎老是报 用户定义类型未定义？ 这个需要引用什么吗？？
前提是DataSet对象要存在,就是对象浏览器中有它.没有就要引用.
dataset是ADO.NET对象
如果你用的是vb.net，那么在� ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
