社区
VB基础类
帖子详情
100求解两个问题
泥娃
2000-03-07 02:30:00
问一:adodc控件的recordsoure属性的用法?
因为我发现以下语句提示“from了句错“
adodc1.recordsoure="select * from dd_b,dw_b"
问二:如何判断combo控件的属性的改变?
当我使用combo控件的下拉框选定itm时change事件没有激活
click事件也没有激活。
这是怎么回事你能告诉我吗? 分献上!!!
...全文
180
7
打赏
收藏
100求解两个问题
问一:adodc控件的recordsoure属性的用法? 因为我发现以下语句提示“from了句错“ adodc1.recordsoure="select * from dd_b,dw_b" 问二:如何判断combo控件的属性的改变? 当我使用combo控件的下拉框选定itm时change事件没有激活 click事件也没有激活。 这是怎么回事你能告诉我吗? 分献上!!!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
泥娃
2000-03-08
打赏
举报
回复
Adodc1 属性设置如下:
Begin MSAdodcLib.Adodc Adodc1
Height = 435
Left = 510
Top = 1950
Width = 2895
_ExtentX = 5106
_ExtentY = 767
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 2
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 1
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=G:\sdf\data.mdb"
OLEDBString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=G:\sdf\data.mdb"
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = "tb_data"
Caption = "Adodc1"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
程序中:
Private Sub Command1_Click()
Adodc1.RecordSource = "select da_bm,da_name,da_s1,da_s2,da_s3 from tb_da where da_year='1999'"
Adodc1.Refresh
End Sub
程序运行出错,提示“FROM子句错”
不知道是怎么回事,我要急死了,VB高手帮帮忙吧。
泥娃
2000-03-07
打赏
举报
回复
对不起,我是初学者有几个单词写错了
分我已经给了,可以告诉我commandtype几个参数的具体意义吗?
dongdong
2000-03-07
打赏
举报
回复
第一个问题:
用法没有错,可以直接SELECT 字段的名称,但有两个前提,1,字段名不能有重复;2,必须先设置ADODC的COMMANDTYPE=2,即SQL语句;
第二个问题:
CLICK 事件应当触发,没有触发的原因可能是其他语句的问题,单步执行看看。
Chen_Lin
2000-03-07
打赏
举报
回复
同意river99的意见,同时recordsoure也可以用以下简单表示:
recordsource=数据表名。(CommandType=2)
第二个问题,Click事件应该会被触发的。
newsoft
2000-03-07
打赏
举报
回复
不对吧,我试验了一下,click事件是响应的,change事件是不响应的。
Private Sub Combo1_Change()
MsgBox "aaa"
End Sub
Private Sub Combo1_Click()
MsgBox "bbb"
End Sub
Private Sub Form_Load()
Combo1.AddItem "aaa"
Combo1.AddItem "bbb"
Combo1.AddItem "ccc"
End Sub
river99
2000-03-07
打赏
举报
回复
第一个问题是SQL语句错,正确的写法为"select a.*, b.* from dd_b a, dw_b b"或
"select dd_b.*, dw_b.* from dd_b, dw_b",不过你需要确定这两个数据库表中没有同名字段。如果有,必须将同名字段去掉。
第二个问题有点奇怪,Click事件一般是在对Item选择时被触发的。ComboBox中的Change事件只有在手工输入或程序改变内容时的时候才会被触发的。可能你的程序中没有处理好。可以参考MSDN中的有关资料。
King
2000-03-07
打赏
举报
回复
什么是recordsoure?是不是recordset啊?
matlab常微分方程
求解
matlab常微分方程
求解
,通过编程实战掌握具体应用。包括matlab常微分方程
求解
前、matlab常微分方程
求解
中、matlab常微分方程
求解
后。
matlab联立
两个
方程组
求解
,实验二 Matlab
求解
数学
问题
(终稿)2
实验二 MATLAB
求解
数学
问题
2.1实验目的掌握MATLAB在大学数学
问题
中的基本应用,会使用MATLAB软件
求解
高等数学、线性代数和概率统计中的常见
问题
。2.2实验要求掌握MATLAB简单符号计算,学会使用MATLAB函数进行简单的符号运算,会使用MATLAB求极限、积分、微分方程运算,会使用MATLAB
求解
线性方程组,矩阵的秩、行最简型,会使用MATLAB生成随机数,计算密度函数与分布函数的...
python
求解
两个
list列表的交集
python
求解
两个
list列表的交集常用的有以下两种方法: ① 遍历其中一个列表检查当前遍历的元素是否存在于另外一个列表,如果存在那么将其加入到结果集中 ② 将
两个
列表转换为set集合,然后使用集合操作符&
求解
两个
set集合的交集,最后可以使用list列表将并集的结果转换为list列表类型 下面是具体的例子: if __name__ == '__main__': # 主要有两种方法
求解
两个
列表的交集 list1 = [1, 2, 3, 4] list2 = [2,
求解
两个
字符串的最长公共子序列
一,
问题
描述 给定
两个
字符串,
求解
这
两个
字符串的最长公共子序列(Longest Common Sequence)。比如字符串1:BDCABA;字符串2:ABCBDAB 则这
两个
字符串的最长公共子序列长度为4,最长公共子序列是:BCBA 二,算法
求解
这是一个动态规划的题目。对于可用动态规划
求解
的
问题
,一般有
两个
特征:①最优子结构;②重叠子
问题
①最优子结构 设 X=(x1,x2,.....xn) 和 Y={y1,y2,.....ym} 是
两个
序列,将 X 和 Y 的最长公共子序列记为LCS(X,
求解
最少翻译
问题
C++
问题
描述 据美国动物分类学家欧内斯特-迈尔推算,世界上有超过
100
万种动物,各种动物有自己的语言 所以,动物A、C之间通信需要动物B来当翻译。问
两个
动物之间项目通信至少需要多少个翻译。 测试数据中第一行包含
两个
整数n(2<= n <= 200)、m(1 <= m <= 300),其中n代表动物的数量,动物编号从0开始,n个动物编号为0 ~ n-1,m表示可以相互通信动物数,接下来的m行中包含
两个
数字分别代表两种动物可以相互通信,在接下来包含一个整数k(k <= 20),代表查询
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章