登录窗体如图所示,单击"登录"按钮,当用户名正确则弹出窗口显示"OK"信息。 A: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"ThenMsgBox"OK"EndifEndSub B: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"ThenMsgBox"OK"EndSub C: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"ThenMsgBox"OK"EndifEndSub D: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"MsgBox"OK"EndIfEndSub
登录窗体如图所示,单击"登录"按钮,当用户名正确则弹出窗口显示"OK"信息。 A: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"ThenMsgBox"OK"EndifEndSub B: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"ThenMsgBox"OK"EndSub C: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"ThenMsgBox"OK"EndifEndSub D: PrivateSubcmdOK_Click()IftxtUser.Value="zhangs"MsgBox"OK"EndIfEndSub
窗体上有文本框Text1、Text2和命令按钮Command1,编写如下事件过程:PrivateSubCommand1_Click()Ifval(Text1.Text)<=3thenText2.Text=“h”ElseText2.Text=“i”EndIfEndSub当用户在文本框Text1中输入6,并单击Command1,则文本框Text2中显示()。
窗体上有文本框Text1、Text2和命令按钮Command1,编写如下事件过程:PrivateSubCommand1_Click()Ifval(Text1.Text)<=3thenText2.Text=“h”ElseText2.Text=“i”EndIfEndSub当用户在文本框Text1中输入6,并单击Command1,则文本框Text2中显示()。
设窗体上有一个命令按钮Command1和一个文本框Text1,并有以下事件过程:PrivateSubCommand1_Click()Text1.Text=Ucase(Text1.Text)Text1.SetFocusEndSubPrivateSubText1_GotFocus()IfText1.Text<>”Basic”ThenText1.Text=””EndIfEndSub程序执行后在Text1文本框中输入”Basic”,然后单击Command1按钮,则产生的结果是()。
设窗体上有一个命令按钮Command1和一个文本框Text1,并有以下事件过程:PrivateSubCommand1_Click()Text1.Text=Ucase(Text1.Text)Text1.SetFocusEndSubPrivateSubText1_GotFocus()IfText1.Text<>”Basic”ThenText1.Text=””EndIfEndSub程序执行后在Text1文本框中输入”Basic”,然后单击Command1按钮,则产生的结果是()。