在一个有若干个整数的顺序文件中查找一个数(这个数从文本框中输入) 找到后在标签Label1中显示该
已帮助 人
在一个有若干个整数的顺序文件中查找一个数(这个数从文本框中输入),找到后在标签Label1中显示该数是文件中第几个数;如果没找到,则显示文件中没有该数的信息 Private Sub Command1_Click() Dim x As Integer, n As Integer a = Val(Text1.Text) Open "file1.txt" For Input As #1 Do While Not EOF(1) Input __________________ n = n + 1 If x = a Then Label1.Caption = a & "是文件中第" & n & "个数" Close #1 Exit Sub End If Loop Close #1 Label1.Caption = "文件中没有" & a End Sub 要使上面的程序代码实现上述功能,在横线处应填写的是________。
A.#1, a
B.1, a
C.1, n
D.#1, x

回答
共1条回复-
A
