查询如何显示在MSFlexGrid网格控件中的问题。救急！

[kingpeacock]

我用了六个单选按钮（option)和一个checkbox,其中六个option分成两组，三个为一组，用于查询条件的控件。我想让根据不同的复合查询条件，查询出来的的结果显示在网格控件中。
条件结构是：
if option1.value=true then
if check1.value=1 and option4.value=true then
sql="查询语句1"
elseif check1.value=1 and option5.value=ture hen
sql="查询语句2"
elseif check1.value=1 and option6.value=ture hen
sql="查询语句3"
end if
elseif option2.value=true then
if check1.value=1 and option4.value=true then
sql="查询语句4"
elseif check1.value=1 and option5.value=ture hen
sql="查询语句5"
elseif check1.value=1 and option6.value=ture hen
sql="查询语句6"
end if
elseif option3.value=true then
if check1.value=1 and option4.value=true then
sql="查询语句7"
elseif check1.value=1 and option5.value=ture hen
sql="查询语句8"
elseif check1.value=1 and option6.value=ture hen
sql="查询语句9"
end if
同时：
Private Sub Form_Load()
Option4.Enabled = False
Option5.Enabled = False
Option6.Enabled = False
Combo5.Enabled = False
Combo6.Enabled = False
Combo7.Enabled = False
End Sub

Private Sub Check1_Click()
Option4.Enabled = Not Option4.Enabled
Option5.Enabled = Not Option5.Enabled
Option6.Enabled = Not Option6.Enabled
Combo5.Enabled = Not Combo5.Enabled
Combo6.Enabled = Not Combo6.Enabled
Combo7.Enabled = Not Combo7.Enabled
Combo8.Enabled = Not Combo8.Enabled
Combo8.Enabled = False
字段较多。

[kingpeacock]

up

[clark_rain]

dim cnn as new adodb.cennection
dim rs as new adodb.recordset
cnn.cennectionstring="....."
cnn.open
rs.open sql,cnn,4,2,adcmdtext
set mshflexgrid.recordset=rs

[talent303]

这些程序都对啊,,不过好像少了一个end if 吧了,,,
if option1.value=true then
if check1.value=1 and option4.value=true then
sql="查询语句1"
elseif check1.value=1 and option5.value=ture hen
sql="查询语句2"
elseif check1.value=1 and option6.value=ture hen
sql="查询语句3"
end if
elseif option2.value=true then
if check1.value=1 and option4.value=true then
sql="查询语句4"
elseif check1.value=1 and option5.value=ture hen
sql="查询语句5"
elseif check1.value=1 and option6.value=ture hen
sql="查询语句6"
end if
elseif option3.value=true then
if check1.value=1 and option4.value=true then
sql="查询语句7"
elseif check1.value=1 and option5.value=ture hen
sql="查询语句8"
elseif check1.value=1 and option6.value=ture hen
sql="查询语句9"
end if
end if

[kingpeacock]

我的问题是样让查询出来的的结果显示在网格控件中？

[sinall]

MSFlexGrid1.TextMatrix(行号（从0开始）, 列号（从0开始）) = rs("字段名")
或者
MSFlexGrid1.Col = 行号（从0开始）
MSFlexGrid1.Row = 列号（从0开始）
MSFlexGrid1.Text = rs("字段名")

[XmagicX]

MSFlexGrid网格控件 可以和data控件绑定
但
MSHFlexGrid网格控件 可以和Adodc控件绑定,还是推荐使用MSHFlexGrid
可以查询出来的的结果显示在网格控件
不绑定的话只能用TextMatrix一个一个添加了

[flyingZFX]

这个很容易呀，

你找点MsFlexGrid控件的帮助不就得了。

再说了，在CSDN里随便搜索一下，都会找到一大堆

http://community.csdn.net/Expert/topic/3106/3106615.xml?temp=.7684748
http://community.csdn.net/Expert/topic/3106/3106828.xml?temp=.9537317
http://community.csdn.net/Expert/topic/3108/3108592.xml?temp=.2008631