网友您好， 请在下方输入框内输入要搜索的题目：

题目内容 （请给出正确答案）

对以下此段程序说法正确的是( )

PrivateSubText1_KeyPress(KeyAsciiAsInteger)

DimLenstraAsInteger,jAsInteger

DimStraAsString,SAsString*1

S=Chr(KeyAscii)

SelectCaseS

Case"0"To"9",",",".","-"

CaseElse

KeyAscii=0

EndSelect

EndSub

A.S取得的是输入的KeyAscii值

B.若在文本框中输入除了数字0～9，,逗号，负号，小数点之外的其他字符，则能够继续输入

C.若在文本框中输入数字0～9，,逗号，负号，小数点为有效数字串，可以继续输入

D.当KeyAscii=0时可以继续输入

参考答案

更多 “ 对以下此段程序说法正确的是( )PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimLenstraAsInteger,jAsIntegerDimStraAsString,SAsString*1S=Chr(KeyAscii)SelectCaseSCase0To9,,,.,-CaseElseKeyAscii=0EndSelectEndSubA.S取得的是输入的KeyAscii值B.若在文本框中输入除了数字0～9，,逗号，负号，小数点之外的其他字符，则能够继续输入C.若在文本框中输入数字0～9，,逗号，负号，小数点为有效数字串，可以继续输入D.当KeyAscii=0时可以继续输入 ” 相关考题
考题 下面有一段程序代码，如果从键盘上输入"Computer"，则在文本框内显示的内容是Private Sub Text1_KeyPress（KeyAscii As Integer）If KeyAscii =65 And KeyAscii =122 ThenKeyAscii=42End IfEnd Sub（ ）。A．ComputerB．什么都没有C．********D．程序出错
查看答案
考题 在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为A．aB．AC．aaaaD．AAAA
查看答案
考题 在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(Key Ascii) KeyAscii=Asc(UCase(char)) Text1．Text=Sting(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。A．aB．AC．aaaaaaaD．AAAAAAA
查看答案
考题 在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress＜KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5，KeyAscii) End SubA．aaaaaB．AAAAAC．aaaaaaD．AAAAAA
查看答案
考题 下面有一段程序代码，如果从键盘上输入“Computer”，则在文本框内显示的内容是 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＞=65 And KeyAscii＜=122 Then KeyAscii=42 End If End SubA．ComputerB．什么都没有C．********D．程序出错
查看答案
考题 在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1. Text= String(6，KeyAscii)End Sub程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。A．aB．AC．aaaaaaaD．AAAAAAA
查看答案
考题 下面有—段程序代码，如果从键盘上输入"Computer"，则在文本框内显示的内容是 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＞=65 And KeyAscii＜=122 Then KeyAscii=42 End If End SubA．ComputerB．什么都没有C．* * * * * * * *D．程序出错
查看答案
考题 下面有一段程序代码,如果从键盘上输入"Computer",则在文本框内显示的内容是Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii =65 And KeyAscii =122 ThenKeyAscii=42End IfEnd SubA．ComputerB．什么都没有C．********D．程序出错
查看答案
考题 在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母e，则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(5，KeyAscii) End SubA．eeeeeB．EEEEEC．eeeeeeD．EEEEEE
查看答案
热门标签
最新试卷