更多"【说明】 单击窗体上的“测试”(cmdTest)按钮,出现一个输入框"的相关试题:
[简答题]【说明】
单击窗体上的“测试”(cmdTest)按钮,出现一个输入框,要求输入一串字符,将该字符串中的非字母字符删除后,显示在窗体中的一个文本框(txtShow)中。
【程序代码】
Private Sub cmdTest_Click( )
Dim strT1 ,strT2 As String
Dim strCh As (1)
Dim intL As Integer
Dim intl As Integer
strT1 = (2) ("请输入一串字符","字符串输入")
intL = (3)
strT2 = " "
For intl = I To intL
strCh = Mid ( strT1, intl, 1 )
If(strCh>"A"And (4) ) Or (strCh >"a" And suCh <"z" )Then
strT2 = strT2 + strCh
End If
Next intl
txtShow. Text= (5)
End sub
[填空题]窗体上有退出(cmdexit)按钮和测试按钮(cmdtest)以及一个文本框txt,当单击测试按钮时,弹出一个消息框,消息框中包括“确定”和“取消”按钮,若单击“确定”按钮则在文本框中显示“显示”,若单击“取消”按钮则在文本框中显示“取消”。单击退出按钮关闭窗体。试将程序补充完整。
Private sub cmdtest_click( )
answer=msgbox("显示钮按", vbOkCancel)
If 【13】 then
txt="显示"
Else
txt="取消"
End If
End sub
Private sub cmdexit_click( )
【14】
End sub
[填空题]窗体上有两个按钮:显示(cmdshow)按钮和测试按钮(cmdtest),显示按钮初始状态不可见,当单击测试按钮,弹出一个消息框,包括“确定”和“取消”按钮,若单击“确定”则显示“显示”按钮,若单击“取消”则关闭窗体。试将程序补充完整。
Private sub cmdtest_click( )
answer = msgbox ( "显示按钮", vbOkCancel)
If answer = vbOK then
cmdshow. visible = 【15】
Else
docmd. close
End If
End sub
[填空题]下面程序段的作用:在窗体上一个命令按钮。单击命令按钮后,将程序中字符串 "Welcome Home"中的字符全部大写输出,其后字符"Wel Back"全部小写输出。请填空。
Private Sub Command1_Click( )
a = "Welcome Home";
b = "Wel Back"
c = 【8】 + LCase(b)
Print c
End Sub
[填空题]执行下列程序,输入框中显示的默认字符串为 【7】 。
Private Sub Command1_Click( )
InputBox "Ok" , "输入参数", Format(" &H12" )
End Sub
[填空题]执行下列程序,输入框中显示的默认字符串为 【7】 。
Private Sub Command1_Click( )
InputBox "Ok" , "输入参数", Format(" &H12" )
End Sub
[填空题]执行下列程序,输入框中显示的默认字符串为 【11】 ;
Pirate Sub Command 1_Click( )
InputBox"ok","输入参数",Format("&H12")
End Sub
[填空题]执行下列程序,输入框中显示的默认字符串为 【6】 :
Private Sub Command1_Click( )
InputBox "ok","输入参数",Format("&H12")
End Sub
[填空题]执行下列程序,输入框中显示的默认字符串为上【6】:
Private Sub Command l_Click ( )
Input Box”ok”“输入参数”,Format(”GHl2”’
End Sub
[填空题]执行下列程序,输入框中显示的默认字符串为上【6】:
Private Sub Command l_Click ( )
Input Box”ok”“输入参数”,Format(”GHl2”’
End Sub
[简答题]有n个字符的字符串,判断字符串是否对称。如xyzzyx和xyzyx都是中心对称的字符串。字符串放在单链、表中,并实现利用栈的入栈和出栈完成判断。
[填空题]下面一段程序要实现的功能是:在内存中从地址source开始有一个长度为100的字符串,测试该字符串中是否存在数字,如有则将DL的第五位置1,否则将该位置0。
BEGIN: MOV CX, 100
MOV SI,0
REPEAT: MOV SOURCE [SI]
CMP AL,30H
JB GOON
GMP AL,______
JA GOON
OR DL,20H
JMP EXHT
GOON: INC SI,
LOOP REPFPATI
AND DL,______
EXIT: