VBA 「カレンダ」テーブルのデータの作り方

T'sWare様のサイトから引用

Dim dbs As Database
Dim rst As Recordset
Dim dtmLoop As Date

Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("tblカレンダ")
With rst
For dtmLoop = #1/1/2006# To #12/31/2006#
.AddNew
!日付 = dtmLoop
!曜日 = Format$(dtmLoop, "aaa")
!通年日 = Format$(dtmLoop, "y")
!通年週 = Format$(dtmLoop, "ww")
.Update
Next dtmLoop
.Close
End With

VB.net コードの難読化

コードを難読化するソフトはやはり有料だけかとおもいきや、
なんとフリーソフトを発見

VB.NET C#.NET 用の難読化ソフト　NanDoku

まだ使ってはいませんが、使用後は感想をかきます。

VB.net PC時計を修正する NTPサーバー利用

正確な時刻が必要な場合、クライアントPC時刻をNTPサーバーの時刻と同期する必要がある。

なんとココ↓にハラショーなサンプルが

第7回　UDPでSNTPクライアントを作ろう～NTPを使ってPC時計を修正する

VB.net TableAdapter を使用してデータを更新する

Try
Me.Validate()
Me.CustomersBindingSource.EndEdit()
Me.CustomersTableAdapter.Update(Me.NorthwindDataSet.Customers)
MsgBox("Update successful")

Catch ex As Exception
MsgBox("Update failed")
End Try