<connectionStrings> <add name="AACollateralConnectionString" connectionString="Data Source=KAGAWA-A-PC\SQLEXPRESS;Initial Catalog=New_AACollateral;Persist Security Info=True;User ID=QrF073cwLu+aA5DB34y7Ug==;Password=CvdTA/EAq30VUo39VUHp0g==;" providerName="System.Data.SqlClient" /> </add></connectionstrings>

Imports System.Security.Cryptography.X509CertificatesImports Microsoft.VisualBasic.CompilerServices Module startUp ''' <summary> ''' UserContext ''' </summary> Public usContext As New UserContext <STAThread()> Sub Main() ' UIスレッドの集約例外ハンドラ AddHandler Applicat</stathread()>…

Public Sub A() Dim list = New List(Of Integer) From {1, 84, 95, 95, 40, 5, 6} Dim test = list.Select(AddressOf adder) Console.WriteLine("First: " + list.First().ToString) Console.WriteLine("Last: " + list.Last().ToString) Console.WriteLine…