问题描述：
[填空]
写出下面这段函数实现的功能。 Private Sub Command1_Click（）Dim inData As String Text1．Text="" Open"．/smtext1．txt"For InputAs#1 Do While Not EOF（）Input#1，inData Text1．Text=Text1．Text&inData Loop Close#1 End Sub
参考答案：查看无
答案解析：无
☆收藏
答案解析：无
☆收藏
上一篇：执行下面程序，单击命令按钮Command1后，窗体上显示的内容是（）。 Private Sub Command1_Click（）Dim x As Integer，y As Integer x=-5 If Sgn（x）Then y=Sgn（x^2）Else y=Sgn（x）End If Print y End Sub
下一篇：下面程序执行时在窗体上显示的是（）。 Private Sub Command1_Click（）Dim a（）For k=1 to 10 a（k）=11-k Next k Print a（a（）/a（）Mod a（））End Sub
- 我要回答: 网友(216.73.216.96)
- 热门题目: 1.什么是闭环控制？什么是开环控 2.多媒体操作系统是能够提供（） 3.液压泵的总效率