A.<%@pagemimeType="text/plain"%>
B.<%@pagecontentType="text/plain"%>
C.<%@pagepageEncoding="text/plain"%>
D.<%@pagecontentEncoding="text/plain"%>
E.<%response.setEncoding("text/plain");%>
第1题:
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是( )
A.Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelStart=Len(Text1.text) End Sub
B.Private Sub Text1_LostFocus() Text1.SelStart=0 Text1.SelStart=Len(Text1.text) End sub
C.Private Sub Text1_Change() Text1.SelStart=0 Text1.SelStart=Len(Text1.text) End sub
D.Private Sub Text1_SetFocus() Text1.SelStart=0 Text1.SelStart=Len(Text1.text) End sub
第2题:
A. SHA-1
B. MD5 authentication
C. version 1 messages
D. version 2 messages
E. plain-text authentication
第3题:
有程序代码如下,则Text1、Text、"Text1.Text"分别代表______。 Text1.Text = "Text1.text"
A.对象、值、属性
B.对象、方法、属性
C.对象、属性、值
D.对象、值
第4题:
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是
A.Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
B.Private Sub Text1_LostFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
C.Private Sub Text1_Change() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
D.Private Sub Text1_SetFocus() Text.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
第5题:
在窗体中添加两个文本框,其名称分别为Text1和Text2;两个标签,其名称分别为Label1和Label2。编写程序,使得程序运行后,在文本框Text2中输入小写字母,能转换为比此字母的ASCII码小4的大写字母,结果显示在文本框Text1中。如输入“efg”,则输出的结果为“ABC”,能够实现上述功能的程序是
A.Private Sub Form. Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Chr(KeyCode-4) End Sub
B.Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub
C.Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCOde-4) End Sub
D.Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer,Shift As Integer) Text1.Text=Chr(KeyCode-4) End Sub