VB.NETでクリップボードを操作する方法とは？おすすめの理由3つ
- システム
エンジニア - クリップボードの操作方法にはどんな種類がありますか？
- プロジェクト
マネージャー - いくつかのプログラム言語で紹介されていますが、ここではVB.netでのデータ取得方法をみていきましょう。
VB.NETとは？
VB.NETとは、Visual Basic.NET(ヴィジュアル ベーシック ドット ネット)の略で、マイクロソフトが開発したプログラミング言語およびその処理係になります。
このVB.NETは、初めてプログラミングを始める方におすすめのプログラミング言語で、学びやすいのが特徴です。
また、初心者からプロまで幅広く使用されていて、様々なアプリケーションの作成が可能です。
VB.NETとVBの違い
VB.NETとVBは、バージョンが違います。
最初はVisual Basic(VB)のシリーズで展開されていましたが、2005年に使用が大幅に変更され、「Visual Basik.NET」が誕生しました。
その次のバージョンも誕生しましたが、その後は「.NET」は外されています。
簡単にいうと、VB→VB.NET→VBという形で略称としてはもとに戻っていますが、機能的には進化しています。
VB.NETでクリップボードを操作する方法
今回は、VB.netでのクリップボードについて説明します。文字列や画像データ、およびファイルなどをクリップボードにコピーすることができ、クリップボードのデータを取得できます。
VB.netでのクリップボードに興味のある方はぜひご覧ください。
クリップボードに文字列のコピー
VB.netでは、クリップボードに文字列のコピーができます。
実際のソースコードを見てみましょう。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
Public Class Form1
Dim button1 As Button
Sub New()
InitializeComponent()
AddHandler Me.Load, AddressOf Form1_Load
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
button1 = New Button()
button1.Text = ""クリップボードに文字列のコピー""
button1.AutoSize = True
button1.Location = New Point(10, 10)
AddHandler Me.button1.Click, AddressOf Button1_Click
Me.Controls.Add(button1)
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Clipboard.SetText(""クリップボードに文字列のコピー"")
End Sub
End Class
|
実行後、ボタンをクリックすると、””クリップボードに文字列のコピー””という文字列がクリップボードにコピーされます。メモ帳などを開いてCtrl-Vで張り付けてみてください。
このように、VB.netではクリップボードに文字列のコピーができます。
クリップボードから文字列の取得
VB.netでは、クリップボードから文字列の取得ができます。
実際のソースコードを見てみましょう。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
Public Class Form1
Dim button1, button2 As Button
Dim label As Label
Sub New()
InitializeComponent()
AddHandler Me.Load, AddressOf Form1_Load
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
button1 = New Button()
button1.Text = ""クリップボードに文字列のコピー""
button1.AutoSize = True
button1.Location = New Point(10, 10)
AddHandler Me.button1.Click, AddressOf Button1_Click
Me.Controls.Add(button1)
button2 = New Button()
button2.Text = ""クリップボードから文字列の取得""
button2.AutoSize = True
button2.Location = New Point(10, 40)
AddHandler Me.button2.Click, AddressOf Button2_Click
Me.Controls.Add(button2)
label = New Label()
label.Location = New Point(10, 70)
label.AutoSize = True
Me.Controls.Add(label)
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Clipboard.SetText(""クリップボードに文字列のコピー"")
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
If Clipboard.ContainsText() Then
label.Text = Clipboard.GetText()
End If
End Sub
End Class
|
“”クリップボードに文字列のコピー””ボタンをクリックするか、またはメモ帳などでCtrl-Cで文字列をコピーし、””クリップボードから文字列の取得””ボタンをクリックすると、Formにクリップボードの文字列が表示されます。
このように、VB.netではクリップボードから文字列の取得ができます。
クリップボードに画像のコピー
VB.netでは、クリップボードに画像のコピーができます。
実際のソースコードを見てみましょう。
事前に、「C:\test\test.bmp」を格納しておいてください。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
Public Class Form1
Dim button1 As Button
Sub New()
InitializeComponent()
AddHandler Me.Load, AddressOf Form1_Load
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
button1 = New Button()
button1.Text = ""クリップボードに画像のコピー""
button1.AutoSize = True
button1.Location = New Point(10, 10)
AddHandler Me.button1.Click, AddressOf Button1_Click
Me.Controls.Add(button1)
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
' ファイルから画像を取得
Dim bitmap As New Bitmap(""C:\test\test.bmp"")
' クリップボードに画像のコピー
Clipboard.SetImage(bitmap)
End Sub
End Class
|
実行後、ボタンをクリックすると、「C:\test\test.bmp」の画像データがクリップボードにコピーされます。ペイントソフトなどを開いてCtrl-Vで張り付けてみてください。
このように、VB.netではクリップボードに画像のコピーができます。
クリップボードから画像の取得
VB.netでは、クリップボードから画像の取得ができます。
実際のソースコードを見てみましょう。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
Public Class Form1
Dim button1, button2 As Button
Dim pictureBox As PictureBox
Sub New()
InitializeComponent()
AddHandler Me.Load, AddressOf Form1_Load
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
button1 = New Button()
button1.Text = ""クリップボードに画像のコピー""
button1.AutoSize = True
button1.Location = New Point(10, 10)
AddHandler Me.button1.Click, AddressOf Button1_Click
Me.Controls.Add(button1)
button2 = New Button()
button2.Text = ""クリップボードから画像の取得""
button2.AutoSize = True
button2.Location = New Point(10, 40)
AddHandler Me.button2.Click, AddressOf Button2_Click
Me.Controls.Add(button2)
pictureBox = New PictureBox()
pictureBox.Location = New Point(10, 70)
pictureBox.SizeMode = PictureBoxSizeMode.AutoSize
Me.Controls.Add(pictureBox)
Me.AutoScroll = True
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
' ファイルから画像を取得
Dim bitmap As New Bitmap(""C:\test\test.bmp"")
' クリップボードに画像のコピー
Clipboard.SetImage(bitmap)
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
' クリップボードにBitmapデータがあるか
If Clipboard.ContainsImage() Then
' クリップボードから画像の取得
Dim image As Image = Clipboard.GetImage()
If image IsNot Nothing Then
pictureBox.Image = image
End If
End If
End Sub
End Class
|
“”クリップボードに画像のコピー””ボタンをクリックするか、またはPrint Screenなどで画像をコピーし、””クリップボードから画像の取得””ボタンをクリックすると、Formにクリップボードの画像が表示されます。
このように、VB.netでは、クリップボードから画像の取得ができます。
クリップボードにファイルのコピー
VB.netでは、クリップボードにファイルのコピーができます。
実際のソースコードを見てみましょう。
事前に、「C:\test\test.bmp」を準備しておいてください。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
Public Class Form1
Dim button1 As Button
Sub New()
InitializeComponent()
AddHandler Me.Load, AddressOf Form1_Load
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
button1 = New Button()
button1.Text = ""クリップボードにファイルのコピー""
button1.AutoSize = True
button1.Location = New Point(10, 10)
AddHandler Me.button1.Click, AddressOf Button1_Click
Me.Controls.Add(button1)
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
' ファイルを設定
Dim files As New Specialized.StringCollection()
files.Add(""C:\test\test.bmp"")
' クリップボードにファイルをコピーする
Clipboard.SetFileDropList(files)
End Sub
End Class
|
実行後、ボタンをクリックすると、「C:\test\test.bmp」ファイルがクリップボードにコピーされます。エクスプローラを開いて、任意の場所にCtrl-Vで張り付けてみてください。
このように、VB.netではクリップボードにファイルのコピーができます。
クリップボードからファイルの取得
VB.netでは、クリップボードからファイルの取得ができます。
実際のソースコードを見てみましょう。
事前に、「C:\test\test.bmp」および「C:\test2」フォルダを準備しておいてください。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
Public Class Form1
Dim button1, button2 As Button
Sub New()
InitializeComponent()
AddHandler Me.Load, AddressOf Form1_Load
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
button1 = New Button()
button1.Text = ""クリップボードにファイルのコピー""
button1.AutoSize = True
button1.Location = New Point(10, 10)
AddHandler Me.button1.Click, AddressOf Button1_Click
Me.Controls.Add(button1)
button2 = New Button()
button2.Text = ""クリップボードからファイルの取得""
button2.AutoSize = True
button2.Location = New Point(10, 40)
AddHandler Me.button2.Click, AddressOf Button2_Click
Me.Controls.Add(button2)
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
' ファイルを設定
Dim files As New Specialized.StringCollection()
files.Add(""C:\test\test.bmp"")
' クリップボードにファイルをコピーする
Clipboard.SetFileDropList(files)
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
' クリップボードにファイルドロップ形式のデータがあるか
If Clipboard.ContainsFileDropList() Then
' データを取得
Dim files As Specialized.StringCollection = Clipboard.GetFileDropList()
' 取得したファイル名を列挙する
Dim fileName As String
For Each fileName In files
Dim destName As String = IO.Path.GetFileName(fileName)
Dim destPath As String = IO.Path.Combine(""C:\test2"", destName)
' ファイルを上書きコピー
IO.File.Copy(fileName, destPath, True)
Next fileName
End If
End Sub
End Class
|
“”クリップボードにファイルのコピー””ボタンをクリックするか、または任意のファイル（複数可）をCtrl-Cでコピーし、””クリップボードからファイルの取得””ボタンをクリックすると、””C:\test2″”にクリップボードのファイルが上書きコピーされます。
このように、VB.netでは、クリップボードからファイルの取得ができます。
VB.NETの活用シーンとは？
つづいて、VB.NETの活用シーンについてご紹介します。
ここでは、VB.NETプロジェクト作成時にアプリケーションの種類として選択できるものの中から、代表的なものについてご紹介します。
代表的なものとして、私たちが日常的に使用している、アプリケーションを起動するとウィンドウが開き、画面が表示されるタイプのアプリケーションの「Windowsフォームアプリケーション」があります。
その他にも「コンソールアプリケーション」、「Windowsサービス」、「Webアプリケーション」などがあげられます。
VB.NETがおすすめの理由3つ
つぎに、VB.NETがおすすめの理由を3つご紹介します。
それは、難易度が低めでコードが書きやすいこと、柔軟性があり使いやすいこと、必然的にミスを防ぐことです。
1つずつ詳しくご紹介しますので、ぜひ参考にして下さい。
VB.NETがおすすめの理由1：難易度が低めでコードが書きやすい
VB.NETでは、コードの入力の手間が少なく、難易度が低いためコードが書きやすくなります。
VB.NETは、With文が使える、IF文の丸括弧が不要、構文終わりのセミコロン(;)が不要といった3つの仕組みがあります。
このような手間が省けるため、初心者でも簡単にコードが書けます。
ちょっとした違いかもしれませんが、丸括弧が不要になること、セミコロン(;)が不要になることは扱いやすくなるポイントでもあります。
VB.NETがおすすめの理由2：柔軟性があり使いやすい
2つめの理由として、柔軟性があり使いやすいことです。VB.NETはオブジェクト指向と手続き型を併せた柔軟さを持っています。
ダックタイピング可、標準機能にて、全角と半角の変換ができる、列挙型が使いやすいなどの柔軟さがあげられます。
要所において、手続き型言語の書き方をしてもよし、オブジェクト指向言語の書き方をしてもよし、という構成も、問題ないケースが多いため、使いやすいです。
VB.NETがおすすめの理由3：必然的にミスを防ぐ
3つめの理由として、必然的にミスを防ぐということがあげられます。
たとえば、if文における、コーディングミスが回避できるということです。
また、このVB.NETでコーディングすると、エラーが少なく、生産性が高いという特徴もあります。
構文のチェックが厳密なため、バグが作りこまれないようになっています。
そのため、エラーが少なくなり、より正確なアプリケーションを構築することが可能になります。
- システム
エンジニア - クリップボードへの文字列や画像の取得方法がよく分かりました。
- プロジェクト
マネージャー - それはよかった。では実際にソースコードを書いてより理解を深めていってください。
VB.NETでクリップボードを操作しよう
いかがでしたでしょうか。文字列や画像データ、およびファイルをクリップボードにコピーする方法と、クリップボードのデータ取得方法についても説明しました。
ぜひご自身でソースコードを書いて、理解を深めていきましょう。
FEnet.NETナビ・.NETコラムは株式会社オープンアップシステムが運営しています。
株式会社オープンアップシステムはこんな会社です
秋葉原オフィスには株式会社オープンアップシステムをはじめグループのIT企業が集結！
数多くのエンジニアが集まります。
-
スマホアプリから業務系システムまで
スマホアプリから業務系システムまで開発案件多数。システムエンジニア・プログラマーとしての多彩なキャリアパスがあります。
-
充実した研修制度
毎年、IT技術のトレンドや社員の要望に合わせて、カリキュラムを刷新し展開しています。社内講師の丁寧なサポートを受けながら、自分のペースで学ぶことができます。
-
資格取得を応援
スキルアップしたい社員を応援するために資格取得一時金制度を設けています。受験料(実費)と合わせて資格レベルに合わせた最大10万円の一時金も支給しています。
-
東証プライム上場企業グループ
オープンアップシステムは東証プライム上場「株式会社オープンアップグループ」のグループ企業です。
安定した経営基盤とグループ間のスムーズな連携でコロナ禍でも安定した雇用を実現させています。
株式会社オープンアップシステムに興味を持った方へ
株式会社オープンアップシステムでは、開発系エンジニア・プログラマを募集しています。
年収をアップしたい！スキルアップしたい！大手の上流案件にチャレンジしたい！
まずは話だけでも聞いてみたい場合もOK。お気軽にご登録ください。
新着案件New Job
-
開発エンジニア/東京都品川区/【WEB面談可】/在宅ワーク
月給29万～30万円東京都品川区(大崎駅) -
遠隔テストサービス機能改修/JavaScript/東京都港区/【WEB面談可】/テレワーク
月給45万～60万円東京都港区(六本木駅) -
病院内システムの不具合対応、保守/東京都豊島区/【WEB面談可】/テレワーク
月給30万～30万円東京都豊島区(池袋駅) -
開発/JavaScript/東京都豊島区/【WEB面談可】/テレワーク
月給50万～50万円東京都豊島区(大塚駅) -
債権債務システム追加開発/東京都文京区/【WEB面談可】/在宅勤務
月給62万～67万円東京都文京区(後楽園駅) -
PMO/東京都豊島区/【WEB面談可】/在宅勤務
月給55万～55万円東京都豊島区(池袋駅)
関連記事Related Posts
-
【VB.NET入門】DataGridViewの使い方まとめ
「VB.NETのDataGridViewっていつ使うんだろう……」 「DataGridViewの具体的な使い方や応用テクニックを知りたいな……」 と思っていませんか？ VB […]
-
【サンプル付き】VB.NETでファイルの存在チェックをする方法！
「VB.NETでファイルの存在チェックをするには、どうすればいいんだろう……」 「具体的な方法やサンプルコードが知りたいな……」 と思っていませんか？ ファイルを読み込んだ […]
-
VB.NETの構造体の使い方は？クラスとの違いやサンプルも解説！
「VB.NETの構造体の使い方がよくわからない……」 「具体的な使い方だけでなく、クラスとの違いも知りたいな……」 と思っていませんか？ VB.NETの構造体は、クラス同様覚えておくととても便利です。ただ、使い方が分かり […]
-
VB.NETで定数を使用する方法とは？Constの使用場面と使用方法
VB.NETで定数を使用する方法とは？Constを使ってみよう 今回は、VB.NETにおける定数の使用方法について説明します。 VB.NETで定数を宣言する場合、Constを使います。本記事では定数を使用する意図を説明し […]
-
VB.NETでの配列初期化方法とは？宣言と初期化・サイズを指定・ReDimで再宣言・要素固定の一括初期化
VB.NETでの配列初期化方法とは？ 今回は、VB.NETでの配列の初期化方法について説明します。ここでは、宣言と初期化、サイズ指定、ReDimで再宣言、一括初期化、コピーで初期化について紹介します。 VB.NETでの配 […]
