在VisualBasic6.0中，打开“考生文件夹\65”文件夹中的工程文件“工程1.vbp”，认真查看“反向输出三位数”程序，并完成以下操作：（1）在窗体上创-组卷网

操作题适中0.65 引用1 组卷1

在Visual Basic6.0中，打开“考生文件夹\65”文件夹中的工程文件“工程1.vbp”，认真查看“反向输出三位数”程序，并完成以下操作：
（1）在窗体上创建一个标签框Label1，将Label1的Caption属性改成空，Font属性改成楷体。
（2）在“代码1”处填入合适代码（请勿改动已有代码），将变量x定义为整型数据。
（3）在“代码2”处补全代码（请勿改动已有代码），计算出百位上的数字A。
（4）调试运行该程序，查看结果，原名原位置保存文件并退出。

2023九年级·全国·专题练习

收藏试题下载试题加入试题篮

知识点：VB编程答案解析【答案】很抱歉，登录后才可免费查看答案和解析！

类题推荐

下面程序的功能是输出数组s中最大元素的下标，请填空。
#include<iostream>
       using namespace std;
       int main()
       { int k, p,s[]={1, -9, 7, 2, -10, 3};
          for(p =0, k =p; p< 6; p++)
               if(①___)
          ②____;
       cout<< k<<endl;
       return 0;
}
输出结果：③____

设计出租车收费计算器VB程序，使其具有下列功能：在文本框Text1中输入行驶的路程，单击“计算”按钮Command1，在文本框text2中显示所需的费用（注意：当行驶的公里数a≤3公里时，费用s为6.5元；当行驶的路程超过3公里时，3公里按6.5元计算，超出部分按每公里1.6元收费）。界面设计如图所示。

有如下一个生活中常见的情况：
输入一个成绩，判断该成绩属于“优秀”、“良好”、“及格”还是“不及格”。
（1）请为上面的程序设计流程图____。

（2）请把下面对应的代码填写完整。
Private Sub Command1_Click()
       Dim x As Integer
       x=____(Text1.Text)
       Select Case x
______
             Text2.Text=“优秀”
       Case x≧75
_____
_____
_____
       Case Else
            Text2.Text=“不及格”
       End Select
End Sub

组卷网是一个信息分享及获取的平台，不能确保所有知识产权权属清晰，如您发现相关试题侵犯您的合法权益，请联系组卷网