这个很容易的。
thisform.combo1.rowsource='新的数据源'
这个新的数据源内容可以是变量名、表名、数组名。如果你的新的数据源类型发生变化，就要这样：
thisform.combo1.rowsourcetepy=0
thisform.combo1.rowsource='新的数据源名'
thisform.combo1.rowsourcetepy=新数据源的类型（值 数组名 表名等）