窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明:
A. Private Sub Command1_Click() Dim p As Person p. name=Text1. Text p. major=Text2. Text Open"C:\data. dat" For Random As #1 Put #1, 1, p Close #1 End Sub
B. Private Sub Command1_Click() Dim p As Person p. name=Text1.Text p. major=Text2. Text Open"C:\data. dat" For Random As #1 Get #1, 1, p Close #1 End Sub
C. Private Sub Command1_Click() Dis p As Person p. name=Text1. Text p. major=Text2. Text open "C:\data. dat" For Random As #1 Len=Len(p) Put #1, 1, p Close #1 End Sub
D. Private Sub Command1_Click() Dim p As Person p. name=Text1. Text p. major=Text2. Text Open "C:\data. dat" For Random As #1=Len(p) Get #1, 1, p Close #1 End Sub
查看答案
汗出而热,口舌干燥,唇干焦裂,肌热,舌质红绛而干焦,脉数疾无力,属
妇科门诊,某已婚妇女自诉:白带增多,外阴瘙痒伴灼热感1周。检查:阴道黏膜充血(),有散在红色斑点。白带呈泡沫状,灰黄色,质稀薄,有腥臭味。
给此位病人作阴道灌洗选择的溶液应为()。
A. 0.5%醋酸
B. 4%碳酸氢钠
C. 1:2000苯扎溴铵
D. 1:5000高锰酸钾
E. 1:1000呋喃西林