VB_如何使MSHFlexgrid的内容显示到文本框中?
我用MSHFlexgrid显示查询得出的若干条数据。（MSHFlexgrid有固定行1行，没有固定列！）
请问怎样使当我在点击其中的某条数据的时候，该条数据的内容分别显示到Form中对应的文本框当中。
例如,当点击MSHFlexgrid的第4行时：
第4行第3列显示到Text1，
第4行第6列显示到Text2,
第4行第9列显示到Text3.
Private Sub MSHFlexGrid1_Click()
For i = 0 To MSHFlexGrid1.Cols - 1
Text1(i).Text = MSHFlexGrid1.TextMatrix(.Row, i)
Next
End Sub
Leftie起得好早呀
private sub mshflexgrid_click()
with mshflexgrid
text1.text=.textmatrix(.row,2)
text2.text=.textmatrix(.row,5)
text3.text=.textmatrix(.row,8)
end with
end sub
举左手,要为人民币服务!
关注！
text1.text=msflexgrid1.textmatrix(msflexgrid1.row,2)
text2.text=msflexgrid1.textmatrix(msflexgrid1.row,5)
相关问答：
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
......
在vb中怎么判断，插入到数据库中的值是重复的，本人才刚接触VB语言，甚是有好多地方还不懂，还请各位大侠们给出代码，谢谢了呀！！！
插入之前select一下阿。
或者写一个组合SQL插入语句，例如
IF not Exist(
& ......
