- 博客(5)
- 资源 (1)
- 收藏
- 关注
RSS订阅转载 vb循环 Do While…Loop 语句/Do Until…Loop语句
实验内容1\掌握使用Do While…Loop /Do Until…Loop语句进行循环控制2\从页面输入一个值n，计算1+2+3+4+。。。+n的和（分别用Do While…Loop /Do Until…Loop语句做一遍）3\从页面输入一个值n，计算n!的值（分别用Do While…Loop /Do Until…Loop语句做一遍）编写实验报告。代码Do While…Loop 版本...
2019-12-26 22:29:59
3752
转载 vb运行时弹出对话框或者提示上的标题
VB对话框的显示按钮的问题：msgbox(“请选择一个按钮”,322，“按钮实验”)其中数字322就是表示按钮类型和显示在对话框中的图形，下面总结如下：1、按钮的类型与对应值：显示"确定"按钮，对应值：0显示"确定"和"取消"按钮，对应值：1显示"放弃"、“重试"和"忽略"按钮，对应值：2显示"是”、"否"和"取消"按钮，对应值：3显示"是"和"否"按钮，对应值：4显示"重试"和"取...
2019-11-29 22:58:07
1710
原创 VB中的IF语句
Private Sub Command1_Click()Dim a As String, b As Stringa = Me.Text1.Textb = Me.Text2.TextIf Val(a) = Val(b) ThenMsgBox "a与b输入点相同", 64, "提示"Else If Val(a) < Val(b) Then MsgBox "a小于b输入点", 6...
2019-11-29 22:52:00
858
原创 VB中的IF语句
Private Sub Command1_Click()Dim a As String, b As Stringa = Me.Text1.Textb = Me.Text2.TextIf Val(a) = Val(b) ThenMsgBox “a与b输入点相同”ElseIf Val(a) < Val(b) ThenMsgBox “a小于b输入点”ElseIf Val(a) ...
2019-11-29 22:35:50
1329
转载 VBS编辑字段
'为已经创建好的数据表添加字段'参数：strDBPath 字符串型 数据库路径'参数：strTableName 字符串型 需要创建的数据表的名称'参数：strColumnName 字符串型 需要添加的字段名称'参数：strColumnType 字符串型 需要添加的字段数据类型Sub AddColumn(strDBPath, strTableName, strColumnName, str...
2019-11-21 21:54:56
325
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人