搜题请搜索小程序“爱下问搜题”
问题 单项选择题

在串联电路中电阻从前到后的阻值由小到大，每个电阻上流过的电流（）

A.相同

B.愈靠前的电阻电流愈大

C.愈靠后的电阻电流愈大

答案

参考答案：A

问答题 简答题

自然伽玛测井的应用？它在地层对比中的优势？(特点对比)
查看答案
单项选择题

在窗体上从左到右有Text1、Text2两个文本框(见图)，要求程序运行时，在Text1中输入一个分数后按回车键，则判断分数的合法性，若分数为0～100中的一个数，则光标移到Text2中；否则光标不动，并弹出对话框显示"分数错"。下面程序中正确的是______。

A) Ptivate Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then '回车符的ASCⅡ码是13
a=Val(Text1)
If a＞=0 Or a＜=100 Then
Text2.SetFocus
Else
Text1.SetFocus:MsgBox("分数错")
End If
End If
End Sub
B) Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then'回车符的ASCⅡ码是13
a=Val(Text1)
If a＞=0 And a＜=100 Then
Text1.SetFocus
Else
Text2.SetFocus:MsgBox("分数错")
End If
End If
End Sub
C) Ptivate Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then'回车符的ASCⅡ码是13
a=Val(Text1)
If a＜0 And a＞100 Then
Text2.SetFocus
Else
Text1.SetFocus：MsgBox("分数错")
End If
End If
End Sub
D) Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then'回车符的ASCⅡ码是13
a=Val(Text1)
If a＞=0 And a＜=100 Then
Text2.SetFocus
Else
Text1.SetFocus:MsgBox("分数错")
End If
End If
End Sub
查看答案