网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
判断题
VB中x=Val(text1.text)是把text1.text的值转换成数值,并赋值给x。
A
对
B
错
参考答案
参考解析
解析:
暂无解析
更多 “判断题VB中x=Val(text1.text)是把text1.text的值转换成数值,并赋值给x。A 对B 错” 相关考题
考题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1),外观如图所示。编写如下程序:Private Sub Form_Load()Text1.Text=""Text2.Text=""Text3.Text=""End SubPrivate Sub Command1_Click()x=Val(Text1.Text)y=Val(Text2.Text)Text3.Text=f(x,y)End SubFunction f(ByVal x As Integer,ByVal y As Integer)Do While y0tmp=x Mod yx=yy=tmpLoopf=xEnd Function运行程序,在Text1文本框中输入36,在Text2文本框中输入24,然后单击命令按钮,则在Text3文本框中显示的内容是( )。A.4B.6C.8D.12
考题
有下面一个程序段,从文本框中输入数据,如果该数据满足条件,除以4余1,除以5余2,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。Private Sub Command1_Click()x=Val(Text1.Text)If 【6】 ThenPrint xElseText1.Text=""【7】End IfEnd Sub
考题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1),外观如图所示。编写如下程序 Private Sub Form. Load() Text1.Text=" " Text2.Text=" " Text3.Text=" " End Sub Private Sub Command1 Click() x=Val(Text1.Text) y=Val(Text2.Text) Text3.Text=f(x,y) End Sub Function f(ByVal x As Integer,ByVal y As Integer) Do While y<>0 tmp=x Mod y x=y y=tmp Loop f=x EndFunction 运行程序,在Text1文本框中输入36,在Text2文本框中输入24,然后单击命令按钮,则在Text3文本框中显示的内容是______。A.4B.6C.8D.12
考题
执行x=InputBox(”请输入x的值”)时,在弹出的对话框中输入l2,在列表框Listl选中第一个列表项,假设该列表项的内容为34,使Y的值是1234的语句是( )。A)y--Val(x) Val((Listl.List(0)B)y=Val(x) Val(Listl.List(1))C)y=Val(x)Val(Listl.List(O))D)y=Val(x)Val(Listl.List(1))
考题
有下面一个程序段,从文本框中输人数据,如果该数据满足条件“除以4余1,除以5余 2”,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。Private Sub Commandl_Click()x=Val(Text1.Text)If [9] ThenPrintXElseText1.Text=""[10]End IfEnd Sub
考题
(7)下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 Private Sub Command1_Click() x=Val(Text1.Text) IfThen Print x Else ________ Text1.Text="" End If End Sub
考题
3在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1),然后编写如下事件过程: Private Sub Commandl_Click() x=Val(Text1.Text) SelectCaseX Case 1,3 y=X*X CaseIS>=10,IS<=-10 y=X Case-10 To 10 y=-X End Select End SA.执行y=x*xB.执行y=-xC.先执行y=x*x,再执行y=-xD.程序出错
考题
下列程序执行后,变量S的值为 Dim s As Long,x As Integer s=0 For x=1 To 10 Step 2 s=s+x Next x Text1.Text=sA.10B.25C.50D.100
考题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1),外观如下图所示。编写如下程序: Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y=Val(Text2.TextA.4B.6C.8D.12
考题
( 24 ) 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 , 有一个由 3 个单选按钮构成的控件数组 Option1 ,如图 2 所示 。 程序运行后 , 如果单击某个单选按钮 , 则执行 Text1 中的数值与该单选按钮所对应的运算(乘以 1 、 10 或 100 ),并将结果显示在 Text2 中,如图 3 所示。为了实现以上功能,在程序中的问号( ? )处应填入的内容是( )。Private Sub Option1_Click(Index As Integer)If Text1.Text “ “ ThenSelect Case ?Case 0Text2.Text=Val(Text1.Text)Case 1Text2.Text=Val(Text1.Text)*10Case 2Text2.Text=Val(Text1.Text)*100End SelectEnd IfEnd SubA ) IndexB ) Option1.IndexC ) Option1(Index)D ) Option1(Index).Value
考题
从键盘的输入中,读入一个值并赋值给x的语句是 ______ 。A.cin>>xB.cin>xD.cout
从键盘的输入中,读入一个值并赋值给x的语句是 ______ 。A.cin>>xB.cin<<xC.cout>>xD.cout<<x
考题
要从文本框Text1中输出文字“欢迎进入代码的世界!”,正确的代码是()。A、Textbox.text="欢迎进入代码的世界!"B、Text1.text="欢迎进入代码的世界!"C、Text1.Label="欢迎进入代码的世界!"D、Val(Text1.text)="欢迎进入代码的世界!"
考题
下列关于VB中函数功能的说法,错误的是()。A、Val函数是将字符串中的数字转换成数值B、Abs函数是求绝对值C、Str函数是将数值数据转换成字符串D、Int函数是求小于参数的最大整数
考题
要在文本框Text1中显示“欢迎使用VB”,以下()语句是正确的。A、Text1.text=欢迎使用VBB、Text1=”欢迎使用VB”C、Text1.text=’欢迎使用VB’D、Text1.caption=”欢迎使用VB”
考题
单选题变量S为字符型,若在文本框Text1、Text2中分别输入数字23和35,再执行以下语句,S的值为“58”的是()A
S=Text1.TextText2.TextB
S=Text1.Text+Text2.TextC
S=Val(Text1.Text)+Text2.TextD
S=Val(Text1.Text)Text2.Text
考题
单选题下列句子中,()不是赋值语句A
A=”123”+”456”B
Label1.Captin=”你好!”C
r=Val(Text1.Text)D
x+1=y
热门标签
最新试卷