richtextbox获取某行_richtextbox 光标_richtextbox和textbox(38)

7.5滚动显示图片

在窗体上放放置一个图片框控件，一个垂直滚动条和一个水平滚动 条，再在图片框控件中放置另一个图片框控件，如下图

属性设置如下：

对象 窗体 图片框1 图片框2 属性 caption 名称 名称 autosize borderstyle picture left top 名称 min largechange smallchange 名称 min largechange smallchange 值 滚动图片 picture1 pictrue2 true 0 设置显示任一个图片 0 0 hscroll1 0 200 100 vscroll1 0 200 100

水平滚动条

垂直滚动条

代码实现

private sub form_load() hscroll1.max = picture2.width - picture1.width vscroll1.max = picture2.height - picture1.height end sub

private sub hscroll1_change() picture2.left = -hscroll1.value end sub

private sub hscroll1_scroll() picture2.left = -hscroll1.value end sub

水平滚动浏览

水平滚动浏览

private sub vscroll1_change() 垂直滚动浏览 picture2.top = -vscroll1.value end sub

private sub vscroll1_scroll() 垂直滚动浏览 picture2.top = -vscroll1.value end sub

第八章对话框

对话框(dialogbox)是应用程序与用户进行交互的主要途径，既可以用来显 示信息，也可以用于输入信息。 三种对话框： (1)预定义对话框 使用函数inputbox和msgbox来实现 (2)用户自定义对话框 (3)通用对话框(打开对话框、保存对话框、颜色对话框、字体对话框、 打印对话框、帮助对话框)

vb中能够建立两种预定义对话框：输入框和消息框 使用系统提供的函数(inputbox和msgbox)，而不必 为对话框另建窗体 先看以下一个例子

例3.7a 通过输入框输入姓名，然后再消息框中显 示出来 private sub form_load() x = inputbox("输入您的姓名", "您叫什么名") msgbox (x & "先生：祝您马到功成！") end sub

8.1 消息对话框

使用msgbox函数，可以产生一个对话框来显示消息 当用户单击某个按钮后，将返回一个数值以标明用户单击了哪 个按钮 其语法格式是： 变量=msgbox(提示[,对话框类型[,对话框标题]]) 例1：y = msgbox(“输入文件名是否正确”,52,”请确认”) “对话框类型”一般有3个参数， 4+48+0 出现按钮；图标类型；默认按钮；

例2：

msg= msgbox(“是否真正删除”,33,”请确认”) 1+32+0

例3：msg

= msgbox("你执行了非法操作。", 50, "警告") 2+48+0

按钮的类型 及对应的值

符号常量 vbokonly vbokcancel vbabortretryignore vbyesnocancel vbyesno vbretrycancel 符号常量 vbcritical vbquestion vbexclamation vbinformation 值 0 1 2 3 4 5 值 16 32 48 64 在消息框中显示出来的按钮 ―确定”按钮 ―确定”和“取消”按钮 ―终止”、“重试”和“忽略”按钮 ―是”、“否”、“取消”按钮 ―是”和“否”按钮 ―重试”和”取消”按钮 在消息框中显示出来的图标 见课本图8.4(a) 见课本图8.4(b) 见课本图8.4(c) 见课本图8.4(d)

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-29087-38.html