下面有一段程序代码，如果从键盘上输入"Computer"，则在文本框内显示的内容是Private Sub Text1_KeyPress（KeyAscii As Integer）If KeyAscii >=65 And KeyAscii <=122 ThenKeyAscii=42End IfEnd Sub（ ）。A．ComputerB．什么都没有C．********D．程序出错

题目

下面有一段程序代码，如果从键盘上输入"Computer"，则在文本框内显示的内容是

Private Sub Text1_KeyPress（KeyAscii As Integer）

If KeyAscii >=65 And KeyAscii <=122 Then

KeyAscii=42

End If

End Sub（ ）。

A．Computer

B．什么都没有

C．********

D．程序出错

相似考题

1.对考生文件夹下的“学生住宿”管理数据库设计一个表单myf，表单标题为“宿舍查询”，表单中有3个文本框和2个命令按钮“查询”和“关闭”。运行表单时，在第一个文本框里输入某学生的学号(S1—S9)，单击查询按钮，则在第二个文本框内会显示该学生的“姓名”，在第三个文本框里会显示第三个学生的“宿舍号”。如果输入的某个学生的学号对应的学生不存在，则在第二个文本框内显示“该生不存在”，第三个文本框不显示内容；如果输入的某个学生的学号对应的学生存在，但在宿舍表中没有该学号对应的记录，则在第二个文本框内显示该生的“姓名”，第三个文本框显示“该生不住校”。单击“关闭”按钮关闭表单。

2.在窗体上面有一个文本框，其名称为Text1，编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为( )。A．aaaB．AAAC．AAD．aa

3.下列程序段的执行结果为 Private Sub Command1_Click() a=InputBox("请输入a值") c="您要查询的是" &IIf(a＞0，"天气"，" ") &IIf(a＜0，"电话号码"，" ") &IIf(a=0，"邮编"，" ") Text1.Text=c End Sub程序运行后，如果从键盘上输入"16"，则在文本框显示的内容是______。A．您要查询的是天气B．您要查询的是邮编C．您要查询的是电话号码D．False

4.在窗体上面有一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) TextText=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text1中显示的内容为( )。A．aaaB．AAAC．AAD．aa

更多“下面有一段程序代码,如果从键盘上输入"Computer",则在文本框内显示的内容是 PrivateSubT ”相关问题

  • 第1题：

    下面有一段程序代码，如果从键盘上输入“Computer”，则在文本框内显示的内容是 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＞=65 And KeyAscii＜=122 Then KeyAscii=42 End If End Sub

    A．Computer

    B．什么都没有

    C．********

    D．程序出错


    正确答案：C
    解析：此事件过程是KeyPress事件过程，参数KeyAscii的值是键盘输入的字符的ASCII码值。上述过程对输入的字符进行判断，如果其ASCII码大于65(大写字母“A”)并小于_122(小写字母“a”)，则用星号(ASCII码为42)代替，而运行过程中，题意是要从键盘上输入"Computer"，则应在文本框中显示“********”。

  • 第2题：

    下面有一段程序代码,如果从键盘上输入"Computer",则在文本框内显示的内容是

    Private Sub Text1_KeyPress(KeyAscii As Integer)

    If KeyAscii >=65 And KeyAscii <=122 Then

    KeyAscii=42

    End If

    End Sub

    A．Computer

    B．什么都没有

    C．********

    D．程序出错


    正确答案：C
    解析：此事件过程是KeyPress事件过程,参数KeyAscii的值是键盘输入的字符得ASCII码值,上述过程对输入得字符进行判断,如果其ASCII码大于65(大写字母"A") 并小于122(小写字母"a"),则用星号(ASCII码为42) 代替,而运行过程中,题意是要从键盘上输入"Computer",则应在文本框中显示"********"。

  • 第3题：

    如果在文本框内输入数据后，按Enter键或按Tab键，输入焦点可立即移至下一指定文本框，应设置的属性是（）

    A．“制表位”属性

    B．“Tab键索引”属性

    C．“自动Tab键”属性

    D．“Enter键行为”属性


    C

  • 第4题：

    下面有—段程序代码，如果从键盘上输入"Computer"，则在文本框内显示的内容是 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＞=65 And KeyAscii＜=122 Then KeyAscii=42 End If End Sub

    A．Computer

    B．什么都没有

    C．* * * * * * * *

    D．程序出错


    正确答案：C
    解析：此事件过程是KeyPress事件过程，参数KeyAseii的值是键盘输入的字符得ASCII码值，上述过程对输入得字符进行判断，如果其ASCII码大于65(大写字母“A”)并小于122(小写字母“a”)，则用星号(ASCII码为42)代替，而运行过程中，题意是要从键盘上输入“Computer”，则应在文本框中显示“* * * * * * * *”。

  • 第5题：

    对考生文件夹下的“学生住宿”管理数据库设计一个表攀“bd2”，表单标题为“宿舍查询”，表单中有一个标签、3个文本框和两个命令按钮：“查询”和“关闭”。

    运行表单时，在第一个文本框里输入某学生的学号，单击查询按钮，则在第二个文本框内会显示该学生的“姓名”，在第3个文本框里会显示该学生的“宿舍名称”。

    如果输入的某个学号对应的学生不存在，则在第二个文本框内显示“该生不存在”，第三个文本框不显示内容；如果输入的某个学号对应的学生存在，但没有该学号的宿舍编号，则在第二个文本框内显示该生的“姓名”，第三个文本框显示“该生不住校”。

    单击“关闭”按钮关闭表单。


    正确答案：

    【考点指引】本大题主要考查表单的设计及文本框和命令按钮等控件的使用，在查询的时候注意将查询结果保存到CURSOR中。
    【操作步骤】
    ①选择【文件】→【新建】命令，选择“表单”，单击“新建文件”按钮打开表单设计器，在表单属性窗口中将“Caption”属性值修改为“宿舍查询”；单击表单控件工具栏上的“标签”控件图标，为表单添加一个标签Label1；单击表单控件工具栏上的“命令按钮”控件图标，为表单添加两个命令按钮Command1和Command2；单击表单控件工具栏上的“命令按钮”控件图标，为表单添加两个命令按钮Command1和Command2。
    ②选择标签，在标签属性窗口中将标签Label1的Cap-tion属性值修改为“请输入学号”；分别选择命令按钮，在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“查询”，将命令按钮Command2的Caption属性值修改为“关闭”，如图94-1所示。双击命令按钮，在Click事件中输入代码：ThisForm．Release，用来关闭表单。


    ③双击“查询”命令按钮，在Click事件中输入代码：
    SELECT*INTO CURSOR aa FROM学生WHERE学号=ALLTRIM(ThisForm．Textl．Value)
    IF ISNULL(aa．学号)THEN
    ThisForm．Text2．Value="该生不存在"
    ThisForm．Text3．Value=""
    ELSE
    ThisForm．Text2．Value=ALLTRIM(aa．姓名)
    IF EMPTY(aa．宿舍编号)THEN
    ThisForm．Text3．Value="该生不住校"
    ELSE
    SELECT宿舍名称INTO CURSOR bb FROM宿舍WHERE宿舍编号=ALLTRIM(aa．宿舍编号)
    ThisForm．Text3．Value=ALLTRIM(bb．宿舍名称)
    ENDIF
    ENDIF
    ④选择【表单】→【执行表单】命令，系统首先要求保存该表单文件，在弹出的“另存为”对话框中输入表单文件名 “bd2”，保存在考生文件夹下，然后运行表单。

相关内容