题目内容
（请给出正确答案）
窗体上放置有一个 TEdit类的控件Edit1，并定义了 Edit1的OnEnter 事件，下面说法正确的是：（）
A.当鼠标在窗体上移动时产生 Edit1OnEnter 事件
B.其他三项都不对
C.当Edit1 获得焦点时产生 Edit10Enter事件
D.当鼠标移动到 Edit1 的上面时产生Edit1OnEnter 事件
答案
C
如果结果不匹配，请 联系老师 获取答案
更多“窗体上放置有一个 TEdit类的控件Edit1，并定义了 E…”相关的问题
.jpg){kind=spacer}
Private Sub Command1_Click() Dim y As String，S As String S=Text1．Text 【 】 TextText=y End Sub Private Sub Rever(S As String,y As String) Dim i As Integer y=" " For i=Len(S) To 1 Step-1 y=y&【 】 Next i End Sub
在Visual Basic工程prjl中包含有两个窗体，窗体form1(主窗体)上有两个命令按钮command1和 command2，一个文本控件text1；窗体dialog是一个对话窗体，窗体包含两个命令按钮OK和Cancel，一个文本控件text1和一个标签控件labe11。 编写程序要求实现的功能为：窗体form. 1上command1的caption属性值为name，程序运行后，当单击 eommand1时，弹出对话窗体dialog，其labe11控件中的提示信息为“please input your name：”，要求用户输入自己的姓名。如果单击OK按钮，保存当前输入的内容并返回form1界面，command1的caption属性值为email。若再次单击command1命令按钮，仍然出现dialog对话窗体，此时dialog的labe11提示用户输入自己的email，当用户输入email后，单击“确定”按钮，保存当前输入的内容并返回form1界面；如果单击Cancel按钮，则输入内容无效并返回form1。 Private Sub Command1_Click() Dialog. Text1. Text = "" Dialog. Show End Sub Private Sub Command2_Click() Text1. Text = "email: "+ Dialog. email +" name: "+ Dialog. fname End Sub Private Sub Form_ Load() Command1. Caption = "name" 【 】. Caption = "please input your name: Dialog. i = 0 End Sub Option Explicit Public i As Integer Public email As String Public fname As String Private Sub CancelButton_Click() i=0 email = "" fname = "" Forml. Command1. Capt ion = "name" Dialog. Hide Form1. Show End Sub Private Sub OKButton_ Click() 【 】 Select Case i Case 1: email = Text1. Text Labe11. Caption = "please input your email:" 【 】. Caption = "email" Case 2: fname = Text1. Text 【 】. Caption = "name" i=0 End Select Dialog. Hide Form1. Show End Sub
