VB 题目,求答案,急!!!! (题目在问题补充中)
VB 题目,求答案,急!!!! (题目在问题补充中)
日期:2011-05-25 15:21:44 人气:1
创建两个窗口,在窗口1上添加Listbox .Text与Label控件,然后“工具/菜单编辑器”创建菜单。窗口2上添加两个按钮,分别命名为Btn_draw和Btn_comback。完成后输入如下代码:
窗口1代码:
Option Explicit
Private Sub Menu11_Click() '产生
Dim Int_Numeric As Integer
Dim Int_Number As Integer
List1.Clear
For Int_