Visual Basic 初級講座

Visual Basic 中学校 > 初級講座 >

第３９回　中間試験３

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

概要

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

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

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

１．諸注意

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

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

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

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

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

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

なお、単純化するためにすべての設問は標準的な環境を前提に作成されています。特定の状況下では答えが異なる場合もありますし、厳密には日本語が不十分でもあります。

２．試験

問題１．

次のコードに関する説明として正しいものはどれか。

Dim Names(5) As String
　

問題２．

次のうち、配列の要素の数を変更するときに必ず使用するキーワードはどれか。

問題３．

次のプログラムを実行したときに、Label1に表示されるものは次のうちどれか。

Dim Names1() As String = {"マリウス", "スラ", "カトー"}
Dim Names2() As String = Names1

Names2(1) = "平群真鳥"

Label1.Text = Names1(1)

問題４．

次のうちコレクションの説明としてまちがっているものはどれか。

問題５．

フォームに関する以下の説明の中でまちがっているものはどれか。

問題６．

次のうち、テキストファイルの読み込みを行う場合に使用するクラスとして最も妥当なものはどれか。

問題７．

次のプログラムはC:\Text1.txtが読み取り専用属性を持っているか調べるものである。このプログラムを完成させるために( A )の部分に当てはまるキーワードとしてもっとも適切なものは次のどれか。

If IO.File.GetAttributes("C:\Test1.txt") ( A ) IO.FileAttributes.ReadOnly Then
MsgBox("読み取り専用です。")
Else
MsgBox("読み取り専用ではありません。")
End If

問題８．

ユーザーが指定したファイル名でファイルを作成するプログラムを作りたい。ファイルを保存する前にユーザーが指定したファイルの拡張子を確認するのに使用できるものは次のうちどれか。

問題９．

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

( Ａ )
Private Sub MyMethod()

MsgBox("テストです！")

End Sub

問題１０．

次のうち、完成したexeファイルの会社名を指定するときに使用する属性はどれか。

問題１１．

次の属性についての説明のうち、まちがっているものはどれか。

問題１２．

次のうち、値型のものはどれか。

問題１３．

次のうち、参照型の変数の完全なコピーを確実に作成する方法の説明として最も適切なものはどれか。

問題１４．

次のコードの実行結果とその理由を正しく説明しているものはどれか。

Dim St1 As String
Dim St2 As String

St1 = "山梨県"
St2 = St1
St2 = "香川県"

MsgBox(St1)

問題１５．

変数が参照型であるかどうか確認するのに使用するメソッドとして最も適切なものは次のうちどれか。

問題１６．

次のうち、PrintDocumentクラスを使用して印刷を実行するときに、印刷内容の描画に使用するイベントはどれか。

問題１７．

印刷を行うときに、改ページを実行する方法を説明しているものとして正しいものは次のうちどれか。

問題１８．

次のプログラムの実行結果の説明として、最も適切なものはどれか。

Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click

PrintDocument1.Print()

End Sub

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

    Dim f As New Font("ＭＳ明朝", 64, FontStyle.Bold)
    Dim i As Integer
    Dim Y As Single

    For i = 0 To 99
        Y = 10 + (f.GetHeight(e.Graphics) * i) '現在の行の縦位置を計算
        e.Graphics.DrawString(CStr(i) & "行目です。", f, Brushes.Red, 10, Y)
    Next

End Sub

問題１９．

次のプログラムがビルドエラーになる場合、考えられる原因を以下の選択肢から選ぶとすると最も適切なものはどれか。

Dim X As Integer
Dim Y As Integer

X = 5
Y = 6

TextBox1.Text = X + Y

問題２０．

テキストファイルを読み込んでテキストボックスに表示させたところ、以下の画像のように文字化けしてしまった。考えられる原因として最も適切なものは次のうちどれか。

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