以下程序的功能是:把当前目录下的顺序文件smText1. txt的内容读入内存,并在文本框Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Text1. Text="" Open". \mText1. txt"【 】As 1 Do While【 】 Input 1, inData Text1. Text=Text1. Text & inData Loop Close 1 End Sub
答案: <查看本题扣1积分>
查看答案
答案不对?请尝试站内搜索