单选题

在一个表单中,若要利用代码将光标定位到文本框text1中,可以使用()。(2013年高考安徽卷)  

A. ThisForm.Textl.Refresh 
B. ThisForm.Text1.Release
C. ThisForm.Text1.Show 
D. ThisForm.Text1.Setfocus

查看答案
该试题由用户110****67提供 查看答案人数:34000 如遇到问题请联系客服
正确答案
该试题由用户110****67提供 查看答案人数:34001 如遇到问题请联系客服
热门试题
在窗体上添加一个命令按钮Command1和一个文本框Text1,把文本框的Tex入8和10,则文本框中显示的内容是 下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输山文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 Private Sub Command1_Click()x=Val(Text1.Text)If______Then Print xElse ______ Text1.Text=""End If End Sub 有下面一个程序段,从文本框中输入数据,如果该数据满足条件,除以4余1,除以5余2则输出,否则,将焦点定位在文本框中,并清除文本框的内容。 Private Sub Command1_Click() x=Val(Text1.Text) If【 】 Then Print x Else Text1.Text="" 【 】 End If End Sub 在窗体上有一个命令按钮command1和一个文本框Text1,编写事件代码如下:打开窗体运行后,单击命令按钮,文本框中显示的结果是() 在表单中添加一个文本框,需要设置的type属性为() 下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输f“文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 Private Sub Command1_Click() x=1Val(Text1. Text) If______Then Print x Else ______ Text1.Text="" End If End Sub 以下程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以 5余2”的条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 Private Sub Command1_Click() x=Val(Text1.Text) If______Then Print x Else ______ Text1.Text="" End If End Sub 在表单中添加一个文本框,需要设置的type属性为()。 清除文本框Text1中内容的程序代码是:____________。 有下面一个程序段,从文本框中输入数据,如果该数据满足条件“除以4余1,除以5余2”,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。 Private Sub Command1_Click() x=Va1(Text1.Text) If (14) Then Print X Else Text1.Text=“” (15) End If End Sub 在窗体上画一个文本框,名称为Text1,然后编写如下程序:程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容() 假定一个文本框的 Name属性是Text1,为了在该文本框中显示“Hello!”,所使用的语句是_____。 如果要检验文本框中的值,可以在文本框的()事件相关方法中写入代码。如果文本框中的值不符合要求,则返回.F.,这样,光标将不能离开该文本框。 VB中有3个键盘事件:KeyPress、KeyDown、KeyUp,若光标在Text1文本框中,则每输入一个字母( )。 VB中有3个键盘事件:KeyPress、KeyDown、KeyUp,若光标在Text1文本框中,则每输入一个字母 在窗体上画一个名称为Text1,的文本框和一个名称为Command1的命令按钮,然后编写以下程序代码:运行程序,单击Command1,则在文本框Text1中显示的结果为() 清除文本框Text1中选中内容的代码是:Text1.SelText="" 假定一个文本框的Name属性为Text1,为了在该文本框中显示“Hello!”,所使用的语句为 【7】 。 假定一个文本框,其名称为Text1,为了使该文本框具有焦点,应执行的语句是______。 在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以6余2,脓以5余3,则输出.否则,特焦点定位在文本框中,并清除文本框的内容。 Private Sub Command1_Click() num=Val(Text1.Text) If 【8】 Then Print num Else Text1.Text=" " 【9】 End If End Sub
购买搜题卡会员须知|联系客服
会员须知|联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于聚题库网站及系列App

    只用于搜题看答案,不支持试卷、题库练习 ,下载APP还可体验拍照搜题和语音搜索

    支付方式

     

     

     
    首次登录享
    免费查看答案20
    登录成功
    首次登录已为您完成账号注册,
    可在【个人中心】修改密码或在登录时选择忘记密码
    账号登录默认密码:手机号后六位