题目内容
（请给出正确答案）
[主观题]
Visual Basic集成的主窗口中不包括A．属性窗口B．标题栏C．菜单栏D．工具栏
Visual Basic集成的主窗口中不包括
A．属性窗口
B．标题栏
C．菜单栏
D．工具栏
查看答案
如果结果不匹配，请 联系老师 获取答案
题目内容
（请给出正确答案）
如果结果不匹配，请 联系老师 获取答案
题目内容
（请给出正确答案）
Visual Basic集成的主窗口中不包括
A．属性窗口
B．标题栏
C．菜单栏
D．工具栏
如果结果不匹配，请 联系老师 获取答案
更多“Visual Basic集成的主窗口中不包括A．属性窗口B．…”相关的问题
在Visual：Basic的立即窗口内输入以下语句： X=65 ＜CR＞ Print Chr$(x) ＜CR＞ 在窗口中显示的结果是
A．65
B．A
C．a
D．x
下列可以启动Visual Basic的方法是
A．打开“我的电脑”，找到存放Visual Basic所在系统文件的硬盘及文件夹，双击“VB6.exe”图标
B．在DOS窗口中，键入Visual Basic的路径，执行Visual Basic可执行文件
C．利用“开始”菜单中的“程序”命令可启动Visual Basic
D．A和C
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组，名称为cmdl，下标分别为0、1、2，Caption分别为“开始”、“停止”和“退出”，如图3(a)所示。通过属性窗口设置各命令按钮的属性，使得程序开始运行时，“停止”按钮不可见，“退出”按钮不可用，如图3(b) 所示。 注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1．frm，工程文件名为sjt1．vbp。
(2)在名称为Form1的窗体上画两个名称分别为Command1和Command2、标题分别为“打开”和“保存”的俞令按钮，和一个名称为CD1的通用对话框，如图4所示。请在属性窗口中设置CD1的属性，使得打开通用对话框时，其初始路径是“C:\”。再编写适当的事件过程，使得运行程序，分别单击“打开”或“保存”按钮时，相应地出现“打开”或“保存”对话框。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt2．frm，工程文件名为sjt2．vbp。
请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上建立一个垂直滚动条，请在属性窗口中把它的名称设置为VS1，Max属性设置为50，Min属性设置为0，Value属性设置为50。程序运行后，滚动块位于滚动条最下端，如图52-1所示，如果单击滚动条之外的窗体部分，则滚动块跳到最上端。
图52-1
注意：只能直接为相应的属性赋值，不得使用变量。保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp 。
（2）在名称为Form1的窗体中建立一个标签，名称为Lable1，在标签上显示"编程语言"并设置为四号宋体；再建立3个复选框，名称分别为Check1、Check2和Check3，标题分别为"C++"、"Basic"和"JAVA"，字体大小均为四号宋体，加粗，其中"JAVA"被禁用，如图52-2所示。
图52-2
注意：保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。
Visual Basic集成环境的大部分窗口都可以从主菜单项()的下拉菜单中找到相应的打开命令。
A．编辑
B．视图
C．格式
D．调式
阅读以下应用说明及Visual Basic程序代码，将应填入______处的语句写在答题纸的对应栏内。
[应用说明9]
本应用程序的运行窗口如图2-6所示。
.jpg)
窗口中的3个文本框和2个按钮，名称分别为Txt_salary，Txt_base，Txt_tax，Cmd compute和Cmd_quit。运行时，文本框Txt_base中存放的是免税金额基数(应扣除的基本费用)。当用户在文本框Txt_salary中输入月收入(工资或薪金)并单击“计算”按钮 Cmd_compute后，Txt_tax框中就显示计算所得的应纳税额。文本框Txt_base和Txt_ tax在运行时不接受用户输入，Txt_base的内容以灰色显示。
个人工资(或薪金)所得税是按照超额累进的税率来征收的，其计算方法参考试题8。
[程序代码9]
Option Base 0
Private Sub Cmd_compute_Click()
Dim paylevel，taxPrate
paylevel=Array(0，500，2000，5000，20000，40000，60000，80000，100000，1000001)
taxPrate=Array(5，10，15，20，25，30，35，40，45)
K=(1)
S=0
if(K＞0) Then
For j=1 TO 9
If (2) Then
S=S+(paylevel(j)-paylevel(j-1)) * taxPrate(j-1)/100
Else
S=S+((3) ) * taxPrate(j-1)/100
Exit For
End If
Next j
End If
(4)=Str$(S)
End Sub
Private Sub Cmd_quit_Click()
End
End Sub
Private Sub Form_Load()
Txt_tax.Text=“”
Txt_salary.Text=“”
Txt_base.Text=800
Txt_tax.Locked=True
Txt_base.Enabled=(5)
End Sub
