|
MyDate = StringUpper(dateTimeString("localTime?", True))
# a! E+ f4 G: j, }MyDay = subString(MyDate, 9, 10)
7 r. l. y3 w0 {MyMonth = subString(MyDate, 5, 7)
7 E' M/ Z' N- MMyYear = subString(MyDate, 21, 25)' h' V; o; b# L* q" f7 J
MyTimeStamp = MyDay + " " + MyMonth + " " + MyYear/ S! O6 T0 X9 \; r/ z+ s" T
上述表达式在UG7.0中是可以输进去的,就是下面的这一段总是输不进去,我试着改了几处也不行,知道的网友说下为什么在UG7.0中就输不进去呢,下面这段字符串表达式在UG8.0中就没问题5 Y# t) C* n5 P
B= If(subString(dateTimeString("localTime?",True),5,7)="Jan")
) v7 Z1 k. V4 U& N, @
; `( e2 ?; Y7 C! V3 s("01")
. o6 X! v2 W( _0 c* C
5 ^: v; [5 s( D/ e7 @9 gElseIf(subString(dateTimeString("localTime?",True),5,7)="Feb")
+ G5 T! E7 O) p- J9 s/ Z' [6 N4 B4 X8 @1 W9 \9 E& i4 n" \& E* E
("02")
3 Y3 y, ?# k9 [1 _1 @5 ]( o$ h9 B& V
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Mar")
( K/ e' J6 c6 b v. O0 a6 E4 Y4 u. m5 b
("03")6 J1 Y/ B. M1 p
/ D% u( R% a9 G: c" N. A; n" SElseIf(subString(dateTimeString("localTime?",True),5,7)="Apr")
( K, h: C- {. ~7 z) c$ U. V; b5 K( e% Y4 J
( I( n/ u9 C; b% N" E7 h("04")1 x! M# ^7 K l& w+ E
( ?2 ~1 g: `( e* Y, ~5 K& a3 FElseIf(subString(dateTimeString("localTime?",True),5,7)="May")9 ~" U4 A& x- b. v {- r
: W2 x2 v' ?' x% b' K4 }: t
("05")
$ D" r6 a; ]4 ?" I% w7 A' p2 `
2 P$ T% s1 J3 x: oElseIf(subString(dateTimeString("localTime?",True),5,7)="Jun")' O5 W0 r; z x* y0 n
& z+ v _* h. |) [/ A# C("06"): h# l4 i* I* G: j
/ m6 h7 i. l. w6 ^% MElse If(subString(dateTimeString("localTime?",True),5,7)="Jul")( R8 R$ R8 |, n
* O3 C, A- f! |2 ^ T("07")) X/ s' U1 B c- M
! U5 o* s& {6 a! p7 [ P
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Aug"); ?# {. g5 j5 E5 l2 o6 w
8 H; n. W( L7 Y: M" F& L/ l("08")7 e+ ]. G' J7 A: I G4 m1 X) @5 e
2 l; Z) ^ g3 {/ E4 f
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Sep")- L+ M$ z8 I" l0 c
, P- V% F% I5 p7 S: o("09")) u' h. ^( v$ ^9 K( u
. P5 P3 N6 d0 A$ U# `
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Oct")
1 D; `5 i3 S. {( C6 @1 u# ]
- M. C, H+ x+ k/ ?2 l("10")
* {/ k. n% e7 t( G S; }& r8 J) L6 M- s. c1 x3 U ]. `
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Nov")- I/ q' P) w! h7 f) F7 O
2 S6 f- \8 A* N# i8 M( h7 D2 o("11")
( Q3 q# P" f! A U1 @9 H2 {" z7 @% u4 o, _
Else("12")
8 n3 k% u: P6 C8 ?% T8 jDate=A+“.”B+“.”+C
6 {/ T5 U5 Y0 I6 I& Z k( c' u, S
|
|