请教如何在VB代码窗口中输入特殊字符,例如对号“√”,谢谢。
先在WORD等环境中输入特殊字符,然后,复制-粘贴,到VB代码窗口里。
不可以。至少不通过外接手段就不可以实现。
你所用的wingdings 2是一种特殊的字体,它实际表达的却是一个字符值。
给你个思路,你可以把你所想用的特殊字符做为一个对象来存取。但肯定不能给字符变量赋值。
Option Explicit
Dim i As Integer
Private Sub Form_Load()
For i = 0 To 1
Print "√"
Next i
End Sub
用输入法输入 特殊符号在让他输出就行了
或是去看看ASCII码里面有没有这个特殊符号有的话输出他的ASCII码就行了
这个可以用我们经常用智能ABC输入法, 右击那个类似键盘上的东西,再点数学符号,里面就有的
请问在vb中如何在程序运行当中生成一个窗体?
原来没有,就要用API咯...如果你是复制一个已有的,就用 dim a as new form1 a.show 如果是要没有的,就CreateWindowEx 第一个参数是WindowStyleEx,可以由WS_EX_*组合,也可以是0 lpclassname 窗体就是#32770(切记,不能是VB的ThunderRT6FormDC)按钮Button 文本框Edit 标签(label,可以当pictur...
VB用代码添加窗体
‘新建窗体添加如下代码 Dim f() As New Form1 Dim fc As Integer Private Sub Command1_Click()ReDim f(0 To fc)f(fc).Show , Form1 fc = fc + 1 End Sub
VB如何打开或关闭窗体窗口、代码窗口?
注意 在卸载窗体时,只有显示的部件被卸载。和该窗体模块相关联的代码还保持在内存中。Unload 语句示例 这个示例使用 Unload 语句来卸载 Form 对象。在运行此例前,在 Form 对象的声明部分粘贴以下代码,然后运行此例并单击该 Form 对象。Private Sub Form_Click() Dim Answer, Msg ' 声明变量。
VB中如何打开一个工程的代码窗口
很简单,只要将最后一句count=0 改成count = n(只要n大于4就行),即 Private Sub Form_Click()Static count As Integer count = count + 1 If count = 1 Then Print "离离原上草,"ElseIf count = 2 Then Print "一岁一枯荣。"ElseIf count = 3 Then Print "野火烧不尽,"ElseIf ...
VB制作QQ登录窗口教程和代码
1、在桌面上,鼠标左键双击程序,打开VB编程软件,在左边工具栏上,单击【Label】按钮,在Form1窗口上绘制出两标签,用来写文字的说明。2、接着,根据窗口的大小,感觉文字小了,可以在Label属性窗口上,修改Font属性值,单击其选择按钮就可以更改字体的大小了。3、在弹出的字体对话框中,选择四号字的...
VB如何调用窗口
.我这个代码是在窗体1,点按钮后,因为标志为FLASE,于是打开窗体2, 在窗体2上,可以在文本框录入一些数据,然后按按钮后,将窗体1的标志位置为TRUE,然后CALL 了窗体1的按钮动作,因为标志位的变化,所以窗体1的按钮会执行剩下的代码(后一半)..就是在窗体1的文本框中显示窗体2刚刚文本框录入的信息.....
在VB中如何使用立即窗口
所谓立即窗口,就是Debug窗口。Debug嘛,那么它用于检查各种错误的窗口。工具栏→视图→立即窗口或快捷键→Ctrl+G 举例:1、有时候你要知道一个变量的值是怎么变化的,那么你可能会输入Msgbox i(i为变量),但是如果在一个循环里面 那么是很烦的,这个时候你可以输入Debug.print i 这样会在立即窗口...
如何VB 中在一个窗体中执行另一个窗体中的代码
可以用“窗体.代码”的模式去执行别的窗体的代码。假设要在窗体 frm1 里执行窗体 frm2 的Form_Click 代码,程序如下:Private Sub Form_Click()frm2.Form_Click() '在frm1 里执行 frm2 的 From_Click 代码 End Sub
VB中如何用代码添加命令按钮
按以下步骤实现动态添加命令按钮 (1)新建一个VB6工程 (2)Form1窗体代码 Option Explicit'定义要动态添加的命令按钮变量(带事件处理)Dim WithEvents cmdX As CommandButton'点击动态添加的按钮,弹出对话框Private Sub cmdX_Click() MsgBox "动态添加的命令按钮!!!"End Sub'鼠标双击窗体,动态...
vb怎么在窗体上创建菜单?代码创建,非控件创建
' 取得窗口函数的地址 Call SetWindowLong(Form1.hwnd, GWL_WNDPROC, AddressOf SubClass1_WndMessage)' 用SubClass1_WndMessage代替窗口函数处理消息 SysMenuHwnd = GetSystemMenu(Form1.hwnd, False)Call AppendMenu(SysMenuHwnd, MF_SEPARATOR, 2000, vbNullString)Call AppendMenu(SysMenuHwnd, MF_...
步狡复方: 你可在需输入特殊字符时启动WORD,利用WORD的插入(I)菜单下的符号(S)或特殊符号(Y)内,找到你需的特殊字符,临时放于WORD文本上,用复制粘贴法放入VB的代码内,例: Option Explicit Dim i As Integer Private Sub Form_Load() For i = 0 To 1 Print "√" Next i End Sub
薛城区17858469540: 如何在vb代码内输入特殊字符 - ?
步狡复方: 先在WORD等环境中输入特殊字符,然后,复制-粘贴,到VB代码窗口里.
薛城区17858469540: 在VB中,有许多特殊不常用的符号,怎么输入啊? - ?
步狡复方: 我自己弄vb的时候碰到的一些难打的字符:符号 方法(+号 表示按住+前面的键再按+后面的一个键.所有的都是在英文输入状态下) _ shift + - | shift + \& shift + 7# shift + 3* shift + 8
薛城区17858469540: VB的代码特殊符号是怎么输入的 - ?
步狡复方: 加个双引号
薛城区17858469540: VB中如何输入特殊符号??? - ?
步狡复方: MsgBox """" (4个) '这里显示单边双引号,若想要两边,则要输入六个引号,也就是"字符串",里面的字符串是双引号的话,两个双引号代表一个,下面的比较容易理解吧! MsgBox "&" 如果想显示"a&b",则应该写成"a" & "&" & "b",下面类似 MsgBox "\" MsgBox "'" 先看看效果如何,自己再试试看就能理解了,再不行再补充问题,或者看一下其他人的吧
薛城区17858469540: VB怎么在当前窗口输入预先设定的字 - ?
步狡复方: Private Sub Text1_GotFocus() Text1 = "1234567" End Sub Private Sub Text2_GotFocus() Text2 = "wpqrfwefawejgt" End Sub Private Sub Text3_GotFocus() Text3 = "这就是我预先想输入的字" End Sub
薛城区17858469540: VB的代码特殊符号是怎么输入的?
步狡复方: 实在不行就输入ASCII算了,里面转
薛城区17858469540: vb 如何显示特殊字符? - ?
步狡复方: 不知你电脑上装过金山词霸没有?你去C:\Windows\Fonts下看看有没有一个字体文件叫Kingsoft Phonetic的,如果有,你要在哪个控件上显示,就把哪个控件的Font选择成这个就可以了
薛城区17858469540: 如何在VB文本框中输入上标、下标 、特殊符号 - ?
步狡复方: 改用富文本框(RichTextBox)控件或通过OLE的方式调用Word文档对象.还有一种方法就是用webbowser控件调用html文档来解决.总之,直接在文本框中是没办法输入的.如果是简单的符号,可以通过输入法的软键盘输入
薛城区17858469540: vb中如何在窗体中输入文本信息 - ?
步狡复方: VB中只需在另一窗体的文本框控件名前加上该窗体名做前缀后给与赋值. Option ExplicitPrivate Sub Command1_Click()Form2.Text1 = Me.Text1 End SubPrivate Sub Command2_Click()Form2.Show End SubPrivate Sub Form_Load()Text1 = "VB中只需在另一窗体的文本框控件名前加上该窗体名做前缀后给与赋值." End Sub