锐客网

  1. 首页 > 生活百科 > >

vb小程序制作简单，vb 编写一个简单程序

经验分享生活百科

1，vb 编写一个简单程序MN是什么东啊问题很严重，你又说X是算出来了 。哪为什么N是A和X算出来的，X都没算出来怎么能拿来做运算？楼主你还是好好把你的算法列出来吧X 是一个 整数吗？你的M,N是什么东东？ 。。
2，制作最简单VB程序Private Sub Command1_Click()Print "哈哈，VB，我来征服你啦，我是初X（X）班的XXX！"End Sub这是代码，剩下的标题栏是把form的caption改为“自己的学号+姓名”，command1的caption 属性也改为“按我” ， 这就好了 ， 哈哈，简单的vb编程【vb小程序制作简单，vb 编写一个简单程序】
3 ， 用VB编个简单的程序Private Sub Command1_Click()Dim a(3) As DoubleFor i = 0 To 2a(i) = InputBox("请输入第" & i & "个数字：")Next iFor i = 2 To 0 Step -1For j = 0 To i - 1If a(j) < a(j + 1) Then temp = a(j): a(j) = a(j + 1): a(j + 1) = tempNext jNext iFor i = 0 To 2Print a(i)Next iEnd Sub这要用问吗?先读出文件(用MSscriptingruntime组件)然后显示出文件(随便用什么显示都行,有兴趣也可以用msgbox)靠,这算什么问题啊!!一、首先你要有一部电脑二、电脑需要安装操作系统三、必须有一个vb编辑器软件，比如说vb4.0、vb5.0或者vb6.0四、你必须会用电脑五、还要会用已经安装的编译软件六、学习该编译软件需要的必要知识，比如，语法规则、变量、常量，过程、函数以及属性、方法等各种术语及其用法 。七、尝试着做些小程序，掌握vb的运行机理ok?Private Sub Form_Click()Me.ClsDim a(1 To 3)For i = 1 To 3a(i) = InputBox("输入第" & i & "个数")NextPrint "你输入的3个数为："For i = 1 To 3Print a(i) & " ";NextPrintFor i = 3 To 2 Step -1 For j = 1 To i - 1 If a(j) > a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t Next j, iPrint "从小到大："For j = 1 To 3Print a(j) & " ";NextEnd Sub
4，用VB做一个简单的小程序123456789101112Private Sub Command1_Click() Me.Cls Dim N As Integer, i As Integer N = InputBox("n=", , 9) For i = 1 To 2 * N - 1 If i <= N Then Print Space(N - i) + String(2 * i - 1, CStr(i)) Else Print Space(N - (2 * N - i)) + String(2 * (2 * N - i) - 1, CStr(2 * N - i)) End If Next iEnd Sub

    推荐阅读


    上一篇：夏秋交替时节吃什么东西对身体比较好

    下一篇：初学者怎样看懂python代码，如何看懂python 源代码