【单选题】在窗体中有一个文本框Te,编写事件代码如下: Private Sub Form. Cl ick() ’ X=val(Inputbox(“输入X的值”)) Y=1 If X$amp Te.Value=Y End Sub 打开窗体运行后,在输入框中输入整数12,文本框Te中输出的结果是
【单选题】关于增生型结核性胸膜炎的叙述,下列哪项是正确的?
【单选题】如下程序: Private Sub Form_Click() a=20:b=20:c=120:d=120 Form1.Line(a,b)-(c,b),,BF End Sub 单击窗体后,窗体上显示的是( )。
【单选题】下面程序: Private Sub Form. _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为_____...
【单选题】关于增生性结核性胸膜炎的叙述,下列哪项是正确的?( )
【单选题】执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Click() Print 'Click' End Sub Private Sub Form_mouseDown(Button As Integer,Shift As Integer, X As Single, Y As Single) Print 'Donw' End Sub Private Sub Form_Mouse...
【简答题】设有如下程序: Prirate Sub Form_Click() Dim a As Integer,b AS Integer a=20:b=50 p1 a,b p2 a,b p3 a,b Print'a=';a,'b=';b End Sub Sub p1(x As Integeh By Val y As Integer) x=x+10 y=y+20 End Sub Sub p2(ByVal x A...