→→→静的メンバー(共有メンバー)

インスタンス化なしでクラスの機能を使うためには、Sharedを追加して、共有メンバーする。

Module Module1
  Sub Main()
     Class1.S = "こんにちは"
     Class1.Output()
  End Sub
End Module

Class Class1
   Public Shared S As String
   Public Shared Sub Output()
     Console.WriteLine(S)
   End Sub
End Class

→→→クラス

クラス(Class)はオブジェクト指向プログラミングの中心となる要素である。クラスにはメンバー変数とメソッドを格納できる。
メンバー変数にはデータを入れることができ、メソッドは処理を記述したものを入れる
データと処理が一つになっているのがポイント。

Module Module1
 Sub Main()
   Dim c As New Class1()
   c.S = "こんにちは"
   c.output()
 End Sub
End Module

Class Class1
    Public  S  As String

    Public Sub Output()
        console.WriteLine(S)
    End Sub
End Class

Class1がClass1クラスで、文字列型のメソッド変数S、Outputメソッドである。

起動時に呼び出されるMainプロシジャでは
Dim c As New Class1()
でClass1クラスのインスタンスを作り、それを「c」という名前で参照できるようにしている。
ここは、
Dim c As Class1 = New Class1()
と書くこともできる。

c.sでcのsに「こんにちは」を代入している。cのOutputメソッドを呼び出すと「こんにちは」が出力される。
クラスは「インスタンス化」してから使うのが基本である。インスタンスは日本語では「実体」。インスタンスを「オブジェクト」と呼ぶこともある。

クラスのメンバーには、アクセス修飾子を用いることができる。赤文字のPublicが、Publicはクラスの外部からこのメンバーへのアクセスを許可する。「Private」と指定すると、外部からアクセスできなくなる。

一つのクラスから複数のインスタンスを生成できる。
Sub Main()
  Dim c As New Class1()
  c.S = "こんにちは"
  c.Output()


  Dim d As New Class1()
  d.S = "こんばんは"
  d.Output()
End Sub
Class1クラスのインスタンスを二つ生成し、それぞれを「c」「d」という名前で参照している。

→→→値の読み書きが処理につながる「プロパティ」

Propertyの例

Module  Module1
 Dim MessageValue As String
 Property Message As String
     Get
           console.WriteLine("MessageがGetされました")
           Return MessageValue
     End Get
     Set(value As String)
           MessageValue  =  value
           Console.WriteLine("MessageがSetされました。値は「" & value &"」です")
     End Set
 End Property

 Sub Main()
     Message = "こんにちは!"
     Console.WriteLine(Message)
 End Sub
End Module


Messageという名前の文字列型プロパティがあり、その裏側で値を保持するMessageValue変数を用意している。
MessageValue変数をMessageプロパティを通じて利用する。
コード⇔Messageプロパティ⇔MessageValue変数

MessageプロパティはGetプロシジャとSetプロシジヤを持っている。Message値が読み出されたときにはGetプロシジャが呼び出され、書き込まれた時にはSetプロシジャが、呼び出される。

利用する側からは、プロパティは変数と同様に見える。

トランザクション ログの肥大化

SQL Server 2008 R2ではデフォルトでは、トランザクションログは、ハードディスクの空き領域がなくなるまで、またはファイルサイズが最大になるまで、どんどん肥大化していく。

ログの肥大化を防止するには、ログを定期的にバックアップするしかない。

バックアップを実行すると、トランザクションログの使用済み領域を切り捨てることができる。
ログのバックアップにより使用済み領域を解放して、空き領域へ変換してくれるので、その領域が再利用できるようになる。

しかし、ログの切り捨ては、再利用可能な領域を作るだけで、ファイルサイズを縮小するわけではない。
しかし、大きく肥大化したファイルの場合は縮小したい場合がある。
この場合は DBCC SHRINKFILE コマンドを実行する

DBCC SHRINKFILE(論理名, 縮小後のサイズ)

１．まずログの使用量を確認。
DBCC SQLPERF(LOGSPACE)　コマンドを使用してLog Size/Log Space Usedを見てみる。

２．FORMATオプションでバックアップを実行。
BACKUP DATABASE ***DB
 TO DISK = 'C:\***DB.bak' 
   WITH FORMAT

３．ログ　バックアップの実行
BACKUP LOG ***DB
 TO DISK = C:\log1.bak'

４．DBCC SHRINKFILE(log1) を実行

でログファイルは縮小される。

→→→整数には下限と上限がある

整数型の変数には、値の上限と下限がある。どんな数字をいれてもよいわけではない。
Dim i As Integer = Integer.MaxValue
MsgBox(i)
MsgBox(i + 1)
整数型変数iに整数型の上限値を入れて初期化。出力は21億4748万3647が整数の上限値である。
このiに1を加えたものを出力はできない。OverflowExceptinが生じる
整数値は、マイナス21億4748万3648～21億4748万3647の値を格納できる。それ以外の値を格納しようとするとオーバーフローとなる。
この範囲が狭い場合は、正の数だけでよいから上限を大きくしたい場合は符号なし整数型であるUIntegerを使えばゼロ～42億9496万7295の値まで格納できる。長整数型(Long)を使うのもいい。
Integerが4バイトであるのに対してLongは8バイトでマイナス922京3372兆368億5477万5808～922京3372兆368億5477万5807までを格納できる。符号なしの長整数型であるULongはゼロ～1844京6744兆737億955万1615を格納できる

→→→ToStringメソッド／Parseメソッド

数値から文字列に変換する処理は、自動的に行われることも少なくはないが、ただ、自動ではうまくいかないときもある。その一つの例は
Dim i As Integer = 1
MsgBox("iは" + i )
「iは1」というダイアログを出してくれそうに思えるが実際はエラーメッセージが出て停止してしまう。
文字列「iは」をDouble型に変換しようとして、InvalidCastExceptionが生じてしまう。
解決策は
MsgBox("iは" + i.ToString())
とすることである。数値を文字列に変換する方法はいくつかあるが、ここではInt32構造体のToStringメソッドを使って、iが格納する数値を文字列型な変換している。現在のVisualBasicとC#では、基本的なデータ型であっても、色々なメソッドを呼び出せるようになっている。文字列に変換するToStringメソッドは、多くの構造体クラスが持っている。Visual Basicの場合、+演算子を変更してエラーを回避することもできる。
MsgBox("iは" & i )
とすればよい。+演算子は加算と文字列連結の両方に用いられるので、文字列連結をはっきり示すには&演算子を使うほうがいい。

数値を文字列に変換するとは逆に、文字列を数値に変換する時に使えるのがParseメソッド
Dim s As String = "123"
Dim t As String = "456"
MsgBox( s + t )
MsgBox(Integer.Parse(s) + Integer.Parse(t))
最初のメッセージでは「123」「456」を連結して「123456」と出力するが、
次のメッセージでは123を数値にしたものと456を数値にしたものを足し合わせ「579」を出力する。
Int32のParseメソッドは4種類のオーバーロードを持っているので、他にも多くの構造体やクラスが文字列からデータを受け取るParseメソッドを備えている。

→→→文字列を格納する文字列型

String型:Visual BasicやC#の文字列型は可変長で、最大で約20億(2の31乗)個のUnicode文字を格納できる。ただ実際に20億個の文字を格納すると約4Gバイトのメモリーを使ってしまうので、実用上の限度はもっと下にあると考える。
Visual Basic やC#の内部の文字コードセットはUnicodeである。ただファイルに保存したり通信をする際には文字コードセットとエンコーディングに注意する必要がある。
<シフトJISのsjis.txt、UTF-8のutf8.txt、UFT-16のutf19.txtを作るコード>
  Dim path As String = "C:\test\"
  Dim s As String = "ABC123ＡＢＣ１２３あいう"

  System.IO.File.WriteAllText(path & "sjis.txt", s , System.Text.Encoding.GetEncoding("Shift_JIS"))
  System.IO.File.WriteAllText(path & "utf8.txt", s ,System.Text.Encoding.UTF8)
  System.IO.File.WriteAllText(path & "utf16.txt", s ,System.Text.Encoding.Unicode)

文字列型変数の既定値は、何も入っていない文字列("")ではなく、Nothing(どこにも関連付けられていない) であることに注意が必要である。
 Dim s As String = ""
と初期化して使うべき時もある。