首页
题库
网课
在线模考
桌面端
登录
搜标题
搜题干
搜选项
0
/ 200字
搜索
填空题
在VBA中求字符串的长度可以使用函数______。
答案:
Len
点击查看答案解析
在线练习
手机看题
你可能感兴趣的试题
填空题
某二叉树有5个度为2的结点及3个度为1的结点,则该二叉树中共有______个结点。
答案:
N
点击查看答案解析
手机看题
填空题
软件开发过程主要分为需求分析、设计、编码与测试4个阶段,其中______阶段产生“软件需求规格说明书”。
答案:
需求分析
点击查看答案解析
手机看题
填空题
在数据库技术中,实体集之间的联系可以是一对一或一对多或多对多的,那么“学生”和“可选课程”的联系为______。
答案:
多对多
点击查看答案解析
手机看题
填空题
程序流程图中的菱形框表示的是______。
答案:
逻辑判断
点击查看答案解析
手机看题
填空题
在一个查询集中,要将指定的记录设置为当前记录,应该使用的宏操作命令是______。
答案:
Go roRecord
点击查看答案解析
手机看题
填空题
当文本框中的内容发生改变时,触发的事件名称是______。
答案:
Change
点击查看答案解析
手机看题
填空题
人员基本信息一般包括:身份证号、姓名、性别、年龄等,其中可以作为主关键字的是______。
答案:
身份证号
点击查看答案解析
手机看题
填空题
在Access中若要将数据库中的数据发布到网上,应采用的对象是______。
答案:
数据访问页
点击查看答案解析
手机看题
填空题
在VBA中求字符串的长度可以使用函数______。
答案:
Len
点击查看答案解析
手机看题
填空题
要将正实数x保留两位小数,若采用Int()函数完成,则表达式为______。
答案:
Int(x * 100)/100
点击查看答案解析
手机看题
填空题
在窗体中有两个文本框分别为Text1和Text2,一个命令按钮Command1,编写如下两个事件过程:
Private Sub Command1_Click()
a=Text1.Value+Text2.Value
MsgBox a
End Sub
Private Sub Form_Load()
Text1.Value=" "
Text2.Va]ue=" "
End Sub
程序运行时,在文本框Text1中输入78,在文本框中Text2输入87,单击命令按钮,消息框中输出的结果为______。
答案:
7887
点击查看答案解析
手机看题
填空题
某次大奖赛有7个评委同时为一位选手打分,去掉一个最高分和一个最低分,其余5个分数的平均值为该名参赛者的最后得分。请填空完成规定的功能。
Sub Command1_Click()
Dim mark!,aver!,i%,max1!,min1!
aver=0
For i=1 To 7
mark=InputBox("请输入第"&i&"位评委的打分")
If i=1 then
max1=mark:min1=mark
Else
If mark<min1 then
min1=mark
Else If mark>max1 then
(12)
End If
End If
(13)
Next i
aver=(aver-max1-mini)/5
MsgBox aver
End Sub
答案:
(12) max1=mark (13) aver=aver+mark
点击查看答案解析
手机看题
填空题
“学生成绩”表含有字段(学号,姓名,数学,外语,专业,总分)。下列程序的功能是:计算每名学生的总分(总分=数学+外语+专业)。请在程序空白处填入适当语句,使程序实现所需要的功能。
Private Sub Command1_Click()
Dim en As New ADODB.Connection
Dim FS As New ADODB.Reeordset
Dim zongfen As New ADODB.Fileld
Dim shuxue As New ADODB.Fileld
Dim waiyu As New ADODB.Fileld
Dim zhuanye As New ADODB.Fileld
Dim strSQL As Sting
Set en=CurrentProject.Connection
StrSQL="Select * from成绩表"
rs.Open strSQL,cn,adOpenDynamic,adLockptimistic,adCmdText
Set zongfen=rs.Filelds("总分")
Set shuxue=rs.Filelds("数学")
Set waiyu=rs.Filelds("外语")
Set zhuanye=rs.Filelds("专业")
Do while
(14)
Zongfen=shuxue+waiyu+zhuanye
(15)
rs.MoveNext
Loop
rs.close
en.close
Set rs=Nothing
Set en=Nothing
End Sub
答案:
(14) Not rs.EOF (15) rs.Update
点击查看答案解析
手机看题
微信扫码免费搜题