vb提示要求对象时,就是有可能你代码里涉及到的对象可能没有在窗体里加载,你查看一下你的数据库,数据绑定控件有没有加载,其中datarrid1要在vb的部件里添加,我估计是你这个没有添加
CommonDialog1.ShowOpen 显示这错误黄色
因为前面已经有CommonDialog2.ShowOpen
能正常使用,那么,只有一个疑问,在当前窗体中有没有这个控件?
拼写错误:
Private
Sub
Command1_Click()
Image1.Visible
=
False
'隐藏笨蛋图像
Label1.Caption
=
Int(Rnd
*
10)
'得到随机数
Label2.Caption
=
Int(Rnd
*
10)
'
Label3.Caption
=
Int(Rnd
*
10)
'
'当某个标题内数值为7时显示笨蛋图像
If
(Label1.Caption
=
7)
Or
(Label2.Caption
=
7)
_
Or
(Label3.Caption
=
7)
Then
Image1.Visible
=
True
Beep
End
If
End
Sub