月別アーカイブ：2021年04月
-
車にカッティングシート貼る
この記事を見にきたあなたも車に貼りたい仲間ですね🤣 ワイルド・スピードや頭文字Dみたく 車にカッティングシートを貼りたいと思い方法を考えてみた。🤔 もう、おっさんだけど …
情報の百貨店、田舎から配信
Function PredictSortedSet(seedText As String, lineIndex As Integer) As Variant Dim i As Integer, j As Integer, tmp As Integer Dim seedVal As Long Dim numbers(1 To 43) As Integer Dim selected(1 To 6) As Integer Dim result(1 To 1, 1 To 6) As Integer ‘ …
Function PredictSortedSet(seedText As String, lineIndex As Integer) As Variant Dim i As Integer, j As Integer, tmp As Integer Dim seedVal As Long Dim numbers As Collection Dim selected(1 To 6) As Integer Dim result(1 To 1, 1 To 6) As Integer ‘ シード値 …