vb编程代码最简单的
@言振4511：求比较简单的VB程序 -
公虎18837926936…… Private Sub Form_Load() TextY.Text = Year(Date) TextM.Text = Month(Date) TextD.Text = Day(Date) LabelW.Caption = Mid(＂日一二三四五六＂, Weekday(Date), 1) End Sub Private Sub Command1_Click() Dim myYear, myMonth, myDay...
@言振4511：vb的最简单代码 -
公虎18837926936…… 插入三个文本框a1、a2、a3来接收输入的三个数,插入一个按钮a4来执行操作,最后用三个文本框来显示结果.Private Sub a4_Click()Dim v1, v2, v3, t As Singlev1 = a1.Valuev2 = a2.Valuev3 = a3.Value...
@言振4511：告诉我一些简单的vb编程代码 -
公虎18837926936…… uEnd是用户定义捕捉VB输出框(MsgBox)按下按钮事件一个变量.即你的原代码 MsgBox ＂您确定要离开吗?＂, vbYesNo + vbQuestion, ＂离开程序＂执行按vbYes或vbNo按钮的结果...
@言振4511：急急急 !VB很简单的编程?
公虎18837926936…… 这里用了一个计时器,约10秒更新一次,代码如下: Option Explicit Private Sub Form_Load() Text1 = ＂＂: Text2 = ＂＂: Text3 = ＂＂ Text4 = ＂＂: Text5 = ＂＂: Text6 = ...
@言振4511：简单的VB编程 -
公虎18837926936…… Private Sub Command1_Click()'首先输入购买商品的数量和单价,按以下优惠条件计算实际付款额.'条件如下: 应付款'500Dim sPname As Integer Dim sValue As Integer Dim s As String Dim lResult As Long Dim lValue As Long Do sPname ...
@言振4511：谁会做最简单的VB程序啊? -
公虎18837926936…… private sub command1_click() label1.caption=＂Hello!＂end sub学过VB 的都知道 这个是个最经典最简单的VB程序啊
@言振4511：求一个简单的VB编码. -
公虎18837926936…… 要什么功能呢 比如一下代码可以判断三角形的形状 VERSION 5.00 Begin VB.Form Form1 Caption = ＂Form1＂ ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = ＂Form1＂ ScaleHeight = 3090 ScaleWidth = ...
@言振4511：超级简单的VB编程
公虎18837926936…… Private Sub Form_Load() Show Dim a As Single, b As Single, c As Single a = Val(InputBox(＂输入三角形三边的长＂)) b = Val(InputBox(＂输入三角形三边的长＂)) c = Val(InputBox(＂输入三角形三边的长＂)) If a + b > c And a + c > b And b + c > a Then MsgBox ＂能构成三角形＂ Print ＂周长是:＂ & a + b + c Else MsgBox ＂不能构成三角形＂ End If End Sub
@言振4511：一个简单的VB程序代码 -
公虎18837926936…… Public Class Form1 Dim i As Integer = 0 '定义按钮被按次数 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If i = 0 Then Me.Label1.Text = 10 i = i + 1 Else Me.Label1.Text = getrnd()...
@言振4511：非常简单的VB题 代码咋 写? -
公虎18837926936…… 试试我的代码:在窗体上放上两个按钮控件,名字分别为Commend1和Commend2,代码如下:Private Sub Command1_Click() Print ＂学习IT很重要＂End SubPrivate Sub Command2_Clic...
公虎18837926936…… Private Sub Form_Load() TextY.Text = Year(Date) TextM.Text = Month(Date) TextD.Text = Day(Date) LabelW.Caption = Mid(＂日一二三四五六＂, Weekday(Date), 1) End Sub Private Sub Command1_Click() Dim myYear, myMonth, myDay...
@言振4511：vb的最简单代码 -
公虎18837926936…… 插入三个文本框a1、a2、a3来接收输入的三个数,插入一个按钮a4来执行操作,最后用三个文本框来显示结果.Private Sub a4_Click()Dim v1, v2, v3, t As Singlev1 = a1.Valuev2 = a2.Valuev3 = a3.Value...
@言振4511：告诉我一些简单的vb编程代码 -
公虎18837926936…… uEnd是用户定义捕捉VB输出框(MsgBox)按下按钮事件一个变量.即你的原代码 MsgBox ＂您确定要离开吗?＂, vbYesNo + vbQuestion, ＂离开程序＂执行按vbYes或vbNo按钮的结果...
@言振4511：急急急 !VB很简单的编程?
公虎18837926936…… 这里用了一个计时器,约10秒更新一次,代码如下: Option Explicit Private Sub Form_Load() Text1 = ＂＂: Text2 = ＂＂: Text3 = ＂＂ Text4 = ＂＂: Text5 = ＂＂: Text6 = ...
@言振4511：简单的VB编程 -
公虎18837926936…… Private Sub Command1_Click()'首先输入购买商品的数量和单价,按以下优惠条件计算实际付款额.'条件如下: 应付款'500Dim sPname As Integer Dim sValue As Integer Dim s As String Dim lResult As Long Dim lValue As Long Do sPname ...
@言振4511：谁会做最简单的VB程序啊? -
公虎18837926936…… private sub command1_click() label1.caption=＂Hello!＂end sub学过VB 的都知道 这个是个最经典最简单的VB程序啊
@言振4511：求一个简单的VB编码. -
公虎18837926936…… 要什么功能呢 比如一下代码可以判断三角形的形状 VERSION 5.00 Begin VB.Form Form1 Caption = ＂Form1＂ ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = ＂Form1＂ ScaleHeight = 3090 ScaleWidth = ...
@言振4511：超级简单的VB编程
公虎18837926936…… Private Sub Form_Load() Show Dim a As Single, b As Single, c As Single a = Val(InputBox(＂输入三角形三边的长＂)) b = Val(InputBox(＂输入三角形三边的长＂)) c = Val(InputBox(＂输入三角形三边的长＂)) If a + b > c And a + c > b And b + c > a Then MsgBox ＂能构成三角形＂ Print ＂周长是:＂ & a + b + c Else MsgBox ＂不能构成三角形＂ End If End Sub
@言振4511：一个简单的VB程序代码 -
公虎18837926936…… Public Class Form1 Dim i As Integer = 0 '定义按钮被按次数 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If i = 0 Then Me.Label1.Text = 10 i = i + 1 Else Me.Label1.Text = getrnd()...
@言振4511：非常简单的VB题 代码咋 写? -
公虎18837926936…… 试试我的代码:在窗体上放上两个按钮控件,名字分别为Commend1和Commend2,代码如下:Private Sub Command1_Click() Print ＂学习IT很重要＂End SubPrivate Sub Command2_Clic...
