dim a as Dictionary(Of Long, String()) a = ImportCSV(FileName) ■以下クラス Imports System.Text Public Class ImportCsv Implements IImportFile Public Function ImportExecute(ByVal filePath As String, ByVal Optional isHeaderImport As Boolean =…

■使い方の例 Dim wrk As New ExcelUtils wrk.OpenBook("C:\Users\kagaw\Desktop\ken_all (3)\aaaa.xlsx") wrk.ChangeSheet("休日") Dim vals As Object(,) = wrk.GetValueList() Debug.Print(vals(1001, 1)) wrk.Dispose() ■事前準備 プロジェクト⇒property⇒…

Having句は結構自由に書ける。 ■以下のテーブルから、全教科を受けているstudent_idを抽出する。 SELECT student_id FROM TestScore GROUP BY student_id HAVING ( SELECT COUNT(*) FROM ( SELECT DISTINCT subject FROM TestScore )A ) = SUM(CASE WHEN stu…

■算数で80点以上、国語50点以上両方を満たす生徒を抽出 どれも結果は同じ！

■WITH句にて、一時テーブルのようなものが作れる。 WITH test AS( SELECT * FROM EnumMaster WHERE MasterType = 'Status') SELECT test.mastertext,a.* FROM agreement AS a INNER JOIN test ON a.AgmtStatus = test .MasterValue

(*)参考 qiita.com mickindex.sakura.ne.jp

■何でもいい一文字 「.」 「..」なら二文字 ■複数の中からどれか一文字 [〇〇〇] [^〇〇〇]だと、それ以外 ■特殊文字 \d：数字一文字を示す。degitの意味。 \w：英数一文字を示す。wordの意味 \s：空白一文字を示す。spaceの意味 \t：タブを示す。tabの意味 …

Exec句でLocal一時(#Table)テーブルを作ると、 そのExec句と同じストアド内でも、そのテーブルを参照できません。 Global一時テーブル(##Table)ならOK。

<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…