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

题目内容 (请给出正确答案)

在窗体文本框Text1中输入“456ABC”后,立即窗口上输出的结果是【 】。

Private SuB Text1_keyPress(keyAscii As Integer)

Select Case keyAscii

Case 97 To 122

DeBug.Print Ucase (Chr (keyAscii));

Case 65 To 90

DeBug.Print Lcase (Chr (keyAscii));

Case 48 To 57

DeBug.Print chr (keyAscii);

Case Else

keyAscii=0

End Select

End SuB


参考答案

更多 “ 在窗体文本框Text1中输入“456ABC”后,立即窗口上输出的结果是【 】。Private SuB Text1_keyPress(keyAscii As Integer)Select Case keyAsciiCase 97 To 122DeBug.Print Ucase (Chr (keyAscii));Case 65 To 90DeBug.Print Lcase (Chr (keyAscii));Case 48 To 57DeBug.Print chr (keyAscii);Case ElsekeyAscii=0End SelectEnd SuB ” 相关考题
考题 ( 32 )在窗体中有一个文本框 text1, 编写事件代码如下:Private sub form_click()X=val(inputbox( “ 输入 x 的值 ” ))Y=1If x then y=2Text1.value=yEnd sub打开窗体运行后。在输入框中输入整数 12 ,文本框 text1 中输出的结果是A ) 1B ) 2C ) 3D ) 4

考题 ( 9 )在窗体文本框 Text l 中输入 “ 456AbC ” 后,立即窗口上输出的结果是 【 9 】 。Private Sub Textl_KeyPress(KeyAscii As Integer)Select Case DeyAsciiCase 97 To 122Debug.Print Ucase(Chr(KeyAscii));Case 65 To 90Debug.Print Lcase(Chr(KeyAscii));Case 48 To 57Debug.Print Chr(KeyAscii);Case ElseKeyAscii = 0End SelectEnd Sub

考题 在窗体中有一个文本框Test1,编写事件代码如下: Private Sub Form_Click() X=Val(InputBox("输入X的值")) Y=1 If X<>0 Then Y=2 Text1.Value=Y End Sub 打开窗体运行后,在输入框中输入整数12,文本框Text1中输出的结果是( )。A.1B.2C.3D.4

考题 在窗体上画一个文本框(其NAME属性为TExT1),然后编写如下事件过程: PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。A.在文本框TEXT1中输出55B.在文本框TEXT1中输出0C.出错D.在文本框TEXT1中输出不定值

考题 窗体上有一个文本框,其Name属性为Text1,如图1所示,并有如下事件过程:上述程序的运行结果是( )。A. 在文本框Text1中输出55B. 在文本框Text1中输出0C. 语法错误D. 在文本框Text1中输出不定值

考题 在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程: Private Sub Form_Load() Text1.Text="" Text1.SetFocus For i=1 To 10 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是 ______。A.在文本框Text1中输出55B.在文本框Text1中输出0C.出错D.在文本框Text1中输出不定值

考题 在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:Private Sub Form_load()Text1.Text=″″Text1.SetFocusFor i=1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是A.在文本框Text1中输出45B.在文本框Text1中输出0C.出错D.在文本框Text1中输出不定值

考题 在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程: Private Sub Form_Load() TextText= " " TextSetFocus For i=1 To 10 Sum=Sum+i Next i TextText=Sum End Sub 上述程序的运行结果是 ______。A.在文本框Text1中输出55B.在文本框Text1中输出0C.出错D.在文本框Text1中输出不定值

考题 在窗体中有一个文本框Text1,事件代码如下: Private Sub Form_Click() X = val(Inputbox("输入x的值")) Y = 1 If X<>0 Then Y = 2 Text1.Value = Y End Sub 打开窗体运行后,在输入框中输入整数12,文本框Text1中输出的结果是______。A.1B.2C.3D.4