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

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

在窗体上添加文本框Text1,然后编写下列程序: Private Sub Form_Load() Text1.Text=" " End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) KeyAscii=Asc(Ucase(Char)) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后,在文本框中依次输入1、2、3、a、b、c,单击命令按钮,则窗体上显示的内容是

A.23BCD

B.ABC

C.!@#ABC

D.123abc


参考答案

更多 “ 在窗体上添加文本框Text1,然后编写下列程序: Private Sub Form_Load() Text1.Text=" " End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) KeyAscii=Asc(Ucase(Char)) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后,在文本框中依次输入1、2、3、a、b、c,单击命令按钮,则窗体上显示的内容是A.23BCDB.ABCC.!@#ABCD.123abc ” 相关考题
考题 在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码:Private sub Command1_Click() Text1.text="AB"End SubPrivate Sub Command2_Click() Text1.Text="CD"End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示 。A.AB B.CD C.ABCD D.CDAB

考题 在窗体上添加一个文本框Text1,然后编写下列Load事件过程,则程序运行结果是( )。Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor k=1 To 5t=t*kNext kText1.Text=tEnd SubA.在文本框中显示120B.文本框中仍为空C.在文本框中显示1D.出错

考题 在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1 Click() Text1.Text="AB" End Sub Private Sub Command2 Click() Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示A.ABB.CDC.ABCDD.CDAB

考题 在窗体上添加—个文本框,名为Text1,然后编写如下的Load事件过程,则程序的运行结果是 Private Sub Form_Load( ) Text1.Text=”” Text1.Setfocus t=1 For k=10 To 6 Step-2 t=t*k Next k Text1.Text=t End SubA.在文本框中显示120B.文本框仍为空C.在文本框中显示480D.出错

考题 在窗体上画一个文本框(其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中输出不定值

考题 在窗体中添加名称为Command1和名称为Command2的命令按钮测验文本框Text1,然后编写如下代码:PrivateSubCommand1_Click()Text1.Text="AB"EndSubPrivateSubCommand2_Click()Text1.Text="CD"EndSub首先单击Command2按钮,然后再单击Command1按钮,在文本框中显示( )A、ABB.CDC.ABCDD.CDAB

考题 在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1_Click( ) Text1.Text="AB" End Sub Private Sub Command2_Cliek( ) Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示A.ABB.CDC.ABEDD.CDAB

考题 在窗体上添加一个文本框Text1,然后编写如下的Load事件过程,则程序运行结果为( )。 Private sub Form_Load() Text1.Text="" Text1.SetFocus For k=1 To 5 t=t*k Next k Text1.Text=t End SubA.在文本框中显示120B.文本框中仍为空C.在文本框中显示1D.出错