質問編集履歴
2
誤字の訂正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -8,7 +8,7 @@
|
|
|
8
8
|
|
|
9
9
|
|
|
10
10
|
|
|
11
|
-
文字化け直す方法を教えてください。
|
|
11
|
+
文字化けを直す方法を教えてください。
|
|
12
12
|
|
|
13
13
|
|
|
14
14
|
|
|
@@ -54,7 +54,7 @@
|
|
|
54
54
|
|
|
55
55
|
|
|
56
56
|
|
|
57
|
-
Private Sub Button
|
|
57
|
+
Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button.Click
|
|
58
58
|
|
|
59
59
|
|
|
60
60
|
|
|
@@ -64,13 +64,9 @@
|
|
|
64
64
|
|
|
65
65
|
'ファイルに表示させる文字列
|
|
66
66
|
|
|
67
|
-
Dim
|
|
67
|
+
Dim word As String = "ABCDEFG"
|
|
68
68
|
|
|
69
|
-
|
|
70
|
-
|
|
71
|
-
WriteFile(cre,
|
|
69
|
+
WriteFile(cre, word, 7, 0, 0)
|
|
72
|
-
|
|
73
|
-
|
|
74
70
|
|
|
75
71
|
CloseHandle(cre)
|
|
76
72
|
|
1
実現したいことの文を追加
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -8,7 +8,7 @@
|
|
|
8
8
|
|
|
9
9
|
|
|
10
10
|
|
|
11
|
-
|
|
11
|
+
文字化け直す方法を教えてください。
|
|
12
12
|
|
|
13
13
|
|
|
14
14
|
|