题目内容

[说明] 以下代码实现了当用户推出界面时,判断TextEdit中的文字是否发生改变,弹出对话框判断,让用户选择选择是否保存文件或取消退出界面操作。阅读下面代码,补充完整。 [代码7-1] Begin VB.Form Forml //...窗体描述(略) Begin VB.TextBox TextEdit Height = 1830 Left = 180 TabIndex = 0 Text = "TextEdit" Top = 360 Width = 3885 End //...窗体描述(略) End [代码 7-2] Dim txtchange As Boolean Dim myval As String Private Sub Form Load ( ) TextEdit.Text = "CIU, 中国软考联盟! txtchange = False End Sub [代码 7-3] Private Sub TextEdit_Change ( ) Static notchange As Boolean (1) (2) End Sub Private Sub Form_Unload ( Cancel As Integer ) Dim myval As String If (3) Then myval = MsgBox ( "保存文件的更改吗", vbYesNoCancel, "提示信息" ) If (4) Then MsgBox "保存成功" End End If If (5) Then End If (6) Then Cancel = 1 End If End Sub

查看答案
更多问题

16岁男性患者,咽痛7天后出现水肿2周,尿蛋白2.0g/24h,红细胞10个/HP,上述情况最可能是哪种病的表现

A. 急性肾小球肾炎
B. 急进性肾小球肾炎
C. 慢性肾小球肾炎
D. 隐匿性肾小球肾炎
E. 肾病综合征

支气管扩张患者痰量与下列哪个因素有关

A. 喝水的多少
B. 季节
C. 体位
D. 合并肺结核
E. 合并支气管哮喘

为了鉴别急性胆道感染和胃穿孔,宜采用下列哪项检查

A. 静脉胆道造影明确诊断
B. 经皮肝穿刺造影明确诊断
C. 口服胆道造影明确诊断
D. B超明确诊断
E. 纤维胃镜了解穿孔部位

高压蒸汽灭菌,欲杀灭带芽胞的细菌至少需

A. 蒸汽压力104.0~137.3kPa(15~20lbf/in2),温度121~126℃,维持10分钟
B. 蒸汽压力104.0~137.3kPa(15~20lbf/in2),温度121~126℃,维持20分钟
C. 蒸汽压力104.0~137.3kPa(15~20lbf/in2),温度121~126℃,维持30分钟
D. 蒸汽压力104.0~137.3kPa(15~20lbf/in2),温度121~126℃,维持45分钟
E. 蒸汽压力104.0~137.3kPa(15~20lbf/in2),温度121~126℃,维持60分钟

答案查题题库