
复制
纠错
➡️如需代学继续教育,联系微信:yizhituziang
【单选题】
对于子宫内膜异位症相关痛经,下列哪项表述正确
【单选题】
为预防子宫内膜异位症,下列哪项是错误的
①
经期一般不作盆腔检查,若有必要,应避免重力挤压子宫
⑤
长期服用避孕药,可能会减少子宫内膜异位症的发病机会
【单选题】
以下不属于Visual Basic 6.0系统的文件类型是?
【单选题】
在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:
Private Sub Command1_Click()
??? CommonDialog1.FileName =
??? CommonDialog1.Filter=All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt
??? CommonDialog1.FilterIndex=2
??? CommonDialog1.DialogTitle=VBTest
??? CommonDialog1.Action=1
End Sub
对于这个程序,以下叙述中错误的是______。
①
在该对话框中指定的默认文件类型为文本文件(*.Txt)
【单选题】
表达式Len(abc程序设计123)的值是?
【单选题】
骰子是一个正六面体,分别用1~6 代表其六个面,掷一次骰子出现的数可表示为?
【单选题】
设执行以下程序段时依次输入1、3、5,执行结果为______。
??? Dim a(4) As Integer, b(4) As Integer
??? For K = 0 To 2
??????? a(K + 1) = Val(InputBox(请输入数据))
??????? b(3 - K) = a(K + 1)
??? Next K
??? Print b(K)
【单选题】
在窗体上画1个命令按扭(名称为Command1)和1个文本框(名称为Text1),然后编写如下事件过程:
???? Private Sub Command1_Click()
???? ? x=Val(Text1.Text)
???? ? Select Case x
???????? Case 1,3
????????????? y=x*x
???????? Case Is>=10,Is<=-10
????????????? y=x
???????? Case -10 To 10
????????????? y=-x
?End Select
?????? End Sub
程序运行后,在文本框中输入3,然后单击命令按扭,则以下叙述中正确的是______。
【单选题】
语句Dim a(3 ,-2 to 2,5)声明的数组a包含的元素个数有多少个?
【单选题】
设有如下程序:
Option Base 0
Private Sub Form_Click()
??? Dim a
??? Dim i As Integer
??? a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
??? For i = 0 To 3
??????? Print a(5 - i);
??? Next
End Sub
程序运行后,单击窗体,则在窗体上显示的是?