質問編集履歴
2
１
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -12,7 +12,8 @@
|
|
|
12
12
|
|
|
13
13
|
です。
|
|
14
14
|
ご教授お願いします。
|
|
15
|
+
```
|
|
15
|
-
|
|
16
|
+
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
|
16
17
|
Static p As Integer
|
|
17
18
|
p = -Len(TextBox2.Text) + 1
|
|
18
19
|
p = InStr(p + Len(TextBox2.Text), TextBox1.Text, TextBox2.Text)
|
1
１
title
CHANGED
|
File without changes
|
body
CHANGED
|
File without changes
|