栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验 > 笔试题库

[填空题] 在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form

笔试题库 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

[填空题] 在窗体上画一个文本框,名称为Text1,然后编写如下程序:  Private Sub Form

[填空题] 在窗体上画一个文本框,名称为Text1,然后编写如下程序:

Private Sub Form_Load()

Open"d:empdat.txt"For Output As # 1

Text1.Text=" "

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If______=13 Then

If UCase(Text1.Text)=______Then

Close 1

End

Else

Write # 1,______

Text1.Text=" "

End If

End If

End Sub

以上程序的功能是,在D盘temp目录下建立一个名为dat.txt的文件,在文本框中输入字符,每次按回车键(回车符的ASCII码是13)都把当前文本框中的内容写入文件dat.txt,并清除文本框中的内容;如果输入“END”,则结束程序。请填空。

正确答案:

KeyAscii "END" Text1.Text

参考解析:

第一空是通过参数检测用户是否按下Enter键,第二空处是如果文本框中的字符串是“END”时,用户按下Enter键的响应操作。第三空是将文本框中的文本保存到文件中。

转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/480817.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号