以下程序的功能是：把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框 Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Textl.Text=" " Open ".\smtext1.______ As #1 Do While ______ Input #1，inData Text1.Text=Text1.Text&inData Loop Close #1 End Sub

如图所示，夹在两板间的物体静止不动，当拉力逐渐增大时，作用于物体的静摩擦力（）

A.方向可能竖直向上

B.方向可能竖直向下

C.大小可能为零

D.大小恒为mg