女性，21岁。右大腿明显肿大，步行有沉重感1年。查体：一般情况良好。右大腿中下1/3
题型：单项选择题 A3/A4型题
问题：
女性，21岁。右大腿明显肿大，步行有沉重感1年。查体：一般情况良好。右大腿中下1/3处以下体积明显增大，可见弥漫的呈念珠状或索状弯曲的粗大、搏动的血管，触之质地柔软而有弹性，皮温较健侧增高，局部可扪及持续震颤，听诊可闻及连续性吹风样杂音。该患者可初步诊断为（）
A.血管畸形
B.蔓状血管瘤
C.草莓状血管瘤
D.海绵状血管瘤
E.混合性血管瘤
题型：单项选择题 A3/A4型题
完成下列问题：
在考生文件夹下有工程文件sjt3.vbp。程序运行时的窗体如图3所示。输入商品名称后，选中一种付款方式，则“成交”按钮变为可用，选择一种或多种“服务”后，单击“成交”按钮，则把相应信息显示在下面的图片框中，如图4所示。若不选任何“服务”，则显示如图5所示。单击“放弃”按钮，则恢复到图3状态。
程序已经给出但不完整，请在横线处填写正确的内容，以实现上述功能。
要求：考生不得修改窗体文件中已经存在的控件和程序，最后把修改后的文件按原文件名存盘。
[题目提供的源程序]
Private Sub Command1_Click()
Dim flag As Boolean
flag=False
Picture1.Print Label1.Caption, Text1.Text
Picture1.Print Frame1.Caption; ":",
For k=0 To 3
If Optionl(k).Value=True Then
Picture1.Print Optionl(k).Caption
End If
Next k
For k=0 To 2
If Check1(k).Value= (1) Then
If Not flag Then
Picture1.Print Frame2.Caption; ":",
flag=True
End If
Picture1.Print Check1(k).Caption; "";
End If
Next k
Picture1.Print
End Sub
Private Sub Command2_Click()
(2) =""
For k=0 To 3
Optionl(k).Value=False
Next k
For k=0 To 2
Checkl(k).Value=0
Next k
Picture1.Cls
Command1.Enabled=False
End Sub
Private Sub Option1_Click(Index As Integer)
(3)
End Sub