UC知道一个关于VF的程序改错
来源：百度知道 编辑：UC知道 时间：2024/06/23 01:55:34
设计一个窗口，输入一个整数，按下“判断”按钮，若该整数是一负数。则显示“该数不是一个素数”。若为素数。则显示“该数是一个素数”，否则也显示“该数不是一个素数”。
thisform.label2.visible=.f.
thisform.label3.visible=.f.
n=thisform.text1.value
if n<0
thisform.label3.visible=.t.
endif
for i=2 to sqrt(n)
if mod(n.i)=0
loop
endif
endfor
if i>=sqrt(n)
thisform.label2.visible=.t.
else
thisform.label3.visible=.t.
endif
只有两处错误
thisform.label2.visible=.f.
thisform.label3.visible=.f.
n=thisform.text1.value
if n<0
thisform.label3.visible=.t.
endif
for i=2 to sqrt(n)
if mod(n.i)=0
loop
endif
endfor
if i>=sqrt(n)
thisform.label2.visible=.t.
else
thisform.label3.visible=.t.
endif
只有两处错误
第一处：MOD格式错误，应是MOD(N,I)=0
第二处：将LOOP改为EXIT
thisform.label2.visible=.f.
thisform.label3.visible=.f.
n=val(allt(thisform.text1.value ))-------1
if n<=0 ----------------------------------2
thisform.label3.visible=.t.
else--------------------------------------3
for i=2 to n-1----------------------------4
if mod(n,i)=0-----------------------------5
exit--------------------------------------6
endif
if n=i------------------------------------7
thisform.label2.visible=.t.
else
thisform.label3.visible=.t.
endif
endfor
endif