在窗体上画两个文本框 其名称分别为Text1和Text2 然后编写如下事件过程: Private S
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程: Private Sub Form_Load() Show Text1.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后,如果在Text2文本框中输入“efghi”,则Text1文本框中的内容为【 】。
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:ABCDE
当用户在Text2中输入字符的时候,会触发Text2_KeyDown事件。该事件的处理代码使得Text1的内容为在原内容的基础上追加一个字符。追加的字符的ASCII值比输入的小4。所以当输入efghi的时候,输出为ABCDE。注意不是abcde,因为KeyCode取的是键码,而不是ASCII码,小写字符的键码等于对应大写字符的ASCII码。
相似问题
一个模块直接调用的其他模块个数称为______。请帮忙给出正确答案和分析 谢谢!
一个模块直接调用的其他模块个数称为______。请帮忙给出正确答案和分析,谢谢!
在窗体上画一个名为Command1的命令按钮。下列程序的功能是:从输入对话框输入一个正整数n。用随机
在窗体上画一个名为Command1的命令按钮。下列程序的功能是:从输入对话框输入一个正整数n。用随机函数产生n个1~100范围的随机数,然后求出去掉一个最大
在窗体上画一个命令按钮 然后编写如下程序: Function fun(ByVal num As Lo
在窗体上画一个命令按钮,然后编写如下程序: Function fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k
在窗体上画一个命令按钮 其名称为Command1 然后编写如下程序: Function M(x As
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Function M(x As Integer, y As Integer) M=IIf(x>y, x, y) End Function
Visual Basic中的控件分为3类 它们是标准控件 【 】和可插入对象。请帮忙给出正确答案和分
Visual Basic中的控件分为3类,它们是标准控件、【 】和可插入对象。请帮忙给出正确答案和分析,谢谢!
