【ランダム順出題】Access VBA スタンダード 模擬試験　①

SELECT句の書き方による高速化の説明として、最も適切なものを1つ解答しなさい。

オブジェクト変数について、（A）には代入したオブジェクトへの参照を解除するとき と、（B）には参照が代入されているかどうかを調べるとき に記述する内容の組み合わせとして最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

次のコードは、配列の中身を値渡しするために、バリアント型変数NVに配列Nを格納してからExam2に渡し、呼び出し先で内容を確認（出力）するものである。

空欄に入る記述の組み合わせとして適切ものを1つ選びなさい。

Sub Exam1()

　　Dim N(2) As String

　　Dim NV As Variant

　　Dim i As Long

　　For i = 0 To 2

　　　　N(i) = "VBA" & (i + 1)

　　Next i

　　【　①   】

　　Call Exam2(NV)

　　MsgBox "完了"

End Sub

Sub Exam2(【　➁   】)

　　Dim j As Variant

　　For Each j In NV

　　　　Debug.Print j 

　　Next j 

End Sub

集計クエリにおけるWHERE句とHAVING句の違いとして、最も適切なものを1つ解答しなさい。

次のコードを実行するとどうなるか。以下の選択肢より1つ解答しなさい。

Sub Exam1()

　Dim conn As ADODB.Connection

　Dim rst As ADODB.Recordset

　Set conn = CurrentProject.Connection

　Set rst = conn.Execute("SELECT * FROM [Table Product1]")

　Do Until rst.EOF

　　rst.MoveNext

　Loop

　  rst.MoveNext

　rst.Close

　Set rst = Nothing: Set conn = Nothing

　MsgBox "完了"

End Sub

メインフォーム「form1」に配置されたサブフォームコントロール「sub1」の中に、テキストボックス「txt1」がある。対象オブジェクト自身のモジュールであるform1 のフォームモジュールから、このサブフォーム内の txt1 の値を参照したい。記述選択肢の中から適切なものを１つ解答しなさい。

標準モジュールに次のコードが記述されている。このコードを実行し、変数  iの値が15になった時点でプロシージャの実行を中断させたい。

変数をそれぞれをウォッチウィンドウにドラッグアンドドロップしてウォッチ式を追加し、変数  iの「ウォッチ式の編集」ダイアログボックスを開いて、「ウォッチの種類」で「式がTrueのときに中断」を選択する。

このとき、「式」のテキストボックスに入力する条件式として最も適切なものを、次の選択肢から1つ選びなさい。

Visual Basic Editor（VBE）の各ウィンドウの「名称」と「役割」の組み合わせとして最も適切なものを以下の選択肢より１つ解答しなさい。

ADO（ActiveX Data Objects）の説明として最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

リレーションシップに参照整合性、フィールドの連鎖更新、レコードの連鎖削除を設定する操作の説明として最も適切なものはどれか。以下の選択肢より１つ解答しなさい。

次のコードは、TextStreamオブジェクトを1行ずつ最後まで読み取り、イミディエイトウィンドウに出力する処理である。

空欄に当てはまる最も適切な語句はどれか。以下の選択肢より１つ解答しなさい。





Sub Exam1()

　　Dim fso As New FileSystemObject

　　Dim ts As TextStream

　　Dim strpath As String

　　strpath = CurrentProject.Path & "￥a.txt"

　　Set ts = fso.OpenTextFile(strpath, ForReading)

　　Do Until ts.【　①　】

　　　　Debug.Print ts.ReadLine

　　Loop

　　ts.Close

　　Set fso = Nothing

　　Set ts = Nothing

　　MsgBox "完了"

End Sub

DAOのDatabaseオブジェクトのExecuteメソッドを使ってSQLを実行する方法に関する説明として、最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

フォームのテキストボックス「txta」に、次のコードが記述されている。
フォームビューで開き、txta に「abc」と入力して Enter キーを押した。このときの結果として正しいものはどれか。以下の選択肢より1つ解答しなさい。





Private Sub txta_BeforeUpdate(Cancel As Integer)

　　If Not IsNumeric(Me.txta.Value) Then

　　　　Me.lbla.Caption = "整数以外が入力"

　　　　Cancel = True

　　End If

End Sub

Access VBAの「プロジェクト」に関する説明として、最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

次のプロシージャは、For…Next ステートメントの中に Do…Loop ステートメントを入れ子にした処理である。内側では j が 2 になった時点で内側の繰り返しを抜け、外側では i が 3 になった時点で外側の繰り返しを抜ける。

空欄①・②に当てはまる語句の組み合わせとして適切なものを、以下の選択肢より1つ選びなさい。


Sub Exam1()

　　Dim i As Long, j As Long

　　For i = 1 To 5

　　　　j = 0

　　　　Do

　　　　　　j = j + 1

　　　　　　If j = 2 Then Exit 【　①　】

　　　　Loop While j < 10

　　　　If i = 3 Then Exit 【　②　】

　　Next i

　　MsgBox "完了"

End Sub

次の「Fun1」プロシージャは、 文字列と整数を受け取り、変数Nに文字列を繰り返し連結してから戻り値に代入する前提のコードであるが、

このコードを、変数Nを使わずにプロシージャ名を変数の代わりに使う形へ書き換えたとき、【　①   】に入る記述として最も適切なものはどれか。以下の選択肢より１つ解答しなさい。


【変数Nを使う元のコード】

Function Fun1(MeStr As String, MeLng As Long) As String

　　Dim i As Long

　　Dim N As String

　　For i = 1 To MeLng

　　　　N = N & MeStr

　　Next i

　　Fun1 = N

End Function


【変数Nを使わない書き換え後のコード】

Function Fun1(MeStr As String, MeLng As Long) As String

　　Dim i As Long

　　For i = 1 To MeLng

　　　　【　①   】

　　Next i

End Function

ADOのRecordsetで各メソッドやプロパティを実行した後、カレントレコードがどの位置になるかに関する説明として最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

変数の「適用範囲（スコープ）」と「有効期間」に関する説明として、最も適切なものを選びなさい。

外部オブジェクトを参照する「事前バインディング」と「実行時バインディング（遅延バインディング）」の違いに関する説明として最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

ロックタイプ（LockType）の既定値として正しいものはどれか。
以下の選択肢より1つ解答しなさい。

Resume ステートメントに関する記述として正しいものはどれか。以下の選択肢より1つ解答しなさい。

次のコードを記述し、Exam1 プロシージャを実行した。イミディエイトウィンドウにどのように出力されるか、最も適切ものはどれか。以下の選択肢より１つ解答しなさい。

Sub Exam1()

　　Dim N() As String

　　ReDim N(1)

　　N(0) = "VBA"

　　N(1) = "SQL"

　　ReDim N(3)

　　N(2) = "CSV"

　　N(3) = "XML"

　　Debug.Print N(0) & N(1) & N(2) & N(3)

　　MsgBox "完了"

End Sub

次のコードは、ADOを使って外部ファイルに接続し、レコードセットを取得する接続処理である。

上段はCSVファイルへの接続、下段はExcelブックへの接続を表している。Provider（データプロバイダ）とExtended Propertiesに指定する語句を、それぞれ①〜④に当てはめたい。

空欄に当てはまる最も適切な組み合わせはどれか。以下の選択肢より１つ解答しなさい。

プロシージャの種類に関する説明として最も適切なものはどれか。以下の選択肢より１つ解答しなさい。

OLEオートメーションでAccessからExcelを操作する場合の「オートメーションサーバ」と「オートメーションクライアント」の組み合わせとして正しいものを1つ選びなさい。

次の説明は、データベースへの接続状態を判定するものである。説明として正しいものはどれか。以下の選択肢より1つ解答しなさい。

次のコード実行したときに発生するエラーについて説明として最も適切ものはどれか。以下の選択肢より１つ解答しなさい。


Sub Exam1()

　　Dim i As Long

　　For i = 1 To 10

　　　　Debug.Print i

　　MsgBox "完了"

End Sub