问题描述：
[问答题] 注意：下面出现的“考生文件夹”均为C：wexam25160002。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在名称为Form1的窗体上画一个名称为Command1的命令按钮，标题为“打开文件”，再画一个名称为CD1的通用对话框。程序运行后，如果单击命令按钮，则弹出打开文件对话框。请按下列要求设置属性并编写代码： 设置适当属性，使对话框的标题为“打开文件”；设置适当属性，使对话框的“文件类型”下拉式组合框中有二行：“文本文件”、“所有文件”，如图23-1所示，默认的类型是“所有文件”；编写代码，使得单击按钮可以弹出打开文件对话框。要求：程序中不得使用变量，事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 (2) 在名称为Form1的窗体上画一个命令按钮，名称为Command1，标题为“移动本按钮”，如图 23-2所示。要求编写适当的事件过程，使得程序运行时，每单击按钮一次， 按钮向左移动100。要求：程序中不得使用变量，事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
数据库系统其内部分为三级模式，即概念模式、内模式和外模式。其中，______是用户的数据视图，也就是用户所见到的数据模式。
列表框的List属性返回______。
以下Prime过程，用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数，就是合数。用被测试的数除以从2开始到该数本身的数，如果能除尽(余数为0)，则为合数；如果都除不尽(余数均不为0)，则为素数。请在划线处将下面过程补充完整： Function Prime(inputvar As Integer)As IntegerFor i=2 To inputvar-1 If inputvar Mod i= 【13】 ，Then GoTo comfinish End IfNext iPrime=inputvarPrint "素数"GoTo 【14】 comfinish:Prime=inputvarPrint"合数"finish: End Function
下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及经在原来12 option Base 1 Private Sub Form_Click() Dim x x = Array(57,-9, 17,42, -31,46, 11, 8, 6, -4, 3,90) Max=1 For k=2 To 10 Step 1 If x(k) ＞ x(Max) Then______ End If Next k y=______ Print Max, y End Sub
单击命令按钮时，下列程序的运行结果为 Private Sub Command1_Click( ) Print Fun(23, 18) End Sub Public Function Fun(m As Integer, n As Integer) As Integer Do Whilem ＜＞ nDo While m ＞ n : m--m - n: LoopDo While m ＜ n : n=n - m: Loop Loop Fun =m End Function
点评难度：
参考答案：
问题解析：
试题分享：