题目内容

在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母e，则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(5，KeyAscii) End Sub

A. eeeee
B. EEEEE
C. eeeeee
D. EEEEEE

查看答案

搜索结果不匹配？点我反馈

更多问题

在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为Save，默认文件名为SaveFile，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是 ______。

A. Private Sub Command Click() CommonDialogFileName＝"SaveFile" CommonDialogFilte＝"All Files|*.*|(*.tx|*.txt|(*.do |*.doc" CommonDialogFilterIndex＝2 CommonDialogDialogTitle＝"Save" CommonDialogAction＝2 End Sub
B. Private Sub Commandl_Click() CommonDialog FileName="SaveFile" CommonDialog Filter= "All Files| *. * | (*. tx[*. txt| *. doc| *. doc" CommonDialog FilterIndex= 1 ComonDialog DialogTitle = "Save" CommonDialog Action= 2 End Sub
C. Private Sub Cmmandl_Click() CommonDialog FileName= "Save" CommonDialog FiLter="All Files | *. * |(*. tx|*. txt|(*. do |*. doc" CommonDialog FilterIndex= 2 CommonDialog DialogTitle = "SaveFile" CommonDialog Action= 2 End Sub
D. Private Sub Commandl_Click() CommonDialog FileName = "SaveFile" CommonDialog Filter= "All Files|*. *|(*. tx|*. txt| (*. do |*. doc" CommonDialog FilterIndex=1 CommonDialog DialogTitle= "Save" CommonDialog Action=1 End Sub

查看答案