Cuestión : Definiendo variables para exhibir las palabras basadas en valores cifrados

Tengo un campo del DB [Tdir] que se codifique con “N”, “S”, “E”, o “w” para representar el norte, el sur, el este, y el oeste. Estoy intentando hacer que ponga la palabra en escrito completa basada en el código en una forma. ¿Cómo modifico el código siguiente para hacer esto? class= " lineNumbers " >
1 del >

:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
función codeBody del >Private del " prettyprint " del class= del id= " codeSnippet957529 " del >
 del "" entonces = formatstr + “, el municipio” + T + ““+ Tdir
               
        Extremo selecto
    Terminar si
    
Terminar la función
class= > " claro " de 

  
  class= del

Respuesta : Definiendo variables para exhibir las palabras basadas en valores cifrados

Parece bastante simple…

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:

Formattract privado de la función (rst como dao. Recordset) como secuencia
    Zona dévil, examen, BlockNum, SurveyName, área cultivada, formatstr
    S dévil, R, Rdir, T, Tdir, condado, estado, TractOnly
    Zona = getval (rst, “zona”)
    Examen = getval (rst, “examen”)
    BlockNum = getval (rst, “BlockNum”)
    SurveyName = getval (rst, “SurveyName”)
    Área cultivada = getval (rst, “área cultivada”)
    S = getval (rst, “S”)
    R = getval (rst, “R”)
    Rdir = getval (rst, “Rdir”)
    T = getval (rst, “T”)
    Seleccionar el caso getval (rst, “Tdir”)
        Encajonar “N”: Tdir = “del norte”
        Caso “S”: Tdir = “del sur”
        Caso “E”: Tdir = “del este”
        Caso “W”: Tdir = “del oeste”
        Caso: Tdir = ""
    Extremo selecto
    Condado = getval (rst, “condado”)
    Estado = getval (rst, “estado”)
    TractOnly = getval (rst, “TractOnly”)
    
    formatstr = zona
    Si TractOnly = falso entonces
        Seleccionar el caso UCase (el estado)
            Encajonar “TX”, “TEJAS”
                Si formatstr del examen > del "" entonces = formatstr + “de la sección” + examen
                Si BlockNum > formatstr del "" entonces = formatstr + “, bloque” + BlockNum
                Si SurveyName > formatstr del "" entonces = formatstr + “,” + SurveyName
                Si formatstr del condado > del "" entonces = formatstr + “, en” + condado + “condado, Tejas”
                Si formatstr del área cultivada > del "" entonces = formatstr + “conteniendo aproximadamente” + CStr (área cultivada) + “acres, más o menos.”
            Caso “ACEPTABLE”, “OKLAHOMA”
                Si formatstr de S > del "" entonces = formatstr + “de la sección” + S
                Si formatstr de T > del "" entonces = formatstr + “, el municipio” + T + ““+ Tdir
                Si formatstr de R > del "" entonces = formatstr + “, gama” + R+ “,” + Rdir
                Si formatstr del condado > del "" entonces = formatstr + “del meridiano de Cimarron,” + condado + “condado, Oklahoma”
                Si formatstr del área cultivada > del "" entonces = formatstr + “conteniendo aproximadamente” + CStr (área cultivada) + “acres, más o menos.”
        Extremo selecto
    Terminar si
    el formattract = substituye (formatstr, “,”, “, ") 'se libra de comas dobles
    
Función del final
Otras soluciones  
 
programming4us programming4us