[单项选择]下列程序执行后，在Ctrl和Alt这两个键都被按下的同时，再在文本框中输入"a"，输出结果为________。
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
　　If Shift ＞ 0 And KeyCode ＞= Asc("A")Then
　　　　Print KeyCode + Shift
　　End If
End Sub
A. 65
B. 71
C. 0
D. 出错

更多"下列程序执行后，在Ctrl和Alt这两个键都被按下的同时，再在文本框中"的相关试题:

[单项选择]窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入12345，单击命令按钮后的输出结果为( )。
Private Sub Command1_Click（　）
Dim A As Integer,B As Integer
Text1.SelStart=2
Text1.SelLength=2
A=Val(Text1.SelText)
B=Len(Text1.Text)
Print A*B
End Sub
A. 68
B. 115
C. 170
D. 1170

查看答案

[单项选择]在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。
For i=1 To 4
For j=1 To 3
x=3
For k=1 To 2
x=x+3
Next k
Next j
Next i
Text1.Text=Str(x)
A. 3
B. 6
C. 9
D. 12

查看答案

[单项选择]在窗体上添加一个命令按钮，名为Command1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出( )。

For i=1 To 4

For j=1 To 3

x=3

For k=1 To 2

K=x+3

Next k

Next j

Next i

Text1.Text=Str(x)
A. 3
B. 6
C. 9
D. 12

查看答案

[简答题]以下程序的界面有一个按钮button、一个文本区textA和一个文本框textF。程序运行时，在文本区中输人数字序列，单击按钮，则在文本框中显示数字序列的和。以下是要求你编写的actionPerformed(ActionEvent e)方法的部分代码。
public void actionPerformed(ActionEvent e)
if(e.getSource（　）==button)
String s=textA．getText（　）；double sum=0；
StringTokenizer fenxi=new StringTokenizer(s，"，/n")；
//请在以下位置编写代码

查看答案

[填空题]在窗体上画两个文本框，名字分别为Text1和Text2，然后编写下列程序。程序运行后，如果在文本框 Text2中输入lmn，那么在文本框Text1中显示的内容将是【8】。
Private Sub Form_Load（　）
Show
Text1.Text=" "
Text2.Text=" "
Text2.SetFocus
End Sub
Private Sub Text2_KeyPress(KeyAseii As Integer)
Text1.Text=Text1.Text+Chr(KeyAscii-5)
End Sub

查看答案

[填空题]文本框分为横排文本框和______文本框两种。

查看答案

[填空题]有一个VBA计算程序的功能如下，该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为：Text1、Text2、Text3和Text4。3个按钮分别为：清除（名为 Command1）、计算（名为Command2）和退出（名为Command3）。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2 和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中；单击退出按钮则退出。请将下列程序填空补充完整。 Private Sub Command1_Click（　） Me!Text1="" Me!Text2="" Me!Text3="" Me!Text4="" End Sub Private Sub Command2_Click（　） If Me!Text1="" Or Me!Text2="" Or Me!Text3="" then MsgBox "成绩输入不全" Else Me!Text4=(__________ +Val(Me!Text2)+Val(Me!Text3))/3__________ End Sub Private Sub Command3_Click（　） Docmd. __________ End Sub

查看答案

[填空题]有一个VBA计算程序的功能如下：该程序用户界面由4个文本框和3个按钮组成，4个文本框的名称分别为Text1、Text2、Text3和Text4，3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中；单击退出按钮则退出。请将下列程序填空补充完整。
Private Sub Command1_Click( )
Me!Text1=""
Me!Text2=""
Me!Text3=""
Me!Text4=""
End Sub
Private Sub Command2_Click( )
If Me!Text1=""Or Me! Text2=""Or Me! Text3=""Then
MsgBox“成绩输入不全”
Else
Me!Text4=( [13] +Val(Me!Text2) +Val(Me!Text3) ) /3
[14]
End Sub
Private Sub Command3_Click( )
DocmD [15]
End Sub

查看答案

[填空题]有一个VBA计算程序的功能如下，该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为：Text1、Text2、Text3和Text4。3个按钮分别为：“清除”(名为Command1)、“计算”(名为Command2)和“退出”(名为Command3)。窗体打开运行后，单击“清除”按钮，则清除所有文本框中显示的内容；单击“计算”按钮，则计算在Text1、Text2和Text3 3个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中；单击“退出”按钮则退出。请将下列程序填空补充完整。
Private Sub Command1 Click（　）
Me!Text1=" "
Me!Text2=" "
Me!Text3=" "
Me!Text4=" "
End Sub
Private Sub Command2_Click（　）
If Me!Text1=…" "Or Me!Text2=" "Or Me!Text3=" "Then
MsgBox"成绩输入不全"
Else
Me!Text4=( (13) +Val(Me!Text2)+Val(Me!Text3))/3
(14)
End Sub
Private Sub Command3_Click（　）
Docmd. (15)
End Sub

查看答案

我来回答:

提交