()
VBA. N . , .| () | |
| Abs(N) | N |
| Atn(N) | N () |
| Cos(N) | N () |
| Fix(N) | N. , . N , , N |
| Rnd(N) | : . ( Randomize) |
| Sgn(N) | : -1, N - ; 1, N - ; 0, N 0 |
| Sin(N) | N () |
| Sqr(N) | N. N - |
| Tan(N) | N () |
N - ; S - ; E - . , .
| () | |
| Chr(N) | , N, 0 255 ( ) |
| Format(E,S) | , , , , S |
| RGB(N,N,N) | Long, . N 0 255 |
| Str(N) | , N |
| Val(S) | , , S, , 0 |
| CDate(E) | Date. E ( ), 1/1/100 - 12/31/9999 |
| CInt(E) | Integer. - , |
| CStr(E) | String. - , |
N - ; D - Date ( , Date). , .
| () | |
| Date() | |
| Time() | |
| Now() | |
| Year(D) | , Date . 100 9999 |
| Month(D) | , Date . 1 12 |
| Day(D) | , Date . 1 31 |
| Hour(D) | , , Date. 0 23. , 0 |
| Minute(D) | , , Date. 0 59. , 0 |
| DateValue(E) | Date, , , , , |
| TimeValue(E) | Date, , , , , |
|
|
|
N - ; S - . , .
| () | |
| InStr(N1,S1,S2,N2) | S2 S1. N1 . N2 , . N1, N2 - |
| Lcase(S) | ( String), S , |
| Left(S,N) | : N S, S |
| Len(S) | S, |
| Ltrim(S) | S ( ) |
| Mid(S,N1,N2) | : N2 S, S, N1. N2 - , , S N1 |
| Right(S,N) | String: N S, S |
| Rtrim(S) | S ( ) |
| Space(N) | N |
| StrComp(S1,S2,N) | S1 S2 , : -1, S1<S2; 0 - S1=S2; 1 - S1>S2. N |
| StrConv(S,N) | , , N. VBA StrConv. : vbProperCase ( , , , ), vbLowerCase ( ) vbUpperCase ( ) |
| String(N,S) | N , , S |
| Trim(S) | S |
| Ucase(S) | S , |
VBA.
|
|
|
. LTrim, RTrim, Trim.
RemoveBlank str0. , , .. , , . VBA , : LTrim, RTrim, Trim. , , , .
Sub RemoveBlank()
Dim Str0, Str1, Str2, Str3
Str0 = " "
Str1 = RTrim(Str0)
Str2 = LTrim(Str0)
Str3 = Trim(Str0)
MsgBox "(" & Str1 & ")" & Chr(13) & _
"(" & Str2 & ")" & Chr(13) & _
"(" & Str3 & ")"
End Sub
