>>275
それは臭いものにふたをするだけの詭弁コードだな。そんなことが許される
のであれば俺はこれでできることになる。はい論破。
Sub C(ByVal objConnection As ADODB.Connection)
  Call objConnection.Open
  Call objConnection.BeginTrans
  Call objConnection.CommitTrans
End Sub