Question

VB显示数据表只显示前5项

我用VB显示一个数据库表
总共有7列内容但是我只要显示前面5列内容
怎么屏蔽后面2列的显示啊

显示那边我的代码是
Private Sub MSHFlexGrid1_Click()

Text1.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 1)
Text2.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 2)
DTPicker1.Value = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 3)
Text3.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 4)
txt_key.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 5)

End Sub

问题是全部显示了
有人说可以修改控件属性来设置。如果行该修改什么属性

控件是： MSHFlexGrid

我需要打开页面就直接显示5列，不要先查询一下

ColIsVisible ARRAY/BOOLEN 返回/设置某个列是否可见
RowIsVisible ARRAY/BOOLEN 设置/返回一个值,表明某个特定列是否可见
属性栏中这2个都没有
比如说我现在有7列，最后列第7列为pass怎么设置不可见，代码怎么写
——————————————————————————————————————————
Private Sub Form_Activate()
MSHFlexGrid1.ColWidth(2) = 0
End Sub

打开页面时还是现实7列，需要点击表后才会蒙蔽啊。
我要蒙蔽的是密码，不可能打开就让人看见密码。点一下在不让人看密码吧

Answer 1

写查询语句时只显示前边5个不行？？比如： “select 列1，列2，列3，列4，列5 From 表”
ColIsVisible ARRAY/BOOLEN 返回/设置某个列是否可见
试试这个
MSHFlexGrid1.ColWidth(7)=0 '想不显示那一列就把“7”改
我写在Form_Activate()里不会啊
如下：
Private Sub Form_Activate()
MSHFlexGrid1.ColWidth(2) = 0 ’想要多几列就多写几个
End Sub

Answer 2

你设置你不要的列的列宽为0就可以了.或者可以在用SQl语句查询的时候只查询你需要的列就可以了.

Answer 3

With MSHFlexGrid
.FormatString = "|<" & "列一名称" & _
"|<" & "列二名称" & _
"|<" & "列三名称" & _
"|<" & "列四名称" & _
"|<" & "列五名称" & _
"|<" & "列六名称" & _
"|<" & "列七名称" & _

.ColWidth(0) = 200 '第零列的宽
.ColWidth(1) = 0 '第一列的宽 ,为零的话就是不显示
.ColWidth(2) = 0
.ColWidth(3) = 1500
.ColWidth(4) = 1250
.ColWidth(5) = 1250
.ColWidth(6) = 1250
.ColWidth(7) = 1250
End With

或用SQL只查找你所需要的那几列就行了.