某药的t1/2是6小时,如果按0.5g,每天三次给药,达到血浆坪值的时间是()
第1题:
运行以下程序后,输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function
:A. sub:2 6 4 main:1 2 3
B. sub:2 6 4 main:2 2 3
C. sub:2 6 4 main:2 6 4
D. sub:2 6 4 main:1 6 4
第2题:
有如下SUB过程:
Sub s(x As Single,y As Single)
t =x
x=t / y
Y=t Mod y
End Sub
在窗体上添加一个命令按纽,然后编写如下事件过程:
Private Sub Form_ Click()
Dim a As Single
Dim b As Single
a=5
b=4
s a,b
Print a,b
End Sub
则程序运行后,单击命令按纽,输出的结果为:【 】。
第3题:
左乳房内上象限扪及3cm×3cm肿块,质地偏硬,边界不太清楚,与皮肤胸肌无粘连;左腋下可扪及肿大淋巴结3个,质韧,约蚕豆大小,活动良好,病理证实乳房腺癌淋巴结转移,按TNM分期应为:
A.T 1 N1 M0
B.T 1 N 2 M 0
C.T 1 2 N 1 M\sub 0
D.T 1 2 N 2 M\sub 0
E.T 13 N 1 M\sub 0
第4题:
有如下程序: Private Sub Commandl_Click() Dim a As Single Dim b As Single a=2:b=4 Call CS(a,b)End Sub Sub CS(x As Single,y As Single) t=X x=t\y y=t Mod y End Sub 程序运行后,单击命令按钮,a和b的值分别为
A.0 0
B.1 1
C.0 2
D.1 2
第5题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub:2 6 4 Main:2 6 4
B.Sub:2 6 4 Main:2 6 4
C.Sub:2 6 4 Main:1 2 3
D.Sub:2 6 4 Main:2 2 3
第6题:
如下图所示的两个窗体:
要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体,第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中,对这两个命令按钮编写的事件过程正确的是
A.Private Sub Command1 Click() Form2.Show 1 End Sub Private Sub Command2_Click()End End Sub
B.Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End Sub
C.Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End Sub
D.Private Sub Command1_Click()Show 1, Form2 End SubPrivate Sub Command2_Click() End End Sub
第7题:
若有如下程序: int sub(int m) { if(m==1||m==0) return 2; else return(sub(m-1)*sub(m-2));} main() { int n; scanf("%d",&n); printf("%d",sub(n)); } 如果从键盘输入4<回车>,则程序运行后的输出结果是( )。
A.8
B.16
C.24
D.32
第8题:
(12)有下列Sub过程: Sub Sub(x As Single,y As Single) t=x x=t/y y=t Mody End Sub 在窗体上的命令按钮Commandl中,编写下列事件过程,执行该事件过程调用Sun过程,结果是( )。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a;b End Sub A.1.25 1 B.5 4 C.4 5 D.1 1.25
第9题:
有如下程序: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single,y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后,a和b的值分别为
A.0 0
B. 1 1
C.2 2
D.1 2
第10题:
执行下面程序,第一行输出结果是【 】,第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A) End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x<10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub