3个

angxyz 2004-08-28 02:21:28
1 datagrid中加入按钮后如何往下拉框中加入内容

2 从数据库中往combol中加入item,老是加不全,前几项不缺,后几项缺失较多


3 formload c7=1,d2为datagrid
Private Sub Combo1_Click(Index As Integer)
If Index < c7 - 1 Then
GoTo 21
End If
Load Combo1(c7)
Combo1(c7).Visible = True
Combo1(c7).Top = Combo1(c7 - 1).Top + Combo1(c7 - 1).Height
j = 0
20
d2.Row = j
If d2.Columns(4).Text <> "" Then
j = j + 1
'Combo1(c7).AddItem d2.Columns(4).Text
GoTo 20
End If
c7 = c7 + 1
21
...全文
88 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
jtkkjtkk 2004-08-28
  • 打赏
  • 举报
回复
1)http://community.csdn.net/Expert/topic/3285/3285990.xml?temp=.97633
2)不知你是怎么加的?
3)把代码结构写清楚再贴出来。
Andy__Huang 2004-08-28
  • 打赏
  • 举报
回复
這個控件不是那麼好用,請用第三方控件吧,推薦spread3.0
sangshuyezi 2004-08-28
  • 打赏
  • 举报
回复
劝楼主在代码中最好不要用goto语句。

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧