teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

3

補足

2018/04/16 10:27

投稿

umyu
umyu

スコア5846

answer CHANGED
@@ -22,8 +22,8 @@
22
22
  上の人にもう一度説得してみるのをおすすめします。
23
23
 
24
24
  ◇補足
25
- Optional def As String = ""のデフォルト値は
25
+ `Optional def As String = ""`のデフォルト値は
26
- "" か Nothing かはどちらか選択して、定義してくださいな。
26
+ `""``Nothing` かはどちらか選択して、定義してくださいな。
27
27
 
28
28
  ◇参考情報
29
29
  [AppSettingsSection.Settings](https://msdn.microsoft.com/ja-jp/library/system.configuration.appsettingssection.settings(v=vs.110).aspx)

2

追記

2018/04/16 10:27

投稿

umyu
umyu

スコア5846

answer CHANGED
@@ -21,5 +21,9 @@
21
21
  注意点として**ドキュメント化は必須です。**
22
22
  上の人にもう一度説得してみるのをおすすめします。
23
23
 
24
+ ◇補足
25
+ Optional def As String = ""のデフォルト値は
26
+ "" か Nothing かはどちらか選択して、定義してくださいな。
27
+
24
28
  ◇参考情報
25
29
  [AppSettingsSection.Settings](https://msdn.microsoft.com/ja-jp/library/system.configuration.appsettingssection.settings(v=vs.110).aspx)

1

追記

2018/04/16 10:26

投稿

umyu
umyu

スコア5846

answer CHANGED
@@ -1,5 +1,25 @@
1
1
  あんまりプログラム内に設定情報を埋め込むのは良くないのですが。
2
- クラスを1個作成するか、関数を作成してConfigurationManager.AppSettingsにキーが存在しない時は、値を返す形にしてあげればよいかと。
2
+ クラスを1個作成するか、関数を作成してConfigurationManager.AppSettingsにキーが存在しない時は、値を返す形にしてあげればよいかと。デフォルト値を返すという形です。
3
3
 
4
+ ```VB.NET
5
+ Class MainWindow
6
+ Public Function GetValue(ByVal name As String, Optional def As String = "") As String
7
+ Dim val As String = Configuration.ConfigurationSettings.AppSettings.Get(name)
8
+ If val Is Nothing Then
9
+ Return def
4
- 注意点として
10
+ End If
11
+ Return val
12
+ End Function
13
+ Private Sub button_Click(sender As Object, e As RoutedEventArgs) Handles button.Click
14
+ Console.WriteLine(GetValue("Setting1"))
15
+ Console.WriteLine(GetValue("Setting3", "aaaaa"))
16
+ End Sub
17
+ End Class
18
+
19
+ ```
20
+
5
- **ドキュメント化は必須です。**
21
+ 注意点として**ドキュメント化は必須です。**
22
+ 上の人にもう一度説得してみるのをおすすめします。
23
+
24
+ ◇参考情報
25
+ [AppSettingsSection.Settings](https://msdn.microsoft.com/ja-jp/library/system.configuration.appsettingssection.settings(v=vs.110).aspx)