您的位置：程序门 -> vb -> 控件

fpspread1中组合框的使用？

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

fpspread1中组合框的使用？

发表于：2007-11-29 15:25:54 楼主

fpspread1中某列设为组合框后，运行下面的初始化程序后，组合框消失，为什么？如何改

private sub form_load（)
dim connectionstring as string
connectionstring = "provider=microsoft.jet.oledb.4.0;" & "data source=book.mdb"
conn.open connectionstring
dim sql as string
sql = "select * from 书籍信息"
rs_bookinfo.open sql, conn, adopenkeyset, adlockpessimistic
set fpspread1.datasource = rs_bookinfo
fpspread1.maxrows = fpspread1.datarowcnt
'初始化 spread,当然也可以在spread设计器里做
with fpspread1
.maxrows = 12
.maxcols = 8
.col = 1
.datafield = "书籍编号"
.col = 2
.datafield = "书名"
.col = 3
.datafield = "类别"
.col = 4
.datafield = "作者"
.col = 5
.datafield = "出版社"
.col = 6
.datafield = "出版日期"
.col = 7
.datafield = "登记日期"
.col = 8
.datafield = "是否被借出"
end with
end sub

下一篇：webrequest控件和 inet控件获取的同一网页源码怎么不一样啊？
上一篇：fpspread1中组合框的使用？

其他资讯