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 急,大家帮帮忙.
看了下面查找的部分是全的,想到缺的是文件操作的部分 因为是读文件,第一个空写Input就行了。 文件用完要关闭,所以第二个空是Close #1 ------------------ 真难。。我是在VB6.0上验证过的。。 要不你试试 Close 1 说实话,一直觉得你写的题也挺奇怪的,居然有常识性错误?!Print函数不能写在Form_Load里的,在Form_Load里往窗体上Print不出任何内容!。。。 要是模拟题可就更差劲了,这不是误人子弟么。。。
答:int number; int.tryparse(console.readline(),out number); if(number==0) { return ...详情>>