刷题首页
题库
高中信息
题干
使用VB中的ADO访问文件名为“Course.accdb”的Access数据库,与数据库建立连接的程序段如下:
Dim conn As New ADODB.Connection
conn.ConnectionString=“Provider=Microsoft.AC
A.OLEDB.12.0;Data Source=”+App.Path+“/monkey.accdb”
conn.Open
在调试时出现了如图所示的错误提示框。
产生该错误提示的原因可能是( )
B.没有定义ADO的Connection对象实例
B. 没有打开Connection对象实例到数据库的连接
C.指定的数据库文件不存在
D.没有添加选择Microsoft ActiveX Data Objects 6.1 Library组件
上一题
下一题
0.99难度 选择题 更新时间:2017-03-01 07:09:26
答案(点此获取答案解析)
同类题1
李老师为了提高效率,准备设计一个学生成绩分析软件,经过了前期调查分析,他决定使用Microsoft公司的Visual Basic 6.0来制作该软件,这一步应该属于用计算机解决问题的哪一个阶段( )
A.分析问题阶段
B.设计算法阶段
C.算法实现阶段
D.结果检测阶段
同类题2
下列能计算Sum =" 1+2/3" +3/5 + …… + 50/99的Visual Basic程序段是
A.Sum = 1
For i =" 1" To 49
Sum =" Sum" + i / (2 * i - 1)
Next i
B.Sum = 0
For i =" 1" To 99
Sum =" i" / (2 * i - 1)
Next i
C.Sum= 0
i = 1
Do While i <= 50
Sum =" Sum" + i / (2 * i - 1)
i =" i" + 1
Loop
D.Sum= 0
i = 1
Do While i <= 50
Sum =" Sum" + i / (2 * i - 1)
Loop
同类题3
下列VB程序运行时,单击命令按钮Command1后,若在文本框中输入10,则标签Label1显示的内容是______
Private Sub Command1_Click()
Dim sjzs As Integer
Dim rjzs As String
sjzs = Val(Text1.Text)
rjzs = ""
Do While Int(sjzs / 2) > 0
rjzs =" Str(sjzs" Mod 2) + rjzs
sjzs =" Int(sjzs" / 2)
Loop
Label1.Caption = rjzs
End Sub
同类题4
下列四个VB控件,具有数据输入功能的是( )
A.窗体
B.文本框
C.图片框
D.命令按钮
同类题5
下列属于程序设计语言的是( )
A.Access
B.Excel
C.Visual Basic
D.PowerPoint
相关知识点
算法理论
面向对象程序设计 VB开发工具
VB应用程序的界面设计与调试