当前位置 > vb编程视频vb编程视频教学视频

• 

  VB编程。

  emp\female.txt" For Input As #1中的 For Input As #1是什么意思? 3、seek是什么命令? 4、MaxSize = LOF(1)中的lof(1)是哪里来的,什么意思? 5、程序中几次出现的#1是什么东西? 6、最后的那个eof(1)是什么意思? 提问时间: 20060813 18:28:33 回答:oldt888 学弟 8月13日 1...

  2024-07-24 网络 更多内容 994 ℃ 628
• 

  用vb编程

  Private Sub Command1_Click() Dim a, b a = Val(InputBox("请输入商品薯困价格")) b = Val(InputBox("请输入会员积分饥返")) Select Case b Case 1000 To 1999 a = a * 0.9 Case 2000 To 2999 a = a * 0.85 Case 3000 To 4999 a = a * 0.8 Case 5000 To 8999 a = a * 0.75 Case Is >烂手...

  2024-07-24 网络 更多内容 938 ℃ 244
• 

  vb编程…

  只要在窗体中做二个标签(要改名为Lbl1、Lbl2),二个文本框、一个命令按钮,然后复制以下代码就成了: Private Sub Command1_Click() Text1 = InputBox("请输入身高", "输入") Text2 = InputBox("请输入体重", "输入") End Sub Private Sub Form_Load() Lbl1.Caption = "身高" Lbl2.Caption =...

  2024-07-24 网络 更多内容 485 ℃ 227
• 

  VB编程怎么做?

  第2题:Private Sub Command1_Click()na = InputBox("请输入du姓名zhi")age = InputBox("请输入年龄")ad = InputBox("请输入通讯地dao址")code = InputBox("请输入邮政编内码")num = InputBox("请输入电话容号码")Print "&quo...

  2024-07-24 网络 更多内容 612 ℃ 222
• 

  vb 编程 软件

  Private Sub Text3_KeyPress(KeyAscii As Integer)    Dim x As Double    Dim y As Double    Dim z As Double  &...

  2024-07-24 网络 更多内容 950 ℃ 307
• 

  vb 编程

  应该是缺少了该执行的对象或者事件比如Private Sub Form_Load()form就是对象,load()就是事件所以可以试这关闭代码窗口,重新双击控件

  2024-07-24 网络 更多内容 883 ℃ 689
• 

  VB编程好学吗?

  VB全称 Visual Basic,即初学者通用符号指令代码。VB全称 Visual Basic,即初学者通用符号指令代码。所以,看上去它就是给初学者准备的。VB入门很容易,只要懂一定的语言规则,基本的Basic的语句以及函数,做一些界面设计是很快的。但是慢慢你就会发现在VB框外的东西很难实现,不...

  2024-07-24 网络 更多内容 972 ℃ 645
• 

  vb编程不懂啊

  看上去确实是没赋值。在哪里给time赋的值啊? =======================就觉得不是标准的VB... 原来是Small Basic... 加一句: time = Clock.Time ===========整个程序改成:==============='Dim timeIf(Clock.Hour<12)Then TextWindow.WriteLine(" Good morning&qu...

  2024-07-24 网络 更多内容 364 ℃ 432
• 

  vb程序设计

  Form1代码: Private Sub Command1_Click() If Text1.Text = "" Or Text2.Text = "" Then MsgBox "请输入用户名" Else If Text1.Text = "user" Or Text2.Text = "12345" Then MsgBox "你是合法用户,欢迎使用" ***.Show Else Ms...

  2024-07-24 网络 更多内容 753 ℃ 685
• 

  VB编程写代码

  Private Sub Command1_Click() a = Val(InputBox("请输入单价:", 货物单价)) b = Val(InputBox("请输入数量:", 货物数量)) Label1.Caption = "总价:" & a * b End...

  2024-07-24 网络 更多内容 779 ℃ 799