常連

注目の的

社会貢献

質問力

自己紹介

newしたクラスをDictionaryに順に追加していき、
１度生成したインスタンスはDictionaryから取得する（何度もnewしない）ようなプログラムを作成しました。
```ここに言語を入力
using System;
namespace TestInstance
{
	public interface AppInterface
	{
		void AppOutPut(string id, string name, string age);
	}
}

```

```ここに言語を入力
using System;
using System.Collections.Generic;

namespace TestInstance
{
	public static class AppManager
	{
		public static AppInterface _IApp = null;
		private static Dictionary<string, AppInterface> _AppList = new Dictionary<string, AppInterface>();
		public static AppInterface LogManager(string IdKey)
		{
			if (_AppList.ContainsKey(IdKey))
			{
				_IApp = _AppList[IdKey];
			}
			else
			{
				_IApp = new AppOutPutInfo();
				_AppList.Add(IdKey, _IApp);
			}
			return _IApp;
		}
	}
}
```

```ここに言語を入力
using System;
namespace TestInstance
{
	public class AppOutPutInfo : AppInterface
	{
		public void AppOutPut(string id, string name, string age)
		{
			Console.WriteLine("番号:{0}", id);
			Console.WriteLine("名前:{0}", name);
			Console.WriteLine("年齢:{0}", age);
		}
	}
}

```

上記のAppOutPut()を呼び出すクラス
```ここに言語を入力
using System;
using System.Windows.Forms;

namespace TestInstance
{
	public partial class Form1 : Form
	{
		public Form1()
		{
			InitializeComponent();
		}

		private void Button1_Click(object sender, EventArgs e)
		{
			AppInterface _ILog = AppManager.LogManager("ID0001");
			_ILog.AppOutPut("001","Yamada","20");
		}

		private void Button2_Click(object sender, EventArgs e)
		{
			AppInterface _ILog = AppManager.LogManager("ID0002");
			_ILog.AppOutPut("002", "Kawasaki", "40");
		}

	}
}
```

上記のようなプログラムを作成しました。
今悩んでいるのは
Button1_Click()実行後にButton2_Click()を実行すると、
「private static Dictionary<string, AppInterface> _AppList = new Dictionary<string, AppInterface>();」
には、プログラムが起動している間は常に「2件」値が入っている状態になります。（これはこれでOKなんです）
 Button1_Click()実行：_AppListに追加
 Button2_Click()実行：_AppListに追加

Button1_Click()の処理が終わった後に、_AppList から削除したい場合、どうしたら実現できましか？
いい方法はありますか？

単に、
Dictionaryのリストから削除( _AppList.Remove("ID0001"); ) で問題ないのでしょうか？

c# newしたオブジェクト破棄する方法

###前提・実現したいこと
スキルアップを好循環でしたい

###環境
- プログラミング歴36年。
- 現在フリー。
- 時々仕事が来てPHPを使ったWebアプリや簡単なスマホアプリを作る程度。
- 自宅で１人でやっている。

###今までやった分野
`BASIC`, `C`, `C++`, `java`, `html`, `javascript`, `css`, `UNIX`, `bash`, `VB`, `ExcelVBA`, `SQL`, `PHP`, `Objective-C`, `swift`
どれをとっても初級者レベルです。



###頼みの綱
- Google
- teratail
- 高い書籍

何かを始めようと思ったときにはWebで調べるか3,000円級の書籍を買うかで迷います。大抵はWebでしばらく頑張って、時間と労力を考えて本に走るパターンが多いです。

###エラーメッセージ

```
Emergency: You are under construction FOREVER.
```
と言うのはジョークですが。

###該当のソースコード
```txt
とある人：「コンピュータは自分の言うことを聞いてくれるから好きだ」
僕：「コンピュータが自分の言うことを聞いてくれないから苦手」
```

###よくやる過ち
- 細部にこだわりすぎて全体を見失う
- 1人でやっているので声をかけてくれる人もいなくて、集中してて気づいたら時間だけが経っている
- 聞ける人がいないので、簡単なアドバイスで分かることに丸1日かけたり

###淡い期待
- コワーキングスペースがあるのでそこに通ったら色々情報が入ってくるかも
- MANABIYAで何かつかめるのではないか

###アドバイスをお願いします
色々手を出してきたのですが、実務に耐えるスキルはごく一部です。使えないから仕事にならない、仕事がないからスキルが上がらないの負のスパイラルです。
もっとスキルを付けたい気持ちでいっぱいなのですが、どうやったら、もしくは何を意識したら出来るのか、アドバイスを頂けますでしょうか。

よろしくお願いします。

###補足 2017.12.24 14:26
補足させていただきます。

「スキルアップのコツを教えてください」と言うのは、出来るエンジニアさんが普段どんな事を考え、どんな事を実践しているのかということをお聞きしたかったのです。

例えばですが「プログラマの三大美徳」ってありますよね。得たスキルをアウトプットすると身につくという話を聞いたこともあります。

駄目なエンジニアに共通する点というのも恐らくあるんだろうと思っています。自分は長時間集中してるつもりで行き詰まり、我慢していたトイレに行ったらすぐに分かったとかはあるあるだと思います。

駄目なエンジニアが出来るエンジニアになるためのアイデアがあったらブレイン・ストーミング的にぽんぽん挙げていただきたいというのが質問の主旨です。

スキルアップのコツを教えてください

### 前提・実現したいこと

VB.NETのフォームアプリケーションで、
テキストボックスなどのコントロールを半透明にしたいと思い、
ネットで検索し、以下のコードに辿り着きました。
ところが、このクラスを継承して正しく利用する方法が分かりません。

### 該当のソースコード

```VB.NET
Public Class CustomTextBox
    Inherits TextBox

    ''' <summary>
    ''' Creates a transparent textbox.
    ''' </summary>
    ''' <remarks>
    ''' Made this up as i went along. No real "back ground" (Nice pun :/) 
    ''' experience in custom controls.
    ''' </remarks>

    Public Sub New()
        MyBase.New()
        SetStyle(ControlStyles.SupportsTransparentBackColor, True)
    End Sub

    Protected Overrides Sub InitLayout()
        MyBase.InitLayout()
        Me.BorderStyle = System.Windows.Forms.BorderStyle.None
        Me.BackColor = Color.Transparent
        Me.Size = New System.Drawing.Size(175, 21)
    End Sub

End Class
```

### 試したこと

Form1_Loadで以下のように記述したのですが、
「o1.InitLayoutはProtectedであるためコンテキストではアクセスできません」と出たため、Public Sub New()を利用するのかとも思いましたが、プロシージャ名がないので
どう使用してよいのかさっぱり分からず困り果てました。

このあたりの使用方法で参考になりそうなページはありますでしょうか。
どうか宜しくお願いいたします。

```VB.NET
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim o1 As New CustomTextBox
        o1.InitLayout()
```
### 補足情報
開発環境:Win10 x64, Visual Studio 2017

[VB.NET]初歩的なご質問ですがクラスの継承方法について知りたいです

お世話になります。

クエリの結果をテキストボックスに表示させたいのですが、うまくいきません。
ブレークポイントを貼ってプログラムを追っていると、クエリの結果はうまく取れているのですが、テキストボックスに代入する部分でうまくいかないようです。

どなたかご教示のほどよろしくお願い致します。
```C#
                DataTable datatable2 = new DataTable();
                StringBuilder tougetu = new StringBuilder();
                SQLiteCommand cmd = con.CreateCommand();

                tougetu.AppendLine("select SUM(損益額) from 損益テーブル");
                tougetu.AppendLine("where 日付 >= @日付From");
                tougetu.AppendLine("and 日付 <= @日付To");

                cmd.Parameters.Add("日付From", System.Data.DbType.String);
                cmd.Parameters.Add("日付To", System.Data.DbType.String);

                DateTime dtToday = DateTime.Today;
                //月初
                DateTime dtFDM = new DateTime(dtToday.Year, dtToday.Month, 1);
                //月末
                DateTime dtLDM = new DateTime(dtToday.Year, dtToday.Month,
                DateTime.DaysInMonth(dtToday.Year, dtToday.Month));

                cmd.Parameters["日付From"].Value = dtFDM;
                cmd.Parameters["日付To"].Value = dtLDM;

                cmd.CommandText = tougetu.ToString();
                var a = new SQLiteDataAdapter(cmd);
                a.Fill(datatable2);
                //ラベルに結果をセット
                //adapter.Fill(datatable2);
                var b = datatable2;
                tetsoneki.Text = b.ToString();

                              //}
                #endregio
```

クエリの結果をテキストボックスに出力したい

### 前提・実現したいこと
SELECT文の実行結果+αをINSERTする。

### 該当のソースコード

```vb.net
INSERT INTO テーブルA(
     列1
    ,列2
)
SELECT 列1
      ,列2
FROM   テーブルB
```

上記の場合はINSERTされるテーブルとSELECTされたテーブルの構造等が
同じときに有効だと思います。


```vb.net
INSERT INTO テーブルA(
     列1
    ,列2
    ,列3
    ,列4
)
SELECT 列1
      ,列2
FROM   テーブルB
```

上記ではINSERTしたいテーブルに列3と列4があったとします。
この2つはSQLを実行した日付（yyyymmdd）と時刻（hhmmss）を登録したいです。
つまりSELECTするテーブルにはない情報となります。
この場合のSQL文の組み立てがわかりません。

よろしくお願い致します。

### 補足情報（FW/ツールのバージョンなど）

言語：vb.net
環境：sql sv2014
　　　Vs2015
　　　Win7

【SQL】SELECT結果+αをINSERTしたい

###前提・実現したいこと
C#.netでフォームの遷移を行いたいのですが、新しいフォームが開いてしまい困っています。
新しいウィンドウではなく同じウィンドウで違うフォームを開くことはできないのでしょうか。

また、フォーム1からフォーム2に文字列を渡し、フォーム2のラベルに受け取った文字列を表示
したいのですが、開いた時点ではには何も表示されずボタンを押すと表示されます。
開いた時点で表示することはできないのでしょうか。

よろしくお願いします。

###ソースコード
フォーム1
private void kaishalist_CellContentClick(object sender, DataGridViewCellEventArgs e)
        {
            var id = kaishalist[e.ColumnIndex, e.RowIndex].Value;
            MessageBox.Show(id.ToString());
            this.name = id.ToString();
              Form2 f = new Form2(this);
              f.Show();
        }

フォーム２
   public partial class Form2 : Form
    {
        Form1 form1;

        public Form2(Form1 mainForm)
        {
            this.form1 = mainForm;

            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            label1.Text = form1.name;
        }

        private void Form2_Load(object sender, EventArgs e)
        {
            label1.Text = form1.name;
        }
    }

###補足情報(言語/FW/ツール等のバージョンなど)
visual studio 2015  
Visual C#  
.net 4.5  
windows フォームアプリケーション  
で作成しています。

C#.netでフォームの遷移

**前提・実現したいこと**
ComboBox1に表示された内容を選んだ時、それに紐づくデータをデータベースから引っ張ってきてComboBox2に表示させたい。
ComboBox2に表示された内容を選んだ時、ComboBox3に紐づくデータをデータベースから引っ張ってきて表示させたい。

**仕様**
初期表示でComboBox1にデータを入れ、ComboBox１に入った内容を選んだ時に、ComboBox2に紐づけされたデータが表示される。
ということをComboBox3まで作成し絞り込みを行いたい。

**困っているところ**
初期表示でComboBox1に入ったデータを選んだ時、ComboBox2に紐づけされたデータが入る。
そこまではなんとかできているのですが、そのComboBox2に入ったデータを選んだ時に、

【インデックスが配列の境界外です】

というエラーが出て落ちてしまします。

**なんとなくわかっている原因**
エラーメッセージから、配列の数が合っていないのではないかという部分までなんとなく予想はできるのですが、その対処法が全く分かりません。
ちなみにコードはこのような感じです。
何かアドバイスいただけないでしょうか。
よろしくお願いいたします。
```VB.NET
Public Class Form1

    Private Const CONNSTRING As String = "Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=C:\Users\yasag\OneDrive\ドキュメント\hiroki_testdb.mdf;Integrated Security=True;Connect Timeout=30"

    Dim h() As String
    Dim m() As String
    Dim s() As String
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Using conn As SqlConnection = New SqlConnection(CONNSTRING)
            Dim sqlstring As String = ""
            sqlstring = sqlstring & " SELECT * "
            sqlstring = sqlstring & " FROM  MA_AREA_LARGE "
            Dim command As SqlCommand = New SqlCommand(sqlstring, conn)
            Dim dataadapter As SqlDataAdapter = New SqlDataAdapter(command)
            Dim ds As DataSet = New DataSet()
            dataadapter.Fill(ds)
            Dim dt As DataTable = New DataTable()
            dt = ds.Tables(0)

            h = New String(dt.Rows.Count - 1) {}
            For i As Integer = 0 To dt.Rows.Count - 1
                Dim dr As DataRow = dt.Rows(i)
                ComboLarge1.Items.Add(dr("AREA_LARGE_NM"))
                h(i) = dr("AREA_LARGE_CD")
            Next

        End Using
    End Sub



    Private Sub ComboLarge1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboLarge1.SelectedIndexChanged
        Using conn As SqlConnection = New SqlConnection(CONNSTRING)
            Dim sqlstring As String = ""
            sqlstring = sqlstring & " SELECT * "
            sqlstring = sqlstring & " FROM MA_AREA_MIDLE "
            sqlstring = sqlstring & " WHERE AREA_LARGE_CD = @LARGE_CD "
            Dim command As SqlCommand = New SqlCommand(sqlstring, conn)
            command.Parameters.Add(New SqlParameter("@LARGE_CD", SqlDbType.NChar))
            command.Parameters(0).Value = h(ComboLarge1.SelectedIndex)
            Dim dataadapter As SqlDataAdapter = New SqlDataAdapter(command)
            Dim ds As DataSet = New DataSet()
            dataadapter.Fill(ds)
            Dim dt As DataTable = New DataTable()
            dt = ds.Tables(0)


            ComboMidle1.Items.Clear()
            ComboMidle1.Items.Add("")


            m = New String(dt.Rows.Count - 1) {}
            For i As Integer = 0 To dt.Rows.Count - 1
                Dim dr As DataRow = dt.Rows(i)
                ComboMidle1.Items.Add(dr("AREA_MIDLE_NM"))
                m(i) = dr("AREA_MIDLE_CD")
            Next


        End Using
    End Sub

    Private Sub ComboMidle1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboMidle1.SelectedIndexChanged
        Using conn As SqlConnection = New SqlConnection(CONNSTRING)
            Dim sqlstring As String = ""
            sqlstring = sqlstring & " SELECT * "
            sqlstring = sqlstring & " FROM MA_AREA_SMALL "
            sqlstring = sqlstring & " WHERE AREA_MIDLE_CD = @MIDLE_CD "
            Dim command As SqlCommand = New SqlCommand(sqlstring, conn)
            command.Parameters.Add(New SqlParameter("@MIDLE_CD", SqlDbType.NChar))
            command.Parameters(0).Value = m(ComboMidle1.SelectedIndex)
            Dim dataadapter As SqlDataAdapter = New SqlDataAdapter(command)
            Dim ds As DataSet = New DataSet()
            dataadapter.Fill(ds)
            Dim dt As DataTable = New DataTable()
            dt = ds.Tables(0)


            ComboSmoll1.Items.Clear()
            ComboSmoll1.Items.Add("")


            s = New String(dt.Rows.Count - 1) {}
            For i As Integer = 0 To dt.Rows.Count - 1
                Dim dr As DataRow = dt.Rows(i)
                ComboMidle1.Items.Add(dr("AREA_SMALL_NM"))
                s(i) = dr("AREA_SMALL_CD")
            Next


        End Using
    End Sub
End Class
```

VB.NET エラー：［インデックスが配列の境界外です]に関しての質問です。

### 前提・実現したいこと

正規表現で文字列から特定の文字を抜き出したいです。
抜き出す条件は「◎以降の（+5,000円）」の「5,000」の部分の文字列だけ抜き出したいです。
ここの値段や◎以降の文字列の数が決まっておらず、法則としては
「◎が含まれていれば（+10,000円）のように何かしらの加算金額が記載されている」という法則です。
Matchesメソッドではなく、Matchメソッドで最初に一致した部分を抽出したいです。
実力不足の雑魚ですがご教示をお願い致します。
### 試したこと

(?<=(◎))(.*)(?=）)
で取得してみましたが、◎以降の文字列がついてくる状態です、、、

### 補足情報（FW/ツールのバージョンなど）

言語はC#
Windows　Formを使用してアプリを作成中です
VisualStudio2017という環境です。

正規表現で文字列から特定の文字を抜き出したい。

### 前提・実現したいこと

Visual Basicで事務システムを作っています。

Datasourceの有無でボタンの押下フラグを変更する方法が分かりません。

データベースに接続して持ってきたDatasourceAとBをLEFT JOINで
事務マスタという画面のDataGridに表示しているのですが、

DataGridに持ってきたDatasourceBのデータが空の場合は、
事務マスタの画面のDataGridにはデータソースAのデータしか見えないようになっています。

ここまでは完成しているのですが、

DataGridに持ってきたDatasourceAが存在し、Bのデータが空の場合に、
ボタンの押下フラグをTrueにしたいのですが、やり方が分からず、
ご質問させていただきました。

ご教示いただけますと幸いです。宜しくお願い致します。


### 発生している問題・エラーメッセージ

```
'構文的に無理だと分かっているのですが、やり方が分かりません。
IF

Dim stbSql As New System.Text.StringBuilder

stbSql = New System.Text.StringBuilder
stbSql.AppendLine("SELECT *")
stbSql.AppendLine("FROM DatasourceB")
stbSql.AppendLine("WHERE TargetYear = 2019")
BindingSource.DataSource = GetData(stbSql.ToString)

Then


'DatasourceBのデータが1件もない場合は下記の処理を行う
If BindingSource.Count = 0 Then
  
　 'ボタン制御
   btnYearUp.Enabled =True
Else   
   'ある場合はこちらの処理↓
   btnYearUp.Enabled =False

End If
End IF



```

### 該当のソースコード

```ここに言語名を入力

'割愛させていただきますが、
'DatasourceAにはTargetYear=2019のデータソースが入っているとします。
'そして事務マスタの画面のDataGridにはDatasourceABが画面上に見えていますが、
'実際にはDatasourceBのデータが空のためDatasourceAしか見えていないとします。


Private Sub CheckYear()

'このSQL構文に条件文を書きたいと思っています。
Dim stbSql As New System.Text.StringBuilder

stbSql = New System.Text.StringBuilder
stbSql.AppendLine("SELECT *")
stbSql.AppendLine("FROM DatasourceB")
stbSql.AppendLine("WHERE TargetYear = 2019")
BindingSource.DataSource = GetData(stbSql.ToString)


'DatasourceBのデータが1件もない場合は下記の処理を行う
If BindingSource.Count = 0 Then
  
　 'ボタン制御
   btnYearUp.Enabled =True
Else   
   'ある場合はこちらの処理↓
   btnYearUp.Enabled =False

End If







```

### 試したこと



### 補足情報（FW/ツールのバージョンなど）

Windows Formsを作っています。
OSはWindows10です。
Visual Studio2017
Microsoft SQL Server Management Studio 2017

【条件文】Datasourceの有無でボタンの押下フラグを変更する方法

VB.NETについての基本的な質問なのですが、プロパティについていまいち理解することができません。
自分なりに調べてはみたのですが、分かったことは、

・プロパティ内でGET、SET以外の処理を記述することができる。
・直接変数を触らなくてもいい。
・その変数が複数で使用されていて、それに対する変更が必要となった場合、一か所を修正するだけでいい。

ということです。

Publicなメンバ変数とは違うということはなんとなくわかったのですが、
まだすっきりとしません。

        ```ここに言語を入力
    Public Property SampleData As XXXX

        Get
            Return ZZZ
        End Get
    Set(value As XXXX)
            ZZZ = value
        End Set

    End Property

```

のような記述をすると思うのですが、具体的にこのプロパティ内で
どのような処理を行っているのでしょうか。

SampleDataに値が渡されてきた後の処理の流れを教えていただけないでしょうか。

【VB.NET】プロパティについて

こんばんわです。。
連日の質問となってしまい申し訳ないのですが、構造体について教えていただきたく、質問させていただきました
自分は変数の値等をいつもモジュールにまとめていて、Publicで宣言して値を呼び出しているのですが、
色々調べているうちに　クラスと構造体にたどり着きました
ですが、自分はどちらも使ったことがなく、調べてみたのですが、構造体の使い方がサイトによって使い方が異なっていて、使い方がわからなく困っています

宣言のしかた
構造体への値の代入方法
別フォームから構造体の値を持ってくる方法

この三つが知りたいです、、
どなたかソースで教えていただけると助かります、、
よろしくお願いします。。。

※構造体は同じ変数の型をまとめておくことができるもの、、ということだけは調べてわかりました、、です。

VB.NET 構造体について

C#でMySQLデータベースに接続し、データを取得、表示させたいです。

自分なりに調べてみたところ、以下のような形で実現はできました。
```C#
//サーバー接続
string connstr = "server=サーバー名; userid=ユーザー名; password=パスワード; database=データベース名;";
MySqlConnection conn = new MySqlConnection(connstr);
conn.Open();

// データを格納するテーブル作成
DataTable dt = new DataTable();

// SQL文と接続情報を指定し、データアダプタを作成
MySqlDataAdapter da = new MySqlDataAdapter("select * from table", conn);

// データ取得
da.Fill(dt);

// データ表示
dataGridView.DataSource = dt;
```
しかし、いくつか疑問点があります。
１．string connstrに直接サーバー名やユーザー名を記述するのは大丈夫なのか？
(パスワードが直接書いてあるのがセキュリティ的に問題ないのか、ユーザーIDなどが変わったときに毎回プログラムを変更しないといけないのは面倒ではないか)
２．データアダプタはSQLを投げたい度に作成しないとなのか？
３．dataGridView以外の方法で表示させたい場合はどうするのか？
４．サーバーの接続はデータを取得したいタイミングで接続し、データを取得したらその都度閉じるべきなのか？

また、visualstudioを統合開発環境としているのですが、、、
![イメージ説明](bd4e289fb79ea4332fea2d5733b445b1.png)
このサーバーエクスプローラーの活用方法がイマイチわかりません。

データベースを用いた開発は今回が初めてです。拙い質問ばかりですみません。。。
開発環境はvisualstudio2017、C#、MySQL5.7です。
よろしくお願いします。m(__)m

C#、MySQLを用いた開発でいくつかの疑問点があります

### 前提・実現したいこと

C#で、ASP.NETアプリケーションを使ってWEBフォームを作っています。
開発環境は、VisualStudio2017になります。

GridViewにxmlを読み込ませ、データを表示させてみました。
VSで実行すれば、動作確認はできますが、公開方法がわかりません。

このサービスを全体に公開（みんなが見れる状態）するには、どれをどうすればいいのでしょうか？

初歩的すぎる質問で申し訳ないです。。

ASP.NETアプリケーションの公開方法

###前提・実現したいこと
![イメージ説明](0086a7d543391c6892ee819c2e172e18.png)
上図のようなテキストファイルを読み込み、DataTableに格納するプログラムを書いています。

しかし、ある条件下では、
BとDの値を入れ替えたいと思っています。

例)
B 430 420 700
D 220 200 600


###発生している問題・エラーメッセージ
1行ずつ読み込んでいる関係で、どう実現すればいいか悩んでいます。

###該当のソースコード
```ここに言語を入力
       Dim datatable As DataTable = New datatable

            Dim datarow As DataRow

            Dim parser1 As TextFieldParser = New TextFieldParser(filepath, Encoding.GetEncoding("Shift_JIS"))

            parser1.TextFieldType = FieldType.Delimited
            parser1.SetDelimiters(vbTab) '区切り文字はタブ

            '読み込み行がなくなるまで
            While (Not parser1.EndOfData)
                ' 1行読み込み
                Dim row1 As String() = parser1.ReadFields()
                datarow = datatable.NewRow()

                ' datatableのrowのcolumn数だけループ
                 For i As Integer = 0 To row1.Count - 1
                      datarow(i) = row1(i)

                 Next i
                       datatable.Rows.Add(datarow)

            End While
```

###その他
このコードの流れで実現することは可能でしょうか。

ご教授お願い致します。

.NETで、配列の要素を並び替えしたい

現在c# でフォルダパスを取得しようとしていますが、
例えば、C:\Users、C:\Program Files、C:\Program Files (x86)、C:\Windows　などフォルダなど、管理者が必要？なフォルダがあります。

フォルダには読み取り専用など属性があり、その取得方法はネット上でも出てくるのですが、管理者権限を含んでいるかどうかは、どのように判定するのでしょうか？

上記の内容では、自分の認識が誤っている場合があるので、
下記の画像を2枚用意しています。
画像における青黄色の盾アイコンが含まれている、含まれていないの
判定方法をc# スクリプトで知りたいのです。

①
![イメージ説明](dfd444e25f53a602cdfc05ef236d2ae4.png)

②
![イメージ説明](23f814cfc826b74ad570977b78f27c6c.png)

c# 管理者権限が必要なフォルダパスかの判定

何かのメソッドを途中で終わらせるときに自分はexit sub を使用しますが同僚はreturnを使用します。ただ終わらせるだけですが違いはあるのでしょうか？

returnとexit sub

### 前提・実現したいこと
C#でイベントについて学習しています。

独自のEventArgsを使用する際に、色々なサンプルでEventArgsを継承すると書かれているのですが
継承が必要な理由がよくわかりません。
以下、TextBoxでXキーが押された際に実行されるイベントを作ってみました。

この際、XKeyDownArgsでEventArgsを継承してもしなくても挙動は変わらないように見えます。
EventArgsを継承することの利点や、しなければならない理由が何かあるのでしょうか？

よろしくおねがいします。


### 該当のソースコード

```C#
public partial class Form1 : Form
{
    private event EventHandler<XKeyDownArgs> XKeyDown;

    public Form1()
    {
        InitializeComponent();
    }

    private void Form1_Load(object sender, EventArgs e)
    {
        XKeyDown += XKeyDownMessage;
    }

    private void TextBox1_KeyDown(object sender, KeyEventArgs e)
    {
        if (e.KeyCode == Keys.X)
        {
            XKeyDown?.Invoke(sender, new XKeyDownArgs());
        }
    }

    private void XKeyDownMessage(object sender, XKeyDownArgs e)
    {
        MessageBox.Show("Xキーが押されました");
    }
}

// EventArgsを継承してもしなくても問題なく動作する
public class XKeyDownArgs : EventArgs
{
}
```

EventArgsを継承したクラスを使用する意味はなんでしょうか？

### 環境

・Windows server 2012R
・SQLserver2008 R2
・VB.net

### 前提・実現したいこと

SQLserver2008 R2で開発したシステムをグローバルIPアドレスで繋げて使用できるようにしたいです。

（前提・検証済みの内容）
　・ローカルIPアドレスとグローバルIPアドレスの紐付けが正しいことは検証済み
　・SQL serverのポート(14333)をプライベート・パブリック・ドメインで解放しています。
　・開発したシステムにバグはありません。

### 発生している問題・エラーメッセージ

固定IPアドレスを使用しており、ローカルIPアドレスとグローバルIPアドレスの紐付けはルーター・サーバーの設定で完了しています。
以下の記述を行った場合に、グローバルIPアドレスだと接続ができなくなります。
（※以下は続けて記述していません。それぞれコメントアウトして記述して試しました。）

【接続可能】
Public Cn = New SqlClient.SqlConnection("Server=ローカル固定IP,14333;User ID=ユーザーID;Password=パスワード;Initial Catalog=インスタンス名")

**【接続不可】
Public Cn = New SqlClient.SqlConnection("Server=グローバル固定IP,14333;User ID=ユーザーID;Password=パスワード;Initial Catalog=インスタンス名")**

当記述は、現在運用しているサーバーでは、正常に接続されます。
現在運用しているサーバーと同じ設定でかつ、同じ内容で固定されたIPアドレスを使用しているのに、なぜ動作しないのか分かりません。

```
エラーメッセージ
```

グローバルIPアドレスで繋げた場合に、以下のエラーメッセージが出力されます。

SQL Server への接続を確立しているときにネットワーク関SQL Server への接続を確立しているときにネットワーク関連またはインスタンス固有のエラーが発生しました。サーバーが見つからないかアクセスできません。インスタンス名が正しいこと、および SQL Server がリモート接続を許可するように構成されていることを確認してください。 (provider: TCP プロバイダ, error: 0 - 接続済みの呼び出し先が一定の時間を過ぎても正しく応答しなかったため、接続できませんでした。または接続済みのホストが応答しなかったため、確立された接続は失敗しました。)連またはインスタンス固有のエラーが発生しました。サーバーが見つからないかアクセスできません。インスタンス名が正しいこと、および SQL Server がリモート接続を許可するように構成されていることを確認してください。 (provider: TCP プロバイダ, error: 0 - 接続済みの呼び出し先が一定の時間を過ぎても正しく応答しなかったため、接続できませんでした。または接続済みのホストが応答しなかったため、確立された接続は失敗しました。)


### 該当のソースコード

上記でも記載していますが、以下の記述だと、エラーになり、接続が出来なくなります。

**Public Cn = New SqlClient.SqlConnection("Server=グローバル固定IP,14333;User ID=ユーザーID;Password=パスワード;Initial Catalog=インスタンス名")
**

### 試したこと

以下サイトは一例ですが、ファイアウォールの設定・SQL serverの設定・cmdを使用したping送信等全て行っており、正常に動作する別サーバーとの設定内容の差異も確認して修正しています。

・http://ivystar.jp/database/sql-server/how-to-be-able-to-connect-from-the-outside-in-sql-server/
・https://qiita.com/Nanakusajp/items/7211a5721e725fc6329c

SQL Serverにて、ローカルIPで接続できるのに、グローバルIPアドレスで接続できない原因について。本当に困っています、どなたかご教示ください。

以下のSQL文を副問い合わせを用いずに同様の結果を得られるようにしたい。
```sql
SELECT 商品.商品名, tmp.sum 
FROM 商品,(SELECT 注文.商品id,SUM(商品.単価*注文.数量)
FROM 商品,注文 WHERE 商品.商品id = 注文.商品id
GROUP BY 注文.商品id)
AS tmp WHERE 商品.商品id=tmp.商品id;
```
商品idごとの合計注文額（商品.単価×注文.数量）を把握したいと思い作成しましたが、副問い合わせを抜かせないか検証しましたができませんでした。ご指導よろしくお願いします。


追記

希望する結果:

商品テーブルに書いてある商品の単価と注文のテーブルに書いてある数量を掛け合わせた合計注文額を表示したい。その際、商品テーブルに置いて商品名と商品idは紐づけされているため、商品idに紐づけられた商品名と、その商品における合計注文額を表示するようにしたい。

変更することによる期待などではなく、今回初めて副問い合わせに触れたので、取り外すことはできないのか気になったため質問させていただきました。

商品テーブル
https://cdn.discordapp.com/attachments/576814058812997633/596507290807435284/a.jpg

注文テーブル
https://cdn.discordapp.com/attachments/576814058812997633/596507701698101249/a.jpg

得たい結果
https://cdn.discordapp.com/attachments/576814058812997633/596509367444963348/a.jpg

SQL文で、副問い合わせを用いない文章にしたい。

いつもお世話になっております。

プログラミングが自分に向いていない気がしています。この業界に来て二、三年になります。
技術的な質問ではないのですが、みなさまからの客観的なアドバイスが欲しく、投稿させていただきます。

一切プログラミングを触ったことがなかった文系なのですが、二三年ほど前にどうしても行きたい企業があり、そこが偶然WEBプログラマを募集していたので、独学でWEBプログラミングを習得しました。無事に就職でき、仕事を始めたのですが、WEBアプリケーションの作成が一切楽しくないのです。

しばらく経って、当時勤めていたところの上司とよく腹を割って話していたので「自分とプログラミングがどう結びついているのかわからないし勉強も仕事もしんどいです」と話したところ「お前は向いていない」という発言こそもらいませんでしたが、「お前毎日しんどそうにプログラミングしてるよな。お前が一生プログラミングを続けているイメージは正直俺にはないし、プログラマという職業を一生続けなくても生きていけるよ」「○○さんとかは本当にプログラミングが好きで好きで仕方なくてこの仕事やってるし、ワクワク感がないなら他の仕事やったほうがいいよ。好きなことやるのが一番だよ」というような返答をいただきました。(上司の名誉のために付け加えますがパワハラは一切なかったです)

その後WEBアプリケーションプログラミングから離れて、他のIT系に転職しました。インフラ寄りの仕事をしています。自分はペーペーなんだし勉強しなきゃという謎の焦りがあり、とにかく通勤中や休日にも勉強しまくりました。そのお陰か知識もある程度付いてきて、LinuxやSQLやDBやvimなどは特に抵抗なく触れるようになりました。最低限技術を使えるようになっているので楽しいといえば楽しいけどプログラミングの勉強はワクワク感はなく相変わらずしんどいなあという状態です。

また、転職後の職場の人間関係が悪かったということと、残業の後や休日もひたすら勉強に費やしていたので、うつになり体調を崩してしまいました。人間関係が悪かったというのもありますが、ワクワク感を抱きながら勉強や仕事をしているのであればここまで追い込まれないのかなあと思ったりします。IT系で自分はこういうキャリアを歩みたいというキャリアデザインのイメージもありません。

長文になってしまい恐縮ですが、他の業界に行ったほうがいいでしょうか。どうぞ宜しくお願い致します。