VBA中，将字符串的首字母转换为对应的字符代码的函数是
- A.Asc
- B.Str
- C.String
- D.Chr
热度🔥297
参考答案：A
解析：
【解析】 Asc函数返回字符串首字母的字符值；Str函数将一个数字转换成字符串；String函数返回字符表达式的第一个字符重复组成的指定长度为数值表达式的值的字符串；Chr函数返回与指定ASCII值对应的字符。因此，本题应选择A选项。
【解析】 Asc函数返回字符串首字母的字符值；Str函数将一个数字转换成字符串；String函数返回字符表达式的第一个字符重复组成的指定长度为数值表达式的值的字符串；Chr函数返回与指定ASCII值对应的字符。因此，本题应选择A选项。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
教师管理数据库有数据表"teacher"，包括"编号"、"姓名"、"性别"和"职称"四个字段。下面程序的功能是：通过窗体向"teacher"表中添加教师记录。对应"编号"、"姓名"、"性别"和"职称"的4个文本框的名称分别为：tNo、tName、tSex和tTitles。当单击窗体上的"增加"命令按钮(名称为Command1)时，首先判断编号是否重复，如果不重复，则向"teacher"表中添加教师记录；如果编号重复，则给出提示信息。
Private ADOcn As New ADODB.Connection
Private Sub Form_Load()
'打开窗口时，连接Access本地数据库
Set ADOcn＝CurrentProject.Connection
End Sub
Private Sub Command0_Click()
'追加教师记录
Dim strSQL As String
Dim ADOcmd As New ADODB.Command
Dim ADOrs As New ADODB.Recordset
Set ADOrs.ActiveConnection＝ADOcn
ADOrs.Open "Select 编号 From teacher Where 编号＝'" ＋ tNo ＋ "'"
If Not ADOrs.EOF Then
MsgBox "你输入的编号已存在，不能新增加！"
Else
ADOcmd.ActiveConnection＝ADOcn
strSQL＝"Insert Into teacher(编号，姓名，性别，职称)"
strSQL＝strSQL＋"Values('"＋tNo＋"'，'"＋tname＋"'，'"＋tsex＋"'，'"＋ttitles＋"')"
ADOcmd.CommandText＝strSQL
ADOcmd.
MsgBox "添加成功，请继续！"
End If
ADOrs.Close
Set ADOrs＝Nothing
End Sub
按照功能要求，在横线上应填写的是( )。
在Visual FoxPro中以下叙述正确的是( )。
下图是网络地址转换NAT的一个示例
根据图中信息，标号为③的方格中的内容应为（）
在Word中，邮件合并功能支持的数据源不包括（ ）。
