找回密码
 加入
搜索
查看: 2164|回复: 4

请问一下如何获取数据库某字段值到Combo?

[复制链接]
发表于 2009-4-8 11:06:18 | 显示全部楼层 |阅读模式
请问一下如何获取数据库某值到Combo?

获取数据库表中(Name)的所有值列到Combo中选择??
发表于 2009-4-8 13:29:50 | 显示全部楼层
推~@@ 剛好要學這個,但願有高人出來指點
发表于 2009-4-8 13:30:05 | 显示全部楼层
推~@@ 剛好要學這個,但願有高人出來指點
发表于 2009-4-8 15:46:23 | 显示全部楼层
创建Combo控件时设置text段为空,如
$hCYVer = GUICtrlCreateCombo("", 354, 30, 72, 18, BitOR($GUI_SS_DEFAULT_COMBO, $CBS_DROPDOWNLIST))
然后用循环给控件赋值,如:
For $i = 1 To $aCYVer[0]
    GUICtrlSetData($hCYVer, $aCYVer[$i])
Next
 楼主| 发表于 2009-4-8 16:17:26 | 显示全部楼层
Func _GetName()
        $Conn = ObjCreate("ADODB.Connection")
        $Rs = ObjCreate("ADODB.Recordset")
        $Conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & $MdbDir & ";Jet Oledb:Database Password=" & $MdbPW)
        $Rs.ActiveConnection = $Conn
        $Rs.Open('Select * From Operation')
        GUICtrlSetData($Name_Combo, "")
        While (Not $Rs.eof And Not $Rs.bof)
        ???
        WEnd
        $Rs.Close
        $Conn.Close
EndFunc
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-9-23 07:26 , Processed in 0.071437 second(s), 22 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表