常連

### 実現したいこと
PowerShellでWebSocketのサーバを作っていますが、エラーが出ます。

### 詳細
.Net の System.Net を使って WebScoket のサーバを作っています。
下記のリファレンスの通り、次のようにコールしているんですが、後述のようなエラーが出てしまいます。

### リファレンス
https://learn.microsoft.com/ja-jp/dotnet/api/system.net.httplistenercontext.acceptwebsocketasync?view=net-8.0

### コール
```
$objContext.AcceptWebSocketAsync($null)
```

### 発生している問題・エラーメッセージ
```
"1" 個の引数を指定して "AcceptWebSocketAsync" を呼び出し中に例外が発生しました: "空の文字列は、有効な subprotocol 値ではありません。値を指定しない場合は、"null" を使用してください。
```

### 試したこと
調べた限りでは、この関数のオーバーロードのもととなる関数は引数が３つの関数のようでしたので、そのリファレンスに従ってコールしましたが、同じエラーが出ました。
おそらく、なぜか null が string にキャストされて string.empty になってるんだと思いますが、解決策がわかりません。


型が自動的にキャストされてエラーになる！

## テーマ、知りたいこと

ExcelをCOM利用しているVB6のプログラムがあるのですが
これをVB.Netにバージョンアップしたい。という話が私の所に来ています。

私は、社内で使うだけのプログラムなら、Excelマクロでいいのではと思いました。
ソースを読む限り、VBAでも事足りると感じたためです。

VBAはソースコードのバージョン管理が上手くできないと思うので
そこがネックとしてはあるのかなと思っているのですが
果たしてどうなのでしょうか。

また、.Netへの改修は、.Net Frameworkにしろ、.Net にしろ
解放処理をやたらとしないといけないのでコードが煩雑になると思っています。

また、EPPlusやClosedXMLを使うというのも手としてはあるのかなと思ってはいますが
余り使用経験がないのでよくわかっていません。

そのため、私はExcelマクロを推して提案しようかなと思っています。
皆さんならどうしますか？

## 自分で試したこと

.Netにする場合、以下がいいのかなと今は感じている所です。
ただ、これよりもExcelマクロの方がいいんじゃないかなとも思っている次第です。

以下の共通処理を作って
```VB.Net
Imports System.Runtime.InteropServices
Module Module1
    Private mListObject As List(Of Object)
    Public Sub AddComObject(rObject)
        If mListObject Is Nothing Then mListObject = New List(Of Object)
        mListObject.Add(rObject)
    End Sub

    Public Sub AllRereseComObjec()
        For i As Integer = mListObject.Count - 1 To 0 Step -1
            Marshal.ReleaseComObject(mListObject.Item(i))
        Next
        mListObject.Clear()
        mListObject = Nothing
    End Sub
End Module
```
こんな感じに使う方法です。
```VB.Net
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Dim objXLSApp As Object
        Dim objXLSBooks As Object 'Excel.Workbooks
        Dim objXLSBook As Object 'Excel.Workbook
        Dim objXLSSheets As Object 'Excel.Worksheets
        Dim objXLSSheet As Object 'Excel.Worksheet

        Dim objXLSCells As Object 'Excel.Range
        Dim objXLSRange As Object 'Excel.Range

        Dim tReleaseCom As New ReleaseComClass

        objXLSApp = CreateObject("Excel.Application")
        AddComObject(objXLSApp)
        objXLSBooks = objXLSApp.Workbooks
        AddComObject(objXLSBooks)
        objXLSBook = objXLSBooks.Open(TextBox1.Text, False, True)
        AddComObject(objXLSBook)
        objXLSSheets = objXLSBook.Sheets
        AddComObject(objXLSSheets)
        objXLSSheet = objXLSSheets.Item("Sheet1")
        AddComObject(objXLSSheet)
        objXLSCells = objXLSSheet.Cells
        AddComObject(objXLSCells)

        objXLSRange = objXLSCells.Item(1, 1)
        AddComObject(objXLSRange)
        objXLSRange.value = "2"

        objXLSRange = objXLSCells.Item(2, 1)
        AddComObject(objXLSRange)
        objXLSRange.value = "2"

        If System.IO.File.Exists(TextBox2.Text) Then
            System.IO.File.Delete(TextBox2.Text)
        End If
        objXLSBook.SaveAs(TextBox2.Text)

        objXLSBook.Close
        objXLSApp.Quit

        AllRereseComObjec()

    End Sub
```

オブジェクトを参照するたびに、それを追加していって
最後に逆順でリリースするだけなんですけど
最後に、順番を意識してリリースするのを列挙するのが大変だったり
同じ変数名を使いまわしたい場合、最後にリリースを列挙するより良いのかなと思った次第です。


ExcelをCOM利用しているVB6のプログラムについて

### 実現したいこと

.NET 6 の C# テンプレートを使用してデリゲートを記述したい。

### 前提

Visual Studioを用いてC#の勉強をしています。
.NET 6 の C# テンプレートを使用してデリゲードのサンプルプログラムを記述したところ以下のエラーが発生しました。

### 発生している問題・エラーメッセージ

```
(7行目　//  1つ目の処理)
CS8803:トップレベルのステートメントは、名前空間および型の宣言の前に記述する必要があります。
```

### 試したこと
.NET 6 の C# テンプレートを使用せずに記述するとエラーが起きない。


### 該当のソースコード(C# テンプレートを使用)

```ここに言語名を入力
// See https://aka.ms/new-console-template for more information


//  デリゲートの宣言
delegate void Action(int a);
//  1つ目の処理
static void Func1(int a)
{
    Console.WriteLine("a={0}", a);
}
//  2つ目の処理
static void Func2(int a)
{
    Console.WriteLine("a*2={0}", a * 2);
}
//  3つ目の処理
static void Func3(int a)
{
    Console.WriteLine("a*3={0}", a * 3);
}
static void Main(string[] args)
{
    //  デリゲートaの作成
    Action a = new Action(Func1);
    //  処理の追加
    a += new Action(Func2);
    a += new Action(Func3);
    //  処理の実行
    a(3);
}
```

### 該当のソースコード(C# テンプレートを使用しない)

```ここに言語名を入力
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
 
namespace SampleEx702
{
    class Program
    {
        //  デリゲートの宣言
        delegate void Action(int a);
        //  1つ目の処理
        static void Func1(int a)
        {
            Console.WriteLine("a={0}",a);
        }
        //  2つ目の処理
        static void Func2(int a)
        {
            Console.WriteLine("a*2={0}", a * 2);
        }
        //  3つ目の処理
        static void Func3(int a)
        {
            Console.WriteLine("a*3={0}", a * 3);
        }
        static void Main(string[] args)
        {
            //  デリゲートaの作成
            Action a = new Action(Func1);
            //  処理の追加
            a += new Action(Func2);
            a += new Action(Func3);
            //  処理の実行
            a(3);
        }
    }
}
```


### 補足情報（FW/ツールのバージョンなど）

Visual Studio 2022
C#コンソールアプリケーション
.NET 6 の C# テンプレート



🔰.NET 6 の C# テンプレートを使用してデリゲートを記述したい。

### 実現したいこと
PowerShellを用いて、USBカメラデバイスの入力映像をリアルタイムにモニタリングすることを考えています。
awaitクラスは、.Netのasync関数の戻り値(__ComObject)をtaskに変換してその実行を待機することを目的に作ってみました。

### 発生している問題・分からないこと
① .Net の async関数 の戻り値(__ComObject)を実行待機するクラス（await）にて、１回目のコール（InitializeAsync）は通るのに、２回目のコール（StartPreviewAsync）で不明なエラーが発生します。

② 上記のStartPreviewAsyncを待機しないで次に進もうとすると、スレッドのエラーが出ました。
書き換え前：[await]::Action($capture.InitializeAsync(), [object])
書き換え後：$capture.InitializeAsync()

### エラーメッセージ
```error
①
"0" 個の引数を指定して "Wait" を呼び出し中に例外が発生しました: "1 つ以上のエラーが発生しました。"
+         $netTask.Wait()

②
"0" 個の引数を指定して ".ctor" を呼び出し中に例外が発生しました: "アプリケーションは、別のスレッドにマーシャリングされたインターフェイスを呼び出しました。
 (HRESULT からの例外:0x8001010E (RPC_E_WRONG_THREAD))"
+     $ui.Content = [CaptureElement]::new()
```

### 該当のソースコード

```PowerShell
# using namespace
using namespace System.Windows
using namespace Windows.Foundation
using namespace Windows.Media.Capture
using namespace Windows.UI.Xaml.Controls

# using dotnet
using assembly  PresentationFramework
using assembly  System.Runtime.WindowsRuntime

# import Runtime type [TypeName, AssemblyName, ContentType]
[Windows.Foundation.IAsyncAction,         Windows.Foundation,       ContentType=WindowsRuntime]
[Windows.Media.Capture.MediaCapture,      Windows.Media.Capture,    ContentType=WindowsRuntime]
[Windows.UI.Xaml.Controls.CaptureElement, Windows.UI.Xaml.Controls, ContentType=WindowsRuntime]

# init MediaCapture
$capture = [Mediacapture]::new()
[await]::Action($capture.InitializeAsync(), [object])

 # ui
$ui = [Window]::new()
$ui.Dispatcher.Invoke([Action]{
    $ui.Content = [CaptureElement]::new()
    $ui.Content.Source = $capture
    [await]::Action($capture.StartPreviewAsync(), [object])
})
$ui.ShowDialog()

# awaiter class
class await{
    static [object]Action([__ComObject]$async, [type]$type){
        $asTask  = [WindowsRuntimeSystemExtensions].GetMethod("AsTask", [IAsyncAction])
        $netTask = $asTask.Invoke($null, @($async))
        $netTask.Wait()
        return $netTask.Result
    }
}
```

### 試したこと・調べたこと
- [x] teratailやGoogle等で検索した
- [x] ソースコードを自分なりに変更した
- [ ] 知人に聞いた
- [ ] その他

##### 上記の詳細・結果
$ui.Content = [CaptureElement]::new()
$ui.Content.Source = $capture
[await]::Action($capture.StartPreviewAsync(), [object])

もともとはここは普通に実行していたところを、uiのdispatcherのinvokeで実行するように変更しましたが、効果はありませんでした。

### 補足
特になし

PowerShell／USBカメラデバイス／モニタリング

### 実現したいこと
個人のgoogleアカウントにデータを保存、取得できるようになる方法を知る。

### 発生している問題・分からないこと
AI に googleのアカウントを使用して、保存する方法を聞いてみたら、Google Cloud Console を
使う方法が出てきました。しかし、無料で、できないか、ほかの方法がないか知りたいです。

私の個人的な勝手なイメージとしては、個人のgoogleアカウント内に、データを保存すると
思っていたので、開発者が Google Cloud Console というところで、プロジェクトを作らないと
実現できないのは、ちょっとおかしい（？）と思ったのです。

もちろん、個人のgoogleアカウント内にデータを保存するので、その分容量は使いますが、
よくある、アプリの機種変更による、データの移行は、googleアカウントに関連づけていてて
開発者は、別にプロジェクトを用意する必要はないと思っています。

私としては、クイズゲームの得点を google アカウント内に保存して、別の機種に移ってもデータの
移行ができるようにしたいので、その実現方法を知りたいのです。（Google Cloud Console
を使わないで）

実現させるコードは、ここではひとまずおいといて、上のことを実現させる方法を教えてください。




### 該当のソースコード

```
特になし
```

### 試したこと・調べたこと
- [x] teratailやGoogle等で検索した
- [ ] ソースコードを自分なりに変更した
- [ ] 知人に聞いた
- [x] その他

##### 上記の詳細・結果
AI に聞くと Google Cloud Console を使った方法が提示された。
しかし、無料期間はあるが、基本的に有料なので別の方法を知りたい。

個人のgoogleアカウントにアクセスできる権限を付与されていることを前提として話しています。


### 補足
[開発環境]
 OS: Windows 11 pro
 言語,FW: C# .NET 8 .NET MAUI
[動作環境]
 OS: Android(.NET が動作するもの）, Windows 11

[動作確認できない] （持ってないので）
 OS: iOS

お金はなるべくかけたくない

###  1.質問し終わって
GoogleDrive API とかあったので、やはり Google Cloud Console を使わないといけないのか？
私のアプリを使ってくれるユーザーが10人いたとして、月にどれくらいの費用が発生するのか？
おおよその見積もりが欲しいです。


[C#] 開発者が個人のgoogleアカウントにデータを保存する方法

## テーマ、知りたいこと

①今から新規案件(Windowsフォームアプリケーション)で.NET Framework4.8で開発するのは邪道でしょうか？

　新規案件の開発環境の選定が目前に迫っており、使い慣れた.NET Framework4.8(開発言語はVB.NET)で進めてしまっても良いのか悩んでおります。
　今まで.NET6を導入した経験はありませんが、新たに導入するなら新規案件での開発が適していると思っています。

.NET6に対しては
・言語使用に違いはあるのか(VB.NETの場合)
・アプリケーションの配布方法は従来(.NET Framework4.X系)通りClick Onceを使用できるか
・従来よりも余分な検証作業が発生するのではないか
との不安があります。(開発工数が少ないため)

　ぶっちゃけFrameworkの違いだけで、同じWindowsフォームである事には殆ど変わりない認識でよろしいでしょうか。
.NET Framework → .NET6 の移行や、初めて.NET6をやってみて困った点があれば知りたいです。

Microsoftがこれから先に手を加えることのない.NET Framework4.8で新規案件の開発を行おうとしていることに対して、ご意見を伺いたいです。

②これからWindows環境で稼働するデスクトップ版の業務アプリケーションを作成するならどの様なアプリケーションを選択するか？
　新規案件でWindows環境で稼働するアプリケーションを作成するなら、皆さんなら以下のどのアプリを選択しますでしょうか？
もちろんチームのメンバーの習熟度なども考慮する必要はあると思いますが、開発言語の選定も含めて知りたいです。

・Windowsフォームアプリケーション
・WPFアプリケーション
・その他

日々の業務に追われてなかなか新しいことの学習も出来ていないのですが、
今から学習するならWPFが良いのか、他のものが良いのかも知りたいです。
開発案件は販売管理や在庫管理、会計関連等の業務アプリケーションです。

## 背景、状況


①小規模案件でWindowsアプリケーションの開発が迫っており、開発環境の選定を行わなければならない

②開発期間が短い(開発規模も割と小さい)ので新しいことに踏み出すのに躊躇している

③私自身はVB.NETの開発経験が割と長い方ですが、他のメンバーが私よりも年長者でVB.NETの開発にそれほど精通していない
　(オフコンの経験が長く、その次にVBAやVB6.0の経験が長い。オブジェクト指向プログラミングにそれほど精通していない)

④自身の技術的な経歴を鑑みて、VB.NETのWindowsフォームアプリの開発ばかりやっていて良いのか、将来的な不安もある。

上記背景があり、以前からWindowsフォーム以外の開発もやってみたいという思いもあり、
現在のWindows系の業務アプリケーションの開発はどのようなアプリケーションが多いのかも
知りたいと思いました。




今から.NET Framework4.8で新規開発(Windowsフォーム)を行うのは邪道か？

お世話になります。
調べたのですが、分からないため教えてください。

### 実現したいこと
Rectangleの内容をDataGridに表示させ
今編集しようとしているRectangleの行を選択して値を動的に変更したい
作成済みのRectangleを選択すると、
選択したRectangleと同じDataGridの行が選択したい

### 前提
MainWindowと、SubWindow（画像選択用）、DataGridList（四角形のデータ表示用）があります。
MainWindowに四角形を描画し、その四角形を移動させたり拡縮させたりしたいです。
選択したRectの情報はActiveRectで取得できているのですが移動ができません。
とりあえず「DataGridList.xaml」を作成しました。
データをDataGridList.xamlに表示出来そうですが
Rectangleを選択したら、同じ値のDataGrid行を選択できますか？
編集中の図形「activeRect」を取得することは出来ています。

### 該当のソースコード

```MainWindow.xaml.cs
namespace TEST
{
    public partial class MainWindow : Window
    {
        public MainWindow()
        {
            InitializeComponent();
            DataContext = new ViewModel();
        }
        private void MyCanvas_MouseLeftButtonDown(object sender, MouseButtonEventArgs e)
        {
            var point = e.GetPosition(MyCanvas);
            var leftOffset = point.X % 10;
            leftOffset = leftOffset < 5 ? -leftOffset : 10 - leftOffset;
            var topOffset = point.Y % 10;
            topOffset = topOffset < 5 ? -topOffset : 10 - topOffset;
            StartPoint = new Point(point.X + leftOffset, point.Y + topOffset);
            rectangle = new System.Windows.Shapes.Rectangle
            {
                Stroke = Brushes.Black,
                Fill = Brushes.LightBlue,
                HorizontalAlignment = HorizontalAlignment.Left,
                VerticalAlignment = VerticalAlignment.Top,
                Width = 0,
                Height = 0,
                Opacity = 0.3,
            };
            Panel.SetZIndex(rectangle, 0);//最前面表示
            Canvas.SetLeft(rectangle, StartPoint.X);
            Canvas.SetTop(rectangle, StartPoint.Y);
            MyCanvas.Children.Add(rectangle);
            isMouseDown = true;
        }
        private void MyCanvas_MouseLeftButtonUp(object sender, MouseButtonEventArgs e)
        {
            var R_X = StartPoint.X;
            var R_Y = StartPoint.Y;
            if (MovePoint.X - StartPoint.X <= 0)  R_X = MovePoint.X;
            if (MovePoint.Y - StartPoint.Y <= 0)R_Y = MovePoint.Y;
            var R_H = rectangle.Height;
            var R_W = rectangle.Width;
            MyCanvas.Children.Remove(rectangle);
            MyRect NowRect = new RectangleItem { X = R_X, Y = R_Y, Width = R_W, Height = R_H };
            ((ViewModel)DataContext).MyRects.Add(NowRect);
            isMouseDown = false;
            rectangle.Opacity = 1;
        }


        private void MyCanvas_MouseMove(object sender, MouseEventArgs e)
        {
if (!isMouseDown) return;
var point = e.GetPosition(MyCanvas);
var leftOffset = point.X % 10;
leftOffset = leftOffset < 5 ? -leftOffset : 10 - leftOffset;
var topOffset = point.Y % 10;
topOffset = topOffset < 5 ? -topOffset : 10 - topOffset;
MovePoint = new Point(point.X + leftOffset, point.Y + topOffset);
rectangle.Width = Math.Abs(MovePoint.X - StartPoint.X);
rectangle.Height = Math.Abs(MovePoint.Y - StartPoint.Y);
            if (MovePoint.X - StartPoint.X <= 0)Canvas.SetLeft(rectangle, MovePoint.X);
            if (MovePoint.Y - StartPoint.Y <= 0)Canvas.SetTop(rectangle, MovePoint.Y);
        }

private void Rectangle_MouseLeftButtonDown(object sender, MouseButtonEventArgs e)
        {
            activeRect = sender as System.Windows.Shapes.Rectangle;
            if (activeRect == null) return;
            if (e.LeftButton != MouseButtonState.Pressed) return;
            activeRect.Fill = Brushes.AliceBlue;
        }
        private void Rectangle_MouseLeftButtonUp(object sender, MouseButtonEventArgs e)
        {
            Cursor = Cursors.Arrow;
        }
    }
}

```

### 試したこと
動かすことを最優先です。
Gridが追加され、中にRectangle、LINEがあることを確認。
Rectangleクリック移動で、RectangleMoveなどのイベントが動作確認済。
ビジュアルツリーモード中にMyRectの値を変更してもRect移動なしでした。

((ViewModel)DataContext).MyRects.Add(NowRect);
だから図形が動かないのでしょうか？

**図形のドラッグ移動に関する資料がそこまでないのと、
複数図形を配置してXやYなどの座標をBinding?で動かそうとしている資料があまりなく
参考になるサイト等があれば教えてください。**

### 補足情報（FW/ツールのバージョンなど）
Visualstudio2022　V17.6.3
.NET 6.0　C#


WPF　動的生成したRectangleがドラッグで移動できない、Bindingが難しい…

VBで下記のソースを何回か実行すると既定ブラウザのタブで開かれてしまいますが、
別ウィンドウで開く方法はありますでしょうか？

```ここに言語を入力
System.Diagnostics.Process.Start("https://yahoo.co.jp")
```

宜しくお願いします。