[试题]

阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。

[说明]

某银行新近开通外汇定期存款业务。为方便用户查询不同存款方式下的日利率、计算本利，特开发了日利率查询及本利计算程序，其运行窗口如下图所示。用户只要在界面上选择相应的存款方式(包括外汇币种、存期等)，便可单击按钮一查询存款日利率。若输入一定数量的本金。程序还会根据所选择的存期计算并输出本利和。

在开发过程中，选择币种和存期的组合框(ComboBox)名分别为Combo1和Combo2，单旋钮 (CommandButton)“个人单位”和“金融机构”分别名为Option1和Option2，用于输入本金的文本框 (TextBox)名为Price，“输出日利率”和“计算本利和”按钮(CommandButton)分别名为Command1和 Command2。且已知，第i类币种、第j类存期之下，个人单位与金融机构的存款日利率分别存放于数组元素interestRate(i,j,0)和interestRate(i,j,1)中，其中i,j从0开始计数。

[Visual Basic代码]

D．im interestBate(50，10，2) As Single ’通用声明

Private Sub Form_Load()

…… ’为数组interestRate赋初值

E．nd Sub

’根据所选择的币种、存期等信息确定日利率

F．unction getInterestRate()

D．im strCurrency, strTime As String, i, j, k, intDays As Integer

strCurrency = Combo1.Text

strTime = Combo2.Text

F．or i = 0 To Combol. ListCount - 1

If Combol.List(i) = strCurrency Then (1)

Next

F．or j = 0 To Combo2.ListCount - 1

IfCombo2.List(j) = strTime Then (1)

Next

If (2)=True Then

k=0

E．lse: k=1

E．nd If(3)= interestRate(i, j, k)

E．nd Function

’输出日利率

Private Sub Commund1_Click()

MsgBox "日利率为" & getInterestRate()

E．nd Sub

’输出本利和

Private Sub Command2_Click()

D．im strTime As String, intDays As Integer, sngCorpus, sngResult As Single

strTime = Combo2. Text

sngCorpus = CSng(Text1.Text)(4) ’计算存款天数(以每月30天计)

C．ase "一个月" :intDays = 30

C．ase "三个月" :intDays = 90

C．ase "六个月" :intDays = 120

E．nd Select

’计算并输出本利和

sngResult = sngCorpus +(5)

MsgBox "本利之和为:" & sngResult

E．nd Sub

参考答案与解析：

相关试题

阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏

[试题]阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。[说明]某公司的服务器上为每位员工提供了一定大小的存储空间，用于数据的备份。下面的程序面向公司员工，提供了本地计算机与服务器端之间文件传输的功能。主要操作介绍如下：(1)连接服务器：员工需要输入用户名和口令才能连接到服务器端，checkUser函数用于检查用户名和口令是否合法，返回真假值。(2)上传文件：从本地计算机上传文件到服务器。员工可以在本地文件列表中选择一个或多个文件，这些文件通过上传操作被复制到服务器端指

  • 查看答案

    • 阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏

    [试题]阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。[说明]我国现行使用的公民身份证号码有两种，分别遵循两个国家标准：〖GB 11643-1989〗和〖GB 11643-1999〗。〖CB 11643-1989〗中规定的是15位身份证号码，排列顺序从左至右依次为：六位数字地址码，六位数字出生日期码，三位数字顺序码，其中出生日期码不包含世纪数。〖GB 11643 -1999〗中规定的是18位身份证号码，是特征组合码，它由十七位数字本体码和一位数字校验码组成。排列顺序从

  • 查看答案

    • 阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏

    [试题]阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。(说明)某学校举办了一场奥运知识竞赛，参加竞赛的选手为200名，1～200为选手编号。竞赛时间为9:00～11:00。8道竞赛题目依次从“A”～“H”编号，选手可按任意次序答题，每完成一道题目，可立即提交答案。若答案正确(Y)，则选择其他题目进行解答，否则，可继续做该题目或选择其他题目进行解答，直至竞赛结束。选手提交答案的情况及判定结果由专人即时录入，录入数据包括提交答案的时间、选手编号、题目编号(A～H)、是否正

  • 查看答案

    • 阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对

    [试题]阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。(应用说明5.1)本应用程序的窗体中有一个下拉式列表框(名称为Combo1)和两个文本框(名称分别为 Txt1和Txt2)。运行时，用户从Combo1的列表中进行选择，程序就会将选中条目的内容以及编号(从0开始)分别在文本框Txt1和Txt2中显示出来。(程序代码5.1)Private Sub Combo1_Click()Txt1.Text = Combo1. (1)Txt2.Text = Combo1. (2

  • 查看答案

    • 阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对

    [试题]阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。(说明8.1)以下程序的功能是：生成20个200～300之间的随机整数，输出其中能被5整除的数并求出它们的和。(程序代码8.1)Private Sub Command1_Click()F．or i=1 To 20x=Int((1)*200+100)If (2)=0 ThenPrint xS=S+ (3)E．nd IfNext iPrint"Sum=";SE．nd Sub(说明8.2)程序8.2运行后，单击窗

  • 查看答案

    • 阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。

    [试题]阅读以下说明和Visual Basic代码，将应填入(n)处的字句写在对应栏内。(说明)以下代码实现了当用户退出界面时，判断TextEdit中的文字是否发生改变，弹出对话框判断，让用户选择是否保存文件或取消退出界面操作。阅读下面的代码，将其补充完整。(代码7-1)B．egin VB.Form. Forml//...窗体描述(略)B．egin VB.TextBox TextEditH．eight = 1830Left = 180Tablndex = 0Text = "TextEdit"Top =

  • 查看答案

    • 阅读以下说明及Visual Basic程序代码,高尔夫球应填入(n)处的字句写在

    [试题]阅读以下说明及Visual Basic程序代码，高尔夫球应填入(n)处的字句写在对应栏内。[说明]设某单位Acess数据库中有一张员工信息表，其中记录了员工编号、姓名、性别等基本信息。下面的应用程序利用数据控件(Data)实现了对这张表中记录的增加、删除和修改操作。其运行界面如下：在开发过程中，数据控件Data1与员工数据表相连接，各文本框、“性别”组合列表框Combo1、“政治面貌”组合列表框Combo2都分别与数据表的相应字段绑定，界面上从左到右各操作按钮分别取名为CmdAdd、CmdDel、

  • 查看答案

    • 阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写

    [试题]阅读以下应用说明及Visual Basic部分程序代码，将应填入(n)处的字句写在对应栏内。(说明)本应用程序是一个小写数字转换成大写格式的转换器，其运行窗口如图5所示。窗口中有两个标签(lblNumber和lblChinese)、两个文本框(txtNnmber和txtChinese)和一个命令按钮(cmdChange)。当单击按钮cmdChange时，将文本框txtNumber中数字转换成中文大写，并显示在文本框txtChinese中。例如，在文本框txtNumber输入0076845，单击cm

  • 查看答案

    • 阅读以下说明和C£«£«代码(代码13£­1),将应填入(n)处的字句写在对应栏

    [试题]阅读以下说明和C++代码(代码13-1)，将应填入(n)处的字句写在对应栏内。(说明)软件设计师东方飞龙利用UML设计了一个迷你小型复数类，其类图如图13-11所示。(代码13-l)/*___________________________________*//********* 文件 MiniComplex. h*********//*___________________________________*/include＜iostream＞using namespace std;class M

  • 查看答案

    • 试题七 阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的

    [试题]试题七阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在答题纸的对应栏内。(说明)已知窗体上有两个名为cmdGene和cmdSort的命令按钮。单击cmdGene按钮时，随机产生10个［1，100］范围内的整数并将它们放在数组intA中；单击cmdSort按钮时，用选择法排序这10个数并输出。(程序代码)D．im intA(1 To 10)As IntegerPrivate Sub cmdGene_Click()D．im intI As IntegerRandomize

  • 查看答案