大学生课程考试系统VB答案

时间:2013-07-18 04:50:24
【文件属性】:

文件名称:大学生课程考试系统VB答案

文件大小:925KB

文件格式:DOC

更新时间:2013-07-18 04:50:24

大学生课程考试 VB 选择题 填空题 答案

大学生课程考试系统 无忧考试系统 vb 选择题 填空题 在窗体上画一个命令按钮和一个文本框,并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Command1_Click() Text1.Text = UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub 程序运行后,在键盘上输入“abcdefg”,单击命令按钮,则文本框中显示的内容为____


网友评论