|
MyDate = StringUpper(dateTimeString("localTime?", True)). l; t& u. p& T$ i. l @
MyDay = subString(MyDate, 9, 10)* g t. D y" [9 u
MyMonth = subString(MyDate, 5, 7)4 p: q! @' @0 g) Q% y, S$ R) }
MyYear = subString(MyDate, 21, 25)
; x$ `4 v- Z% rMyTimeStamp = MyDay + " " + MyMonth + " " + MyYear
7 e J! g9 r. Z# B$ h! Y- \上述表达式在UG7.0中是可以输进去的,就是下面的这一段总是输不进去,我试着改了几处也不行,知道的网友说下为什么在UG7.0中就输不进去呢,下面这段字符串表达式在UG8.0中就没问题
0 P& \( R/ \% H& P& rB= If(subString(dateTimeString("localTime?",True),5,7)="Jan")! j" F0 I8 s5 J6 i6 n8 J$ W. R
& b7 b7 |- P, p
("01")
/ j# a. [/ Y ?$ r2 ^* |
e4 b* A. W5 k1 q: ^* QElseIf(subString(dateTimeString("localTime?",True),5,7)="Feb")' t+ v" C0 G, L+ g. e
' R2 u7 E: l$ [( w; ~( H4 ?/ o
("02")
2 W* E. v9 L- X( [ j1 p* v& D7 r6 R" `! E1 g% B% m
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Mar")
/ _" m, N) V' M. h8 g- t( b2 g B: w+ ?& A" Y, L) o6 S
("03")
! P( B [$ I" O: P3 i9 i% K/ ?
- D' ^2 _6 C" D! ZElseIf(subString(dateTimeString("localTime?",True),5,7)="Apr")
8 U0 W- {8 |2 T! u: A* @7 z( q# L, V/ {0 T- r3 }% Q4 u
("04")
. o* c# q1 v/ L, y6 V3 O! l
i, S5 I( \: }8 x& HElseIf(subString(dateTimeString("localTime?",True),5,7)="May")
F: S( p, x6 N
. i+ W/ A# e& K/ L8 k("05")
) ^0 v" z* I* \& t
& ~, b d9 ?! F0 b) ^3 ?3 x" ~ElseIf(subString(dateTimeString("localTime?",True),5,7)="Jun")
/ ?6 L3 k9 W, c7 ` ?3 d& A; a7 t6 t& `% c$ n/ K7 q- k
("06")" X* y& z, a$ M3 e6 t
, Z8 e/ V( ~8 N* `7 g; tElse If(subString(dateTimeString("localTime?",True),5,7)="Jul")
; F' `4 Q, n Q/ C! s" v9 X6 D: ?
3 x t) }3 l( W1 Q("07")
! J- e5 ~8 B9 |6 j0 Y% d# f, f& n4 g. {1 m
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Aug")& Y% W8 l! l7 l, L& u [$ ?
) U( ^1 n1 i; c5 a+ u
("08")) s% R2 }2 J5 F) e: Y
0 ~0 `: c8 i- ]$ _ElseIf(subString(dateTimeString("localTime?",True),5,7)="Sep")
& U. m6 w8 Z7 z0 A( d# `
0 d7 X+ r1 d& I5 l8 O. k" g5 C("09")
) L$ U& p8 X* A( J, Y+ k$ G
% O$ D2 r; o: U1 z0 ~0 }+ O; [8 yElseIf(subString(dateTimeString("localTime?",True),5,7)="Oct")
; Q4 O% Y+ }, s: D! U3 G7 T+ G+ B3 f+ m8 }( y) |4 D+ ^; I' o
("10")4 F Q6 J% ?) y+ l w
' }& G* Y G' @9 Z
ElseIf(subString(dateTimeString("localTime?",True),5,7)="Nov")
1 ^1 _' k( H; g. b1 J5 J" O- J U
" k# T3 i4 W* D0 x5 v("11")
1 d e a1 L( b% x e# \6 ^/ F" }' n& R+ @7 f/ K
Else("12")- m4 M1 `5 C( v* W" u: C
Date=A+“.”B+“.”+C
0 g2 d# P' U8 }2 i8 `. ^
* @& ?! W% `4 u$ h5 n' |2 L( K |
|