VB编程的第7个问题
9. 下面程序的功能是：输入一个字符串，在“d:\f1.dat”文件中查找输入的字符串是否存在，
若存在，则输出“找到字符串”，否则输出“没找到字符串”。请将下列程序补充完整。
Private Sub Form_Load()
a$ = InputBox("请输入要查找的字符串")
Open "d:\f1.dat" For ____________ As #1
b$ = Input(LOF(1), 1)
___________
y = InStr(1, b$, a$)
If y <> 0 Then
Print "找到字符串"; a$
Else
Print "没找到字符串"; a$
End If
End Sub
急,大家帮帮忙.
答：1.创建一个工程 2。 增加一个按钮 3。 复制如下代码到 按钮事件中 Private Sub Command1_Click() Circle (500, 50...详情>>
