题目内容
（请给出正确答案）
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)， 然后编写如下事件过程： Private Sub Command1 Click() Text1．Text=InputBox("请输入数据1") TextText=InputBox("请输入数据2) End Sub 程序运行后，如果单击命令按钮，将先后显示两个输入对话框，在两个输入对话框中分别输入123和abc，则两个文本框中显示的内容分别为【 】和【 】。
安装简答题APP，拍照搜题省时又省心！
更多“在窗体上画两个文本框（名称分别为Text1和Text2)和一…”相关的问题
Dim Str1 As String，str2 As String
Private Sub form_load()
Text1.Text=""
Text2.Text=""
Text1.Enabled=False
Text2.Enabled=False
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
str1=str1 & Chr(KeyAscii)
End Sub
Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
str2=str2 & Chr(KeyCode)
End Sub
Private SubCommand1_Click()
Text1.Text=str1
Text2.Text=str2
str1=""
str2=""
End Sub
当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为
A．abc
B．不显示任何信息
C．ABC
D．出错
在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text 1和 Text 2 Text 2。编写如下两个事件过程： Dim str As String, strl As String Private Sub form_load() TextText = " " TextText = " " TextEnabled = False TextEnabled = False End Sub Private Sub Form. KeyPress(KeyAscii As Integer) str= str&Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) str1 = strl&Chr(KeyCode) End Sub Private Sub Command1_Click() TextText =str TextText = str1 str= " " str1= " " End Sub 当在设计阶段把窗体KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为 ______ 。
A．abc
B．不显示任何信息
C．ABC
D．出错
编写如下程序：
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$amp;tmp=x Mod y
x=y
y=tmp
Loop
f=x
End Function
运行程序，在Text1文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是（）。
A．4
B．6
C．8
D．12
A．将栈置为空栈
B．删除栈顶元素
C．删除栈底元素
D．判断栈是否为空
A．单元格格式
B．格式刷
C．自动填充
D．格式工具栏
A．文本输入 B．公式输入
C．数值输入 D．日期时间数据输入
A．“World Wide Wait”
B．“World Wide Web”
C．“Website ofWorld Wide”
D．“World Wait Web”
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
微信搜一搜
简答题
微信搜一搜
简答题
如搜索结果不匹配，请 
