在vb中,如何实现添加图片后在左边的文本框中显示路径. 按合并按钮可以调用cmd中命令.

在vb中,如何实现添加图片后在左边的文本框中显示路径. 按合并按钮可以调用cmd中命令.,第1张

要在文本框里显示刚才添加的图片文件的路径,使用CommonDialog控件的FileName属性:

例如:Text1.text = CommonDialog1.FileName

要调用cmd命令:VB提供的:Shell函数,具体使用方法:

Dim RetVal As Integer

RetVal = Shell("C:\Exsa\1.exe", 1)

其中:1.exe就是你所谓的cmd命令程序文件

简单的用两个控件:picture和textbox

而textbox是forms 2的文本控件,不同于普通的text,将该文本控件在picture之上并透明即可

复杂的用API,具体度娘.

Private Sub Text1_KeyPress(KeyAscii As Integer)

Dim k As Integer, c As String

k = KeyAscii

c = UCase(Chr(k))

If c >= "A" And c <= "Z" Then '转换后是大写字母的进入判断内部处理,

'非大写字母的不做处理,所以text1中的1、2和&会照原样输入text2

 k = k - 3 '以小写a为例,转换后是大写字母A,所以在这处理,k的值是97

 '减3后是94,所以94+26=120,也就变成了x,其它字符类推……

 'dxyz不进入加26的处理,所以只向前移三个字符……

 If k < Asc("A") Or k > Asc("Z") And k < Asc("a") Then k = k + 26

End If

Text2.Text = Text2.Text + Chr(k)

End Sub

abcd12xyz&

xyza12uvw&


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11901239.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存