这段代码应该怎么写？

[szqh]

有个文本框TEXT1（科目）
我是从数据库读取的数据，在数据库里的科目字段是用字母来表示的，比如说语文用A表示，数学用B表示，然后我想在文本框里显示出来，因为如果单纯从数据库里的显示来看，谁也看不懂A，B，C，D表示什么科目，于是我在TEXT1的INTERACTIVECHANGE里写下如下代码

if this.value='A'
this.value='语文'
endif
if this.value='B'
this.value='数学'
endif
……………………

但是没有成功，现请教各位，应该怎么写才是正确显示

[十豆三]

查询到记录后：
thisform.text1.value=iif(alltrim(科目)=='A','语文',iif(alltrim(科目)=='B','数学',iif(alltrim(科目)=='A','英语','音乐')))

或
do case
case alltrim(科目)=='A'
thisform.text1.value='语文'
case alltrim(科目)=='B'
thisform.text1.value='数学'
case alltrim(科目)=='C'
thisform.text1.value='英语'
case alltrim(科目)=='D'
thisform.text1.value='音乐'
otherwise
thisform.text1.value=''
endcase

[十豆三]

更正：
thisform.text1.value=iif(alltrim(科目)=='A','语文',iif(alltrim(科目)=='B','数学',iif(alltrim(科目)=='C','英语','音乐')))