网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
（ 9 ）在窗体文本框 Text l 中输入 “ 456AbC ” 后，立即窗口上输出的结果是 【 9 】 。
Private Sub Textl_KeyPress(KeyAscii As Integer)
Select Case DeyAscii
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
参考答案
更多 “ （ 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 ” 相关考题
考题
（ 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
考题
在窗体上画一个文本框(其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中输出不定值
考题
在窗体中有一个文本框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
考题
在窗体文本框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
考题
窗体上有一个文本框，其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中输出不定值
考题
在窗体中有一个文本框Testl，编写事件代码如下： Private Sub Form. Click（ ） X=val(Inputbox(”输入x的值”))Y=1 If X0 Then Y=2Text1．Value=YEnd Sub． 打开窗体运行后，在输入框中输入整数12，文本框Textl中输出的结果是（ ）。A.1B.2C.3D.4
考题
在窗体中有一个文本框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
热门标签
最新试卷