高级语言程序设计教程——VisualBasic6.0中文版张露2第14章课件教学.pptVIP

建立多窗体应用程序 多窗体程序设计相关的语句： Load 语句 Unload 语句 Show语句 Hide语句 多窗体的执行与应用 详细举例完成 可调用 程序代码 （form1） Private Sub Command1_Click() Form2.Show Me.Hide End Sub Private Sub Command2_Click() Form3.Show Me.Hide End Sub Private Sub Command3_Click() Form4.Show Me.Hide End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Static i As Integer i = i + 1 If i Mod 10 = 0 Then Print Chr$(KeyCode); ---; Hex$(KeyCode); ; Print: Print ElseIf KeyCode = 13 Then i = 0 Print: Print: Print Else Print Chr$(KeyCode); ---; Hex$(KeyCode); ; End If End Sub 程序代码（form2） Dim paintnow As B