www.ndwl.net > VB题 求答案 急

VB题 求答案 急

D B A D D A D D B A C D C C

创建两个窗口,在窗口1上添加Listbox .Text与Label控件,然后“工具/菜单编辑器”创建菜单。窗口2上添加两个按钮,分别命名为Btn_draw和Btn_comback。完成后输入如下代码: 窗口1代码: Option Explicit Private Sub Menu11_Click() '产生 Dim Int...

你把问题发到shifu.la 这个程序员网站,那边有专门的程序员值班免费回答VB编程问题

Private Sub Form_Click()Label1.Visible = TrueEnd SubPrivate Sub Form_Load()Me.Caption = "标签"End Sub

8、输入一个数X,如果X>=0,则Y=1-2*X,否则的话Y=1+X 9、循环,直到i大于7,每次循环i增加3,X增加5 10、RND函数是返回一个0—1之间的随机数,所以取整后X为4(只取整数部分),输出结果必为GOOD 11、循环,每一次循环X=(X+3)*(X+4),N为循环次...

你这小子,是不是在搞自修啊, 我看到你在网上放了无数个类似的题目啦, 这么简单的问题,自己不动脑筋,光求个答案敷衍教师了事啊 建议大家都不要为这点小分误了程序员这个行当

Private Sub Form_dblClick() Dim sum As Long sum = 1For i = 1 To 100 sum = sum + 5 * i Next YZJ (sum)End SubPrivate Sub YZJ(i As Integer) Dim OUT As Integer OUT = FreeFile Open App.Path & "\27.out" For Output As #OUT Print #OUT,...

Private Sub Command1_Click() '调用实例 Dim str As String MsgBox return_str(5) End Sub Private Function return_str(number As Integer) As String '通用函数 Dim str As String For i = 1 To number Dim str_temp As String str_temp = ""...

1.打开属性窗口的热键是( d ) A、F1 B、F2 C、F3 D、F4 2.在VB6.0的集成开发环境有几种工作状态( c ) A、1种 B、2种 C、3种 D、4种 3.下面四个选项,不是窗体属性的是(d ) A、MinButton B、MaxButton C、Caption D、Load 4.用来设置窗体背...

Private Sub HScrollBar1_Scroll(sender As Object, e As ScrollEventArgs) Handles HScrollBar1.Scroll Label1.Text = Str(HScrollBar1.Value) + " 号字" Label1.Font = New System.Drawing.Font(Label1.Font.Name, HScrollBar1.Value) End Sub

网站地图

All rights reserved Powered by www.ndwl.net

copyright ©right 2010-2021。
www.ndwl.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com