下列程序，当单击窗体时s的值是( )Private Sub Form_Click()Dim s As Integers = Not 2 * 5Print sEnd SubA. TrueB. FalseC.1D.0
题目
下列程序，当单击窗体时s的值是( )
Private Sub Form_Click()
Dim s As Integer
s = Not 2 * 5<>11
Print s
End Sub
A. True
B. False
C.1
D.0
相似考题
参考答案和解析
更多“下列程序,当单击窗体时s的值是( )Private Sub Form_Click()Dim s As Integers = Not 2 * 5 & ”相关问题
-
第1题：
在程序运行时，下面的叙述中正确的是
A．用鼠标右键单击窗体中无控件的部分，会执行窗体的Form. L0ad事件过程
B．用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程
C．只装入而不显示窗体，也会执行窗体的Form. Load事件过程
D．装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程
正确答案：C
解析：当加载窗体时，系统自动触发该窗体的Load事件；当窗体成为一个活动窗口时，触发Activate事件；单击窗体空白处时，会触发窗体Click事件；选项A)触发的是Form_Click事件；选项B)用鼠标左键单击窗体的标题栏，不会触发Form_Click事件过程；选项D)触发的是Form_Activate事件过程。所以正确答案为C)。 -
第2题：
有以下程序:includeusing namespace std;class sample{private: int n;public: samp 有以下程序： #include ＜iostream＞ using namespace std; class sample { private: int n; public: sample(){} sample (int m) { n=m; } sample add(sample s1,sample s2) { this-＞n=s1.n+s2.n; return (*this); } void disp() { cout＜＜"n="＜＜n＜＜end1; } }; int main () { sample s1(10) ,s2(5),s3; s3.add(s1,s2); s3.disp(); return 0; } 程序运行后，输出的结果是( )。
A．n=10
B．n=5
C．n=20
D．n=15
正确答案：D
解析：本题考核this指针的应用。本程序中，sample类的add成员函数中使用了this指针，this指针指向当前对象自身，该成员函数中的语句“this-＞n=s1.n+s2.n；”用于修改当前对象的数据成员n的值，语句“return(*this)；”用于返回当前对象自身，即对当前对象进行了修改。对于主函数调用add()成员函数语句“s3.add(s1，s2)；”。此时，this指针指向的是对象s3，执行该语句前，s3的数据成员n未赋值，执行完该语句后，就修改了s3的私有成员n的值，使其为15。 -
第3题：
运行下列程序：
Private Sub form_Click( )
x = 8: y = 2
Call fun1((x), y)
Print x, y
End Sub
Private Sub fun1(x, y)
s = x
x = s / y
y = s Mod y
End Sub
单击窗体后，则在窗体上显示的结果是( )。
A.4 2
B.8 2
C.8 0
D.2 4
正确答案：C
-
第4题：
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 s=s+a(k) Next k Print s End Sub A.10 B.14 C.15 D.120
正确答案：B
【解析】使用Array函数为数组变量赋值，数组变量不能是具体的数据类型，只能是变体(Variant)类型，使用Array函数给数组变量赋值的3种形式是：①显式定义为Variant变量（例如，Dim数组变量名As Variant）；②在定义时不指明类型（例如，Dim数组变量名）；③不定义而直接使用。 -
第5题：
运行下列程序:Private Sub Command1_Click( )Dim s1 As String * 1Dim s2 As Strings1 = &quo运行下列程序：
Private Sub Command1_Click( )
Dim s1 As String * 1
Dim s2 As String
s1 = "a"
For i = Asc(s1) To Asc(s1) + 4
s2 = s2 & Chr(i)
Next i
Print s2
End Sub
单击Command1命令按钮后，则在窗体上显示的结果是( )。
A.a
B.abcde
C.aaaa
D.s2
正确答案：B