IF Y$="" THEN
REPEAT
INPUT "FILE NAME**strong text** ?",Y$
Y$=TRIM$(Y$)
UNTIL LEN(Y$)<8
END IF
DISP "enr "&Ld$&"\";Y$
Nb_rc=VAL(Mesu$(0,5))+1
ON ERROR CALL Ges_err
CREATE BDAT Y$&"t",VAL(Mesu$(0,5))+2,7*34
1 ASSIGN @Voie_0 TO Y$&"t"
2 OUTPUT @Voie_0;Mesu$(*)
3 ASSIGN @Voie_0 TO *
CREATE BDAT Y$&"v",VAL(Mesu$(0,6)),(VAL(Mesu$(0,5))+1)*8
ASSIGN @Voie_0 TO Y$&"v"
OUTPUT @Voie_0;V(*)
ASSIGN @Voie_0 TO *
OFF ERROR
RETURN
这是一些HTBasic代码,我无法理解这些行(1,2,3)的作用。
答案 0 :(得分:0)
我发现了这些线的意思。
第1行:在名为@ Voie_0的“全局变量”中分配文件的路径 第2行:在文件中写入选项卡Mesu的值 第3行:清除全局变量