既往史不应包括（）. A.预防接种史 B.既往的不健康状况 C.外

搜题请搜索小程序“爱下问搜题”

问题单项选择题

既往史不应包括（）.

A.预防接种史

B.既往的不健康状况

C.外科手术史

D.过去曾经患过的疾病

E.出生地、居住地及居留时间

答案

参考答案：E

单项选择题

以下哪项患者使用过的敷料需焚烧处理：（）

A.金葡菌感染者

B.大肠杆菌感染者

C.白色念珠菌感染者

D.气性坏疸者

E.急性传染性甲型肝炎者

查看答案

单项选择题

在C盘当前文件夹下有一个已建立好的顺序文件Alph.txt，文件内容为只含有字母的一个字符串(有双引号界定符)。单击窗体，打开Alph.txt文件，读取字符串并显示在文本框Text1中，然后调用StrSort过程将此字符串按ASCII码的顺序重新排列并显示在文本框Text2，最后将重新排列的字符串存入AlpO.txt文件中(无双引号界定符)。请选择横线处合适的语句 ( )。 Private Sub Form_Load() Dim StrIn As String, StrOut As StringOpen "C:\Alph.txt" For Input As #1 ______CloseText1.Text=StrIn ______Text2.Text=StrOutOpen "C:\AlpO.txt" For Output As #2 ______Close End Sub Private Function StrSort(s As String) As String Dim sArr() As String *1, i As Integer,j As Integer, n As Integer Dim t As String *1n=Len(s)ReDim sArr(n)For i=1 To n sAn(i)=Mid(s,i,1)Next iFor i=1 To n-1 For j=i+1 To n If sArr(i)＞sArr(j) Then t=sAn(i):sArr(i)=sArr(j):sArr(j)=t End IfNext j,iFor i=1 To n StrSort=StrSort & sArr(i)Next i End Function