質問編集履歴
2
質問追記
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -16,4 +16,4 @@
|
|
|
16
16
|
```
|
|
17
17
|
よろしくお願いします。
|
|
18
18
|
|
|
19
|
-
|
|
19
|
+
(質問追記)
|
1
質問追記
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -1,6 +1,9 @@
|
|
|
1
1
|
Access VBA 二桁の数から四桁の西暦年を出します。
|
|
2
2
|
例えば22とあれば、2022(年）とします。
|
|
3
|
-
現在"20"を連結しています
|
|
3
|
+
現在"20"を連結しています。
|
|
4
|
+
この方法では、システムの設定に合わせて2100年以降の値を得る、
|
|
5
|
+
ということができません。
|
|
6
|
+
連結しない方法はありますでしょうか。
|
|
4
7
|
```AccessVBA
|
|
5
8
|
Dim 数値 As String
|
|
6
9
|
数値 = 20
|
|
@@ -12,3 +15,5 @@
|
|
|
12
15
|
Debug.Print Year(Right(数値, 2)) → 1900となる
|
|
13
16
|
```
|
|
14
17
|
よろしくお願いします。
|
|
18
|
+
|
|
19
|
+
（質問追記）
|