柠檬试题库
search
首页 计算机 公务员 驾照 关于

下面程序运行时,若输入"Visual Basic Programming",则在窗体上输出的是( )。Private Sub Command1_Click() Dim count(25)As Integer, ch As String ch=UCase(InputBox("请输入字母字符串")) For k=1 To Len(ch) n=Asc(Mid(ch,k,1))-Asc("A") If n>=0 Then count(n)=count(n)+1 End If Next k m=count(0) For k=1 To 25 If m<count(k)Then m=count(k) End If Next k Print mEnd Sub


  • A.0
  • B.1
  • C.2
  • D.3
热度🔥400
参考答案:D
解析:

【解析】根据题中的程序代码可知,ch为输入字符串的大写状态,第一个For循环是依次取出字母,n为取出字母与"A"字符的ASCII码差值,然后再赋给数组count();第二个For循环是找出数组count()中的最小值,因此,最后窗体上输出的结果为3,即选项D。
复制题目向AI提问


扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐 与 SELECT * FROM 学生 WHERE InStr([简历],"江西")<>0 功能相同的命令是 若有以下程序 #include #include #include typedef struct stu { char *name, gender; int score; } STU; void f(char *p) { p=(char *)malloc(10); strcpy(p, "Qian"); } main() { STU a={NULL, 'm', 290}, b; a.name=(char *)malloc(10); strcpy( a.name, "Zhao" ); b = a; f(b.name); b.gender = 'f'; b.score = 350; printf("%s,%c,%d,", a.name, a.gender, a.score); printf("%s,%c,%d\n", b.name, b.gender, b.score); } 则程序的输出结果是 在窗体上画一个命令按钮(名称为Command1),并编写如下代码:Function Fun1(ByVal a As Integer, b As Integer)As Integer Dim t As Integer t=a-b b=t+a Fun1=t+bEnd FunctionPrivate Sub Command1_Click() Dim x As Integer x=10 Print Fun1(Fun1(x,(Fun1(x, x-1))), x-1)End Sub程序运行后,单击命令按钮,输出结果是( )。       在考生文件夹下打开文档"Word.docx",按照要求完成下列操作并以该文件名"Word.docx"保存文档。(1)调整纸张大小为B5,页边距的左边距为2cm,右边距为2cm,装订线1cm,对称页边距。(2)将文档中第一行"黑客技术"为1级标题,文档中黑体字的段落设为2级标题,斜体字段落设为3级标题。(3)将正文部分内容设为四号字,每个段落设为1.2倍行距且首行缩进2字符。(4)将正文第一段落的首字"很"下沉2行。(5)在文档的开始位置插入只显示2级和3级标题的目录,并用分节方式令其独占一页。(6)文档除目录页外均显示页码,正文开始为第1页,奇数页码显示在文档的底部靠右,偶数页码显示在文档的底部靠左。文档偶数页加入页眉,页眉中显示文档标题"黑客技术",奇数页页眉没有内容。(7)将文档最后5行转换为2列5行的表格,倒数第6行的内容"中英文对照"作为该表格的标题,将表格及标题居中。(8)为文档应用一种合适的主题。 孙老师在 Excel 2010 中管理初一年级各班的成绩表时,需要同时选中所有工作表的同一区域,最快捷的操作方法是( )。