A. 求:用VB做电影查询系统
把access表建好,给个数据表名称、字段结构及一两条记录的示例,要实现什么也说得清楚一点,别人才好告诉你怎么做 其实怎么做数据库编程的话,问是没法问的,要先看书,既然问了,就根据你提供的信息,给你一个示例吧: 先在菜单“工程”中“引用” MicroSoft ActiveX Data Object x.x Library(用最新版本) 再选择“工程”中的“部件”,加载两个控件,DataGrid1是MicroSoft DataGrid。。。,,Adodc1是MicroSoft ADO Data。。。,然后在窗体中添加这两个控件 再根据以下添加按钮和文本框 Rem 文本框text11、text12、text13,专门用来输入姓名、性别、年龄的 Rem 文本框text21、text22、text23,专门用来输出姓名、性别、年龄有关的查询结果 Rem 在datagrid中显示满足条件的查询结果 Private Sub Command1_Click() '模糊查询示例 sqlstr = "Select * from 学生查询 where 姓名 like '%" & Text11.Text & "%'" '精确查询示例 sqlstr = "Select * from 学生查询 where 性别 =" & Text12.Text '区间查询示例 sqlstr = "Select * from 学生查询 where 年龄 >" & Text13.Text Adodc1.RecordSource = sqlstr Adodc1.Refresh Set DataGrid1.DataSource = Adodc1 End Sub Rem 在vb的文本框中显示查询结果 Private Sub Command2_Click() Dim sConnString As String Dim rs As ADODB.Recordset Dim cn As ADODB.Connection sConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=f:\db1.mdb" '换成你的数据库文件名称 Set cn = New ADODB.Connection cn.Open sConnString Set rs = New ADODB.Recordset '查询指定性别的人数 rs.Open "select count(性别) as 性别 from 学生查询 where 性别 ='" & Text12.Text & "'", cn, 3, 3 Text22.Text = rs("性别").Value rs.Close End Sub Private Sub Form_Load() Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=f:\db1.mdb" '把f:\db1.mdb换成你自己的数据库文件名称 Adodc1.RecordSource = "学生查询" '这是数据库中表的名称 Adodc1.Refresh Set DataGrid1.DataSource = Adodc1 End Sub
B. 谁有惊奇队长电影的超清资源
直接上麻花有蓝光的
C. 谁能详细讲解一下 QBASIC 中DIM 怎么用
DIM语句分一维,二维……
使用方法
DIM 变量,字符串(I)
若是二维就定义两个下标
以此类推
D. 按键精灵里的 Dim 命令
按键精灵软件中的Dim命令作为局部变量应用,简单的先写个小范例,执行一遍基本可以理解什么是局部变量应用,代码如下:

(4)dim怎么下载完整电影扩展阅读
窗口句柄的标题,得到窗口的标题,如果窗口标题看不出来,那只能往后台窗口发送信息,确认后台窗口接收到信息,如果后台窗口是文本文件,可以后台循不发送字符,这样就能判断,窗口是否是窗口HH了,那可以后台点击鼠标,拖动鼠标等方法来确认窗口。
代码是检测是否有弹出窗口,如果弹出窗口宽度大于300像素(弹出不同对话框执行不同操作,一般成功和失败对应的对话框大小不同),goto跳转到指定位置去执行相关的功能代码。
对话框总有些特征,比如有确定按钮,取消按钮或者关闭按钮,那么利用这些特征来作为代码判断弹窗是否出现的条件,可以适用找图命令或者找色命令,加入判断即可。
E. vbs怎么下载文件
Dim obj1,obj2
Dim url
start = timer
url = "www.ddd.com/dd.pdf" '这里写你要下载文件的全路径
Set obj1 = CreateObject("msxml2.xmlhttp")
Set obj2 = CreateObject("adodb.stream")
obj1.open "get",url,False
obj1.send
temp = obj1.responseBody
obj2.Type = 1
obj2.Mode = 3
obj2.Open()
obj2.Write(temp)
obj2.SaveToFile "d:\dd.pdf",2 '这里写保存的路径和名字,后缀名要跟你文件后缀名一样哦。2的意思是已有则覆盖之
obj2.Close
endd = Timer
take = (endd-start) / 60
WScript.Echo "下载成功!" & vbCrLf & "共花费 " & take & " 秒!"
Set obj1 = Nothing
采纳吧!
F. 急求!!!深圳内衣展DIM内衣秀1080高清压缩版种子下载急求!!!
深圳内衣展DIM内衣秀1080高清压缩版种子下载地址:
记得采纳
G. 手机软件 dim+ 怎么用
这个你要下载你手机上支持的格式就能播放了。
H. 3DIM是什么电影形式比3D高级么
先来解释一下IMAX,它的直译即“最大影像”,是一种能够放映比传统胶片更大和更高解像度的电影放映系统。看立体电影,I-MAX-3D是最佳选择,因为屏幕越大,立体效果越明显,越有亲临其境的感受。普通影院由于放映功率的问题,银幕受到限制,而广东科学中心的IMAX银幕高22米,宽29米,是亚洲最大的IMAX银幕。 以3D立体方式呈现的IMAX Experience(R)可带给您世界上最身临其境的观赏体验,令世界各地数以百万人为之如痴如醉。水晶般清晰且逼真绚丽的立体图像,结合顶级的环绕音响系统使观众仿佛置身于电影中。 IMAX 3D立体体验的全方位高品质使其图像效果在全球傲视群雄——创造了有史以来最逼真、最具身临其境感的3D效果。IMAX 3D奇迹背后的一个重要因素是采用了双胶片技术,该技术远比传统的“红蓝”模拟3D技术先进,——后者仅仅把左右眼的图像放到一个胶片上,清晰度和色彩大打折扣。而IMAX 3D技术完全没有这样的遗憾,不仅采用了世界上最大的胶片格式(15/70),还通过2卷单独的胶片同时进行图像捕捉和放映。IMAX3D则是IMAX立体影片的放映技术, IMAX3D使用两盘IMAX专用的15/70胶片,一盘胶片对应一只眼睛,通过偏振过滤眼镜或红外同步系统配合电子眼镜以提供两个单独的图像。结合IMAX巨幕,IMAX3D能够产生逼真的全视野立体效果