题目内容

基类的【】不能被派生类的成员访问，基类的【】在派生类中的性质和继承的性质一样，而基类的【】在私有继承时在派生类中成为私有成员，在公有和私有保护继承时在派生类中仍为保护成员。

查看答案

搜索结果不匹配？点我反馈

更多问题

某一特定的时间序列的第1~n期每期末都有相等的现金流入或流出,若是现金流入可称为(),若是现金流出可称为()。

以下程序执行后输出的结果是【】。
include＜iostream＞
include＜fstream＞
using namespace std；
int main(){
ofstream ofile("D:\\temp.txt")；
if(!ofile){
cout＜＜"temp.txt cannot open"＜＜endl；
return 0；
}
ofile＜＜"This is a book" ＜＜" " ＜＜54321＜＜endl；
ofile.close()；
ifstream ifile("D:\\temp.txt")；
if(!ifile){
cout＜＜"temp.txt cannot open" ＜＜endl；
return 0；
}
charstr[40]；
ifile ＞＞ str；
ifile.close()；
cout＜＜Str＜＜endl；
return 1；
}

在C++中，设置虚基类的目的是【】。

阅读以下说明和Visual Basic代码，填入(n)处。
[说明]
在一些财务软件中，经常需要将阿拉伯数字的账目转化为汉语习惯中的金额计数方法，例如：
“3.45”转化为“叁元四角五分”；
“3.4”转化为“叁元四角”；
“3.40”转化为“叁元四角零分”；
“3.456”转化为“叁元四角五分”；
“345.00”转化为“叁百四十五元零角零分”；
“345”转化为“叁百四十五元”；
以下Visual Basic代码实现了小写金额转换为大写金额。界面如图10-9所示。结合实际例子说明，仔细阅读下面代码，将(n)代码补充完整。
[代码7-1]
Begin VB.FormForm1
Caption = "小写金额转换为大写金额"
//...窗体描述(略)
Begin VB.CommandButton Command1
Caption = "退出"
//...窗体描述(略)
End
Begin VB.TextBox Text2
//...窗体描述(略)
End
Begin VB.TextBox Text1
Enabled = 0 'False
//…窗体描述(略)
End
Begin VB.Labe1 Labe12
Caption = "转换为大写金额"
//...窗体描述(略)
End
Begin VB.Labe1 Labe11
Caphon = "请输入数字"
//...窗体描述(略)
End
End
[代码7-2]
Private Function setdata (num As Integer) As String '数字转换
Select CaSe num
Case 0
setdata="零"
Case 1
Setdata="壹"
Case 2
Setdata="贰"
Case 3
Setdata="叁"
Case4
Setdata="肆"
Case 5
Setdata="伍"
Case 6
Setdata="陆"
Case 7
Setdata="柒"
Case 8
Setdata="捌"
Case 9
Setdata="玖"
End Select
End Function
Private Function chang (aaa As Integer) As String '位数转换
Select CaSe aaa
Case 1
chang=""
Case 2
chang="十"
Case 3
chang="百"
Case 4
chang="千"
Case 5
chang="万"
Case 6
chang="十"
Case 7
chang="百"
Case 8
chang="千"
Case 9
chang="亿"
Case 10
chang="十"
End Select
End Function
[代码7-3]
Private Sub Text2_Change () '小写转大写
Dim i As Integer
Dim j As Integer
Dim myint As Integer
Dim myint1 As Integer
Dim mydoub As Double
Dim mystr As String
Dim mystr1 As String
Dim mystr2 As String
Dim mystr3 As String
Dim mystr4 As String
Dim money As Long
Dim money1 As Integer
Dim money2 As Long
mystr=Text2.Text
myint=InStr (mystr, ".")
If myint=0 Then
mystr=Text2.Text
Else
mystr3=Right(Text2.Text, Len (Text2.Text ) - myint)
If mystr3＜＞""Then '转换小数位
mystr4=Left(mystr3, 1)
mystr3=Right(mystr3, Len(mystr3 )