举一反三
- 设窗体上有一个Picture1图片框，要求在图片框中的指定位置(坐标为(500，300))输出"OK"，下面可以实现这一功能的事件过程是 A: Private Sub Form_Click() Picture1．CurrentX=500 Picture1．CurrentY=300 Picture1．Pnnt"OK" End Sub B: Private Sub Form_Click() Picture1．Left=500 Picture1．Top=300 Picture1．Print"OK" End Sub C: Private Sub Form_Click() Picture1．CurrentX=500 Picture1．CurrentY=300 Print"OK" End Sub D: Private Sub Form_Click() Pieture1．kft=500 Picture1．Top=300 Print"OK" End Sub
- 设窗体上有一个Picture1图片框，要求在图片框中的指定位置（坐标为（500，300））输出"OK"，下面可以实现这一功能的事件过程是 A: Private Sub Form_Click() Picture1.CurrentX = 500 Picture1.CurrentY = 300 Picture1.Print "OK" End Sub B: Private Sub Form_Click() Picture1.Left = 500 Picture1.Top = 300 Picture1.Print "OK" End Sub C: Private Sub Form_Click() Picture1.CurrentX = 500 Picture1.CurrentY = 300 Print "OK" End Sub D: Private Sub Form_Click() Picture1.Left = 500 Picture1.Top = 300 Print "OK" End Sub
- 设窗体上有一个Picture1图片框，要求在图片框中的指定位置(坐标为(500，300))输出“OK”，下面可以实现这一功能的事件过程是 A: Private Sub Form_Click() Picture1．CurrentX=500 Picture1．CurrentY=300 Picture1．Print"OK" End Sub B: Private Sub Form_Click() Picturel．Left=500 Picture1．Top=300 Picture1．Print"OK" End Sub C: Private Sub Form_Click() Picture1．CurrentX=500 Picture1．CurrentY=300 Print"OK" End Sub D: Private Sub Form_Click() Picture1．Left=500 Picture1．Top=300 Print"OK" End Sub
- 设窗体上有一个Picturel图片框，要求在图片框中的指定位置(坐标为(500，300))输出“OK”，下面可以实现这一功能的事件过程是 A: Private Sub Form_Click() Picture 1．CurrentX=500 Picture 1．CurrentY=300 Picture 1．Print"OK" End Sub B: Private Sub Form_Click() Picturel．Left=500 Picturel．Top=300 Picture 1．Print"OK" End Sub C: Private Sub Form_Click() Picture 1．CurrentX=500 Picture 1．CurrentY=300 Print"OK" End Sub D: Private Sub Form_Click() Picturel．Left=500 Picturel．Top=300 Print"OK" End Sub
- 设窗体上有一个Pictum1图片框，要求在图片框中的指定位置(坐标为(500，300))输出“OK”，下面可以实现这一功能的事件过程是( )。 A: Private Sub Form_Click() Picture1．CurrentX=500 Pieture1．CurrentY=300 Pieture1．Print"OK" End Sub B: Private Sub Form_Click() Picture1．Left=500 Pieture1．Top=300 Picture1．Print"OK" End Sub C: Privale Sub Form_Chck() Picture1．CurrntX=500 Picture1．CurrentY=300 Print"OK" End Sub D: Private Sub Form_Click() Pictum1．Left=500 Picture1．Top=300 Print"OK" End Sub
内容
- 0
在以下事件过程中，Private表示。Private Sub txtName_Change()……End Sub
- 1
设有下面程序 Sub inc(a As Integer) Static x As Integer x = x + a Print x; End Sub Private Sub Form_Click() inc 2 inc 3 inc 4 End Sub 程序运行后，单击命令按钮 Command1 ，则输出的结果是________
- 2
当双击窗体Form1时，要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程，正确的是 A: Private Sub Form _ Db1Click( )Forml．HideForm2．Show 0End Sub B: Private Sub Form _ Db1Click( )Form１．HideForm 2．Show 1End Sub C: Private Sub Form _ Click( )Form l．HideForm 2．ShowEnd Sub D: Private Sub Form _ Dbl Click( )Form l．Enabled=FalseForm 2．Enabled=TrueEnd Sub
- 3
在窗体中添加一个通用对话框Commondialog1和一个命令按钮Command1，当单击按钮时，打开颜色对话框，能实现此功能的程序段是 A: Private Sub Command1＿Click( ) Commondialog1.ShowOpen End Sub B: Private Sub Command1_Click( ) Commondialog1.ShowColor End Sub C: Private Sub Command1_Click( ) Commondialog1.ShowOpen Commondialog1.ShowFont End Sub D: Private Sub Command1_Click( ) Commondialog1.ShowColor Commondialog1.ShowHelp End Sub
- 4
以下事件过程可以将打开的对话框的标题改为“宇宙大爆炸”的是 A: Private Sub Command2_Click( ) CommonDialog1．DialogTitle=“宇宙大爆炸” CommonDialog1．ShowOpen End Sub B: Private Sub Command2_Click( ) CommonDialog1．DialoTitle=“宇宙大爆炸” CommonDialog1．ShowFont End Sub C: Private Sub Command2_Click( ) CommonDialog1．DilogTitle=“宇宙大爆炸” CommonDialog1．Show End Sub D: Private Sub Command2_Click( ) CommonDialog1．DialogTitle=“宇宙大爆炸” CommonDialog1．ShowColor End Sub