公卫人

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 285|回复: 2

[求助] epidata中check语句

[复制链接]
董圣洁 发表于 2019-6-27 20:27:29 | 显示全部楼层 |阅读模式

注册后推荐绑定QQ,之后方才可以使用下方的“用QQ帐号登录”。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
我先写个check语句,实现逻辑跳转,例如:: i0 C- @+ f! r
当12题中的变量error1不为0时,第12.1题才能填写,否则12.1题中所有变量都自动填充为0,且自动跳过这些变量
epiman 发表于 2019-7-6 12:52:59 | 显示全部楼层

回帖奖励 +1 分钢镚

after entry 语句# L; ]+ y* ?3 R. O
error1不为零跳转到题13
4 ^1 O/ j1 S; W4 d9 i2 m" b! e. n12.1均赋值为0
1 x; R7 a5 C; b+ Q* _" ^7 N" E6 Y9 o4 ?7 h) U/ O. j  O+ w
不行么?
回复

使用道具 举报

kder 发表于 2019-7-8 11:32:47 | 显示全部楼层
本帖最后由 kder 于 2019-7-8 11:35 编辑 2 r4 H! H4 T$ W3 x5 Q3 Z* n. p

4 F4 u: k) e( ?3 E思路如下(代码请根据实际情况修改):
% ?% F' {% |; E$ n4 R" G' }ERROR1
1 m4 h5 y9 O3 }3 a6 f; _1 b  IF ERROR1<>0 THEN
0 V9 Z) N( b' {  r# F2 a, I    GOTO Q1215 F. \! N% s9 @4 [! Q
  ELSE
& r: J% e- k+ H: f/ D! }    LET Q121=09 Y  K/ M7 U  ^1 {" e  u
    LET Q122=0* [7 w8 H. v% L/ X7 x! @
    ……0 I/ m9 h4 S- @/ Z# ~
    GOTO Q13
- U8 A$ G7 Y$ o+ e4 J" x6 \  ENDIF
, f8 Z2 d. J9 \! K, F7 cEND

评分

参与人数 1钢镚 +40 收起 理由
epiman + 40 热心回复坛友问题:-)

查看全部评分

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

充值|至尊会员|接种|公卫人 ( 沪ICP备06060850号-3 )

GMT+8, 2019-11-23 05:04 , Processed in 0.139795 second(s), 31 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表