VB题目,不会做,求解答!谢谢!!

发布于2022-01-13 04:19:26

. 在考试文件夹下打开工程文件Ks2.Vbp,编写如下程序,程序的功能是,在”D:\C卷”目录下建立一个名为Dat.txt的文件,在文本框中输入字符,当单击确定按钮时把当前文本框中的内容写入文件Dat.txt,并清除文本框中的内容;如果输入“end”,则结束程序,请填空。结果按原文件名保存在原位置。 Private Sub Form_Load()  #####[1]#####         '第1空 Text1.Text = "" End Sub   Private Sub command1_click()   If #####[2]##### Then      '第2空     Close 1                End   Else     #####[3]##### #1,Text1.text                       '第3空     Text1.Text = ""   End If End If End Sub     #####[1]#####   #####[2]#####   #####[3]#####  此乃三个要填的空,其他是不能修改和删除的,希望能详细的解答一下,谢谢!!

2个回答
admin
网友回答2022-01-13

第一空:

open "D:\C卷\Dat.txt" for output as #1

第二空:

text1.text="end"

三空

print

个人建议:

另外,在第三空下一行应该再添加一句:

close #1

这样才合理

admin
网友回答2022-01-13

open "D:\C卷\Dat.txt" for append as #1

lcase(text1.text) ="end"

print

回到
顶部