Visual Basic 初級講座

Visual Basic 中学校 > 初級講座 >

第１５回　中間試験１

今回は今までの内容を元に試験を行います。自分の理解度、到達度を示すものさしとしてご活用ください。なお、問題の内容や回答にご意見や疑義がある場合は掲示板に書き込んでください。

概要

・問題は全部で２０問あります。

・出題範囲は初級講座第１回～第１３回です。

・最後に「採点」ボタンをクリックすると、あなたの総合評価が表示されます。

この記事の内容はVisual Basic.NET 2003で確認しています。

１．諸注意

今回は、全部で２０問の問題に答えてください。

採点は１問答えるごとにすぐに表示されるので、答えるときは慎重に答えてください。

１度答えた後での回答の変更は禁止します。変更しようと思えば変更できますが、やらないでください。

出題範囲は初級講座第１回～第１３回です。

最後の「採点」ボタンをクリックすると、あなたの総合評価が表示されます。

この試験では、あなたの情報が外部に送信されることはありません。

２．試験

問題１．

次のうち、コントロールの背景色を表しているプロパティはどれか。

問題２．

次のうち正しいもの(エラーにならないもの)はどれか。

問題３．

次のプログラム中の( A )を埋めて正しいプログラムとするとき。( A )にあてはまるものとしてもっとも適切なものはどれか。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim g As Graphics = ( A )

g.DrawLine(Pens.Red, 0, 0, 100, 200)

End Sub

問題４．

整数を保存するための変数を宣言するときに使用するキーワードとして最も適切なものは次のうちどれか。

問題５．

変数に関する注意事項としてまちがっているものは次のうちどれか。

問題６．

以下はあるプログラムの一部分を抜き出したものである。この抜粋について述べている以下の説明のうち間違っているものはどれか。ただし、IsMatchがプロパティでないことはあらかじめ分かっているものとする。

If Len(CheckPattern) > 0 Then

Dim Reg As New System.Text.RegularExpressions.Regex(CheckPattern)

    If Reg.IsMatch(Value) = False Then
        FoundError()
        Return False
    End If

End If

問題７．

次のプログラムの実行結果に関して説明している以下の文章のうち正しいものはどれか。

Dim Value As String
Dim St1 As String
Dim St2 As String

Value = "123あいう"

St1 = Value.Substring(1, 3)
St2 = Mid(Value, 1, 3)

問題８．

フォームのLoadイベントでLeft関数を使いたい。次のうち正しい使い方をしているものはどれか。

問題９．

次のプログラムの中の( A )の部分を埋めて正しいプログラムとするとき、( A )に当てはまるものとして最も適切なものは次のうちどれか。

If TextBox1.Text = "hello" Then

MsgBox("こんにちは")

( A ) TextBox1.Text = "bank" Then

MsgBox("銀行")

End If

問題１０．

次のプログラムの実行結果に関して説明している以下の文章のうち正しいものはどれか。

Dim A As Integer = 1
Dim B As Integer = 3

If A <> 1 OrElse B <> 1 Then
MsgBox("OK")
Else
MsgBox("NG")
End If

問題１１．

次のプログラムの実行結果に関して説明している以下の文章のうち正しいものはどれか。

Dim K As Integer = 3

For K = 0 To 5

MsgBox("こんにちは")

問題１２．

次のプログラムを実行すると何が表示されるか。

Dim X As Integer = 1

X += 1

Loop Until X > 10

MsgBox(X)

問題１３．

次のプログラムについて説明している以下の文章のうち、正しいものはどれか。

1: Dim FileName As String

2: FileName = "C:\Windows\Test.txt"

3:    If IO.File.Exists(FileName) Then
4:        Dim Exists As Boolean
5:        FileName = "C:\Windows\Test2.txt"
6:        Exists = True
7:   End If

8: If Exists Then
9: IO.File.Create(FileName)
10: End If

問題１４．

名前空間について説明している以下の文章のうち、誤っているものはどれか。

問題１５．

クラスとインスタンスについて説明している以下の文章のうち、誤っているものはどれか。

問題１６．

次のプログラムの中の( A )の部分を埋めて正しいプログラムとするとき、( A )に当てはまるものとして最も適切なものは次のうちどれか。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) ( A ) Button1.Click

End Sub

問題１７．

次のプログラムについて説明している以下の文章のうち、誤っているものはどれか。

Dim Answer As String

Try

Answer = CDec(TextBox1.Text) / CDec(TextBox2.Text)

Catch ex As Exception

Answer = "!Error"

Finally

Label1.Text = Answer

End Try

問題１８．

次のうち、フォームを閉じてプログラムを終了させるのに最も適したキーワードはどれか。

問題１９．

次のうち、定数を宣言する方法を示しているのはどれか。

問題２０．

次のプログラムを実行するとエラーが発生する。エラーが発生しないようにプログラムを修正する方法として誤っているものをはどれか。

Dim St As String

MsgBox(St.Length)

すべての問題に解答したら、下の「採点」ボタンをクリックしてください。