我用mshflexgrid控件显示数据库里面的内容,但我想在点击mshflexgrid控件里的内容时,文本框显示对应的内容。
如mshflexgrid控件有三列,分别为a,b,c。文本框有三个,为A,B,C。
现在我就是想当我任意点击a、b、c时,文本框A,B,C分别显示mshflexgrid控件对应的内容。
请帮忙
如mshflexgrid控件有三列,分别为a,b,c。文本框有三个,为A,B,C。
现在我就是想当我任意点击a、b、c时,文本框A,B,C分别显示mshflexgrid控件对应的内容。
请帮忙
解决方案 »
- 小弟想用VB开发一个数据库,不知道各位大虾有没有相关的例子?
- 一个文本文件,只有一列,如何才能将他的内容,每11行取出,变成另一个SQL 表的一个记录的11列???
- 怎樣從richtext中讀取指定行文本!急,急(問題解決馬上結貼,分不夠再加!)
- 在线等待--问题:这么连接远程数据库(能稳定一些的)例子
- 小弟一直想问问:关于三层结构的问题.有关C/S模式的一些疑问和想法?
- SQL Server7默认语言如何改成中文??
- 一个复杂的排列组合问题等着你来解决
- 如何把一个位图数组显示在Picture控件里?
- to zyl910(910:分儿,我来了!) 进来复贴给分(a123c)
- adodc的事务处理
- 录音问题
- FSO复制文件时遇到的错误
Public Conn As New ADODB.ConnectionPrivate Sub Form_Load()
Dim strConn As String
strConn = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=pubs;Data Source=ANYA"
Conn.CursorLocation = adUseClient
Conn.Open strConn
If Rs.State <> adStateClosed Then Rs.Close
Rs.Open "Select * from Jobs", Conn, adOpenStatic, adLockOptimistic
Set Me.MSHFlexGrid1.DataSource = RsEnd SubPrivate Sub MSHFlexGrid1_DblClick()
With Me.MSHFlexGrid1
.Col = 1
Text1.Text = .Text
.Col = 2
Text2.Text = .Text
.Col = 3
Text3.Text = .Text
End With
End Sub