个人中心
我的提问
我的回答
今日任务
我的设置
退出
文档资料
电脑网络
体育运动
医疗健康
游戏
社会民生
文化艺术
电子数码
娱乐休闲
商业理财
教育科学
生活
烦恼
资源共享
其它
歪果仁看中国
爱问日报
精选问答
爱问教育
爱问公益
爱问法律
通过中间件ADO或 去连接 '引用ADO("工程"/"引用"/Microsoft ActiveX Data Objects 2.X Library) Private Sub Command1_Click() Dim cn As New ADODB.Conn...
1个回答
Private Sub Command1_Click() Dim a(10) As Integer Dim i, j, k, m, n As Integer n = 0 '最好指明a的下标 m = Text1.Text '你的m是数字还是字符串? i = 1 For i = 1 To Len(m) ...
Visual Basic
楼上很详细,我不多说了,一般最经典的使用是 commondialog1.showopen("") commondialog1.showsave("") .showcolor() .showfont() 只不过它的属性可以用属性中的自定义来设置
2个回答
在Visual Basic 程序中,可以使用 Windows API 的 ExitWindowsEx 函数来从程序中重新启动计算机系 统。 要使用该函数,需要将如下声明语句包含在窗体的通常声明部分中: Private Declare Function ExitWindowsEx Lib "us...
让音箱"笛"的响一声 不只是喇叭,音箱也会发出声音,声音是你在Windows中设置的“默认”声音值
3个回答
我的共享资料里面,有很多的源代码,你可以参考一下的。
给你个数据库的通用操作代码: 1.工程->引用,添加Micrsoft ActiveX Data Objects 2.5 Library 2.在需要连接数据库的地方加入以下代码: Dim conn As ADODB.Connection Dim rs As ADODB.RecordSet If con...
请问您的具体需求是什么,请详细描述一下。回答完毕,祝您好运。
一个一个提取,然后反过来组合。
一般用Dir函数。 Dir("文件路径") 如果文件存在,它反回的是这个文件的文件名;如果文件不存在,它反回的是一个空的字符串,即""。 一般用文件不存在的那个方法: If Dir("文件路径") = "" Then '如果文件不存在 Else '如果文件存在 End If 希望能帮助你。
n ^ (1 / 3) 没有3次方根的函数。。
编程入门网的VB教程区有教程:
最简单的方法就是,点中控件,复制,然后粘贴。 控件数组最方便的地方就是可以对控件进行循环操作。 例: 有1组10个标签label(0)、label(1)……label(9) for i=0 to 9 label(i).visible=false next
not1 < 2 是指变量not1的值小于2; not(1) < 2是指数组not的1号索引中的值小于2。 第一个是变量,第二个是数组。数组需要事先定义赋值后才可以进行逻辑运算,否则就会造成程序错误。 希望我的回答能帮助你。
我的共享文件中,有很多的VB源代码,有你需要的代码的!
文件---新建----窗口-----很久没用了,问883117吧,高手!!!!!!!!!!QQ
熟悉VB了,建立一个对象看看,
你自己要多学啊不然这么简单的问题还要问别人,自己到书上去找!
arrX(2)countersB()MsgBoxarrX(1)(2)显示每一个数组的成员
在博客中不能加VB,你可以考虑加上代码。
StrReverse函数描述返回一个字符串,其中一个指定子字符串的字符顺序是反向的
如果传递给函数的expression超过转换目标数据类型的范围,将发生错误
如果对话框中有帮助按钮,则对话框中提供与上下文相关的帮助
弹出式菜单,就像我们用鼠标右键弹出菜单一样。例如: object.popupMenu menun
模块可包含很多过程。
VB 与VBA中语句可以通用的